From the list of 3-tuples, how can I select tuples which contain one for more nines? [closed]how can one select elements from a list that are satisfied a criteria which need to compare with other elements in the list?Finding the most common n-tuples of a list of lists where order does not matterHow can I select the new maximums in a list?Selecting from a list returned by TuplesSelect elements in a list of tuples of quaternions that satisfy a conditionDeleting duplicates only if they are a certain kind of duplicateSelect data from a list

What is the difference between an adjective and a noun modifier?

What happens if we run out of terrain tiles?

How might people try to stop the world becoming a rogue planet?

Right way to say I disagree with the design but ok I will do

Falcon Heavy Stage 1 Recovery

Where do overtones in a 555 generated square wave come from?

18 month old kicked out of church nursery

What order of magnitude incoming asteroid could we, in fact, deflect?

Replacing triangulated categories with something better

Does the FIDE 75-move rule apply after checkmate or resignation?

Meaning of "in arms"

How to deal with non-stop callers in the service desk

Modeling the Choose function

What is a GPU year?

where does black come from in CMYK color mode?

What could a technologically advanced but outnumbered alien race do to destroy humanity?

Why does the SR-71 Blackbird sometimes have dents in the nose?

Iterator for traversing a tree [v2]

What game(s) does Michael play in Mind Field S2E4?

What happens to a Bladesinger reincarnated as a Human?

Did Bercow say the would have sent the EU extension-request letter himself had Johnson not done so?

Surjection from one string to two strings

Will there be a vote in the Commons to decide the fate of Johnson's deal?

Travel with Expired Greek Passport from UK to Greece and Return



From the list of 3-tuples, how can I select tuples which contain one for more nines? [closed]


how can one select elements from a list that are satisfied a criteria which need to compare with other elements in the list?Finding the most common n-tuples of a list of lists where order does not matterHow can I select the new maximums in a list?Selecting from a list returned by TuplesSelect elements in a list of tuples of quaternions that satisfy a conditionDeleting duplicates only if they are a certain kind of duplicateSelect data from a list






.everyoneloves__top-leaderboard:empty,.everyoneloves__mid-leaderboard:empty,.everyoneloves__bot-mid-leaderboard:empty
margin-bottom:0;

.everyonelovesstackoverflowposition:absolute;height:1px;width:1px;opacity:0;top:0;left:0;pointer-events:none;








7














$begingroup$


From the list



Tuples[1, 2, 3, 4, 9, 3]


how can I select exactly those 3-tuples that contain one for more nines?



This is the result I want:




1, 1, 9, 1, 2, 9, 1, 3, 9, 1, 4, 9, 1, 9, 1 ... 9, 9, 4, 9, 9, 9










share|improve this question












$endgroup$





closed as off-topic by Daniel Lichtblau, Henrik Schumacher, ciao, user42582, AccidentalFourierTransform Jun 3 at 14:23


This question appears to be off-topic. The users who voted to close gave this specific reason:


  • "This question arises due to a simple mistake such as a trivial syntax error, incorrect capitalization, spelling mistake, or other typographical error and is unlikely to help any future visitors, or else it is easily found in the documentation." – Daniel Lichtblau, Henrik Schumacher, ciao, user42582, AccidentalFourierTransform
If this question can be reworded to fit the rules in the help center, please edit the question.












  • 2




    $begingroup$
    Help > Wolfram Docuentation, enter "select" (with or without quotes). First hit is to Select...
    $endgroup$
    – Daniel Lichtblau
    Jun 2 at 11:59

















7














$begingroup$


From the list



Tuples[1, 2, 3, 4, 9, 3]


how can I select exactly those 3-tuples that contain one for more nines?



This is the result I want:




1, 1, 9, 1, 2, 9, 1, 3, 9, 1, 4, 9, 1, 9, 1 ... 9, 9, 4, 9, 9, 9










share|improve this question












$endgroup$





closed as off-topic by Daniel Lichtblau, Henrik Schumacher, ciao, user42582, AccidentalFourierTransform Jun 3 at 14:23


This question appears to be off-topic. The users who voted to close gave this specific reason:


  • "This question arises due to a simple mistake such as a trivial syntax error, incorrect capitalization, spelling mistake, or other typographical error and is unlikely to help any future visitors, or else it is easily found in the documentation." – Daniel Lichtblau, Henrik Schumacher, ciao, user42582, AccidentalFourierTransform
If this question can be reworded to fit the rules in the help center, please edit the question.












  • 2




    $begingroup$
    Help > Wolfram Docuentation, enter "select" (with or without quotes). First hit is to Select...
    $endgroup$
    – Daniel Lichtblau
    Jun 2 at 11:59













7












7








7


1



$begingroup$


From the list



Tuples[1, 2, 3, 4, 9, 3]


how can I select exactly those 3-tuples that contain one for more nines?



This is the result I want:




1, 1, 9, 1, 2, 9, 1, 3, 9, 1, 4, 9, 1, 9, 1 ... 9, 9, 4, 9, 9, 9










share|improve this question












$endgroup$




From the list



Tuples[1, 2, 3, 4, 9, 3]


how can I select exactly those 3-tuples that contain one for more nines?



This is the result I want:




1, 1, 9, 1, 2, 9, 1, 3, 9, 1, 4, 9, 1, 9, 1 ... 9, 9, 4, 9, 9, 9







list-manipulation






share|improve this question
















share|improve this question













share|improve this question




share|improve this question








edited Jun 3 at 4:23









m_goldberg

92.1k8 gold badges76 silver badges211 bronze badges




92.1k8 gold badges76 silver badges211 bronze badges










asked Jun 2 at 7:25









CarbajoCarbajo

1155 bronze badges




1155 bronze badges





closed as off-topic by Daniel Lichtblau, Henrik Schumacher, ciao, user42582, AccidentalFourierTransform Jun 3 at 14:23


This question appears to be off-topic. The users who voted to close gave this specific reason:


  • "This question arises due to a simple mistake such as a trivial syntax error, incorrect capitalization, spelling mistake, or other typographical error and is unlikely to help any future visitors, or else it is easily found in the documentation." – Daniel Lichtblau, Henrik Schumacher, ciao, user42582, AccidentalFourierTransform
If this question can be reworded to fit the rules in the help center, please edit the question.









closed as off-topic by Daniel Lichtblau, Henrik Schumacher, ciao, user42582, AccidentalFourierTransform Jun 3 at 14:23


This question appears to be off-topic. The users who voted to close gave this specific reason:


  • "This question arises due to a simple mistake such as a trivial syntax error, incorrect capitalization, spelling mistake, or other typographical error and is unlikely to help any future visitors, or else it is easily found in the documentation." – Daniel Lichtblau, Henrik Schumacher, ciao, user42582, AccidentalFourierTransform
If this question can be reworded to fit the rules in the help center, please edit the question.







closed as off-topic by Daniel Lichtblau, Henrik Schumacher, ciao, user42582, AccidentalFourierTransform Jun 3 at 14:23


This question appears to be off-topic. The users who voted to close gave this specific reason:


  • "This question arises due to a simple mistake such as a trivial syntax error, incorrect capitalization, spelling mistake, or other typographical error and is unlikely to help any future visitors, or else it is easily found in the documentation." – Daniel Lichtblau, Henrik Schumacher, ciao, user42582, AccidentalFourierTransform
If this question can be reworded to fit the rules in the help center, please edit the question.







  • 2




    $begingroup$
    Help > Wolfram Docuentation, enter "select" (with or without quotes). First hit is to Select...
    $endgroup$
    – Daniel Lichtblau
    Jun 2 at 11:59












  • 2




    $begingroup$
    Help > Wolfram Docuentation, enter "select" (with or without quotes). First hit is to Select...
    $endgroup$
    – Daniel Lichtblau
    Jun 2 at 11:59







2




2




$begingroup$
Help > Wolfram Docuentation, enter "select" (with or without quotes). First hit is to Select...
$endgroup$
– Daniel Lichtblau
Jun 2 at 11:59




$begingroup$
Help > Wolfram Docuentation, enter "select" (with or without quotes). First hit is to Select...
$endgroup$
– Daniel Lichtblau
Jun 2 at 11:59










4 Answers
4






active

oldest

votes


















8
















$begingroup$

list=Tuples[1, 2, 3, 4, 9, 3] ;
Cases[___,9,___]@list



1, 1, 9, 1, 2, 9, 1, 3, 9, 1, 4, 9, 1, 9, 1, 1, 9, 2, 1,
9, 3, 1, 9, 4, 1, 9, 9,

2, 1, 9, 2, 2, 9, 2, 3, 9, 2,
4, 9, 2, 9, 1, 2, 9, 2, 2, 9, 3, 2, 9, 4, 2, 9, 9,

3, 1,
9, 3, 2, 9, 3, 3, 9, 3, 4, 9, 3, 9, 1, 3, 9, 2, 3, 9,
3, 3, 9, 4, 3, 9, 9,

4, 1, 9, 4, 2, 9, 4, 3, 9, 4, 4, 9, 4, 9, 1, 4, 9, 2, 4, 9, 3, 4, 9, 4, 4, 9, 9,

9, 1, 1, 9, 1, 2, 9, 1, 3, 9, 1, 4, 9, 1, 9, 9, 2, 1, 9, 2,
2, 9, 2, 3, 9, 2, 4, 9, 2, 9,

9, 3, 1, 9, 3, 2, 9, 3,
3, 9, 3, 4, 9, 3, 9, 9, 4, 1, 9, 4, 2, 9, 4, 3, 9, 4,
4, 9, 4, 9,

9, 9, 1, 9, 9, 2, 9, 9, 3, 9, 9, 4, 9, 9,
9







share|improve this answer










$endgroup$






















    6
















    $begingroup$

    try



    Select[Tuples[1,2,3,4,9,3],MemberQ@9] 



    1,1,9,1,2,9,1,3,9,1,4,9,1,9,1,1,9,2,1,9,3,1,9,4,1,9,9,2,1,9,2,2,9,2,3,9,2,4,9,2,9,1,2,9,2,2,9,3,2,9,4,2,9,9,3,1,9,3,2,9,3,3,9,3,4,9,3,9,1,3,9,2,3,9,3,3,9,4,3,9,9,4,1,9,4,2,9,4,3,9,4,4,9,4,9,1,4,9,2,4,9,3,4,9,4,4,9,9,9,1,1,9,1,2,9,1,3,9,1,4,9,1,9,9,2,1,9,2,2,9,2,3,9,2,4,9,2,9,9,3,1,9,3,2,9,3,3,9,3,4,9,3,9,9,4,1,9,4,2,9,4,3,9,4,4,9,4,9,9,9,1,9,9,2,9,9,3,9,9,4,9,9,9







    share|improve this answer












    $endgroup$














    • $begingroup$
      This can even be shortened to Select[Tuples[1,2,3,4,9,3], MemberQ[9]].
      $endgroup$
      – Henrik Schumacher
      Jun 2 at 9:36










    • $begingroup$
      @HenrikSchumacher nice!
      $endgroup$
      – J42161217
      Jun 2 at 9:58


















    2
















    $begingroup$

    L = Tuples[1, 2, 3, 4, 9, 3];

    Pick[L, Total /@ UnitBox[L - 9], 1 | 2 | 3]


    Or



    Pick[L, Total /@ UnitStep[L - 8], 1 | 2 | 3]





    share|improve this answer










    $endgroup$






















      1
















      $begingroup$

      lst // Pick[#, Times@@@(# /. 9-> 0), 0] &


      and



      Pick[lst,Times@@@(lst/. 9-> 0),0]==
      Pick[lst, MemberQ[#,9]&/@lst]





      share|improve this answer










      $endgroup$






















        4 Answers
        4






        active

        oldest

        votes








        4 Answers
        4






        active

        oldest

        votes









        active

        oldest

        votes






        active

        oldest

        votes









        8
















        $begingroup$

        list=Tuples[1, 2, 3, 4, 9, 3] ;
        Cases[___,9,___]@list



        1, 1, 9, 1, 2, 9, 1, 3, 9, 1, 4, 9, 1, 9, 1, 1, 9, 2, 1,
        9, 3, 1, 9, 4, 1, 9, 9,

        2, 1, 9, 2, 2, 9, 2, 3, 9, 2,
        4, 9, 2, 9, 1, 2, 9, 2, 2, 9, 3, 2, 9, 4, 2, 9, 9,

        3, 1,
        9, 3, 2, 9, 3, 3, 9, 3, 4, 9, 3, 9, 1, 3, 9, 2, 3, 9,
        3, 3, 9, 4, 3, 9, 9,

        4, 1, 9, 4, 2, 9, 4, 3, 9, 4, 4, 9, 4, 9, 1, 4, 9, 2, 4, 9, 3, 4, 9, 4, 4, 9, 9,

        9, 1, 1, 9, 1, 2, 9, 1, 3, 9, 1, 4, 9, 1, 9, 9, 2, 1, 9, 2,
        2, 9, 2, 3, 9, 2, 4, 9, 2, 9,

        9, 3, 1, 9, 3, 2, 9, 3,
        3, 9, 3, 4, 9, 3, 9, 9, 4, 1, 9, 4, 2, 9, 4, 3, 9, 4,
        4, 9, 4, 9,

        9, 9, 1, 9, 9, 2, 9, 9, 3, 9, 9, 4, 9, 9,
        9







        share|improve this answer










        $endgroup$



















          8
















          $begingroup$

          list=Tuples[1, 2, 3, 4, 9, 3] ;
          Cases[___,9,___]@list



          1, 1, 9, 1, 2, 9, 1, 3, 9, 1, 4, 9, 1, 9, 1, 1, 9, 2, 1,
          9, 3, 1, 9, 4, 1, 9, 9,

          2, 1, 9, 2, 2, 9, 2, 3, 9, 2,
          4, 9, 2, 9, 1, 2, 9, 2, 2, 9, 3, 2, 9, 4, 2, 9, 9,

          3, 1,
          9, 3, 2, 9, 3, 3, 9, 3, 4, 9, 3, 9, 1, 3, 9, 2, 3, 9,
          3, 3, 9, 4, 3, 9, 9,

          4, 1, 9, 4, 2, 9, 4, 3, 9, 4, 4, 9, 4, 9, 1, 4, 9, 2, 4, 9, 3, 4, 9, 4, 4, 9, 9,

          9, 1, 1, 9, 1, 2, 9, 1, 3, 9, 1, 4, 9, 1, 9, 9, 2, 1, 9, 2,
          2, 9, 2, 3, 9, 2, 4, 9, 2, 9,

          9, 3, 1, 9, 3, 2, 9, 3,
          3, 9, 3, 4, 9, 3, 9, 9, 4, 1, 9, 4, 2, 9, 4, 3, 9, 4,
          4, 9, 4, 9,

          9, 9, 1, 9, 9, 2, 9, 9, 3, 9, 9, 4, 9, 9,
          9







          share|improve this answer










          $endgroup$

















            8














            8










            8







            $begingroup$

            list=Tuples[1, 2, 3, 4, 9, 3] ;
            Cases[___,9,___]@list



            1, 1, 9, 1, 2, 9, 1, 3, 9, 1, 4, 9, 1, 9, 1, 1, 9, 2, 1,
            9, 3, 1, 9, 4, 1, 9, 9,

            2, 1, 9, 2, 2, 9, 2, 3, 9, 2,
            4, 9, 2, 9, 1, 2, 9, 2, 2, 9, 3, 2, 9, 4, 2, 9, 9,

            3, 1,
            9, 3, 2, 9, 3, 3, 9, 3, 4, 9, 3, 9, 1, 3, 9, 2, 3, 9,
            3, 3, 9, 4, 3, 9, 9,

            4, 1, 9, 4, 2, 9, 4, 3, 9, 4, 4, 9, 4, 9, 1, 4, 9, 2, 4, 9, 3, 4, 9, 4, 4, 9, 9,

            9, 1, 1, 9, 1, 2, 9, 1, 3, 9, 1, 4, 9, 1, 9, 9, 2, 1, 9, 2,
            2, 9, 2, 3, 9, 2, 4, 9, 2, 9,

            9, 3, 1, 9, 3, 2, 9, 3,
            3, 9, 3, 4, 9, 3, 9, 9, 4, 1, 9, 4, 2, 9, 4, 3, 9, 4,
            4, 9, 4, 9,

            9, 9, 1, 9, 9, 2, 9, 9, 3, 9, 9, 4, 9, 9,
            9







            share|improve this answer










            $endgroup$



            list=Tuples[1, 2, 3, 4, 9, 3] ;
            Cases[___,9,___]@list



            1, 1, 9, 1, 2, 9, 1, 3, 9, 1, 4, 9, 1, 9, 1, 1, 9, 2, 1,
            9, 3, 1, 9, 4, 1, 9, 9,

            2, 1, 9, 2, 2, 9, 2, 3, 9, 2,
            4, 9, 2, 9, 1, 2, 9, 2, 2, 9, 3, 2, 9, 4, 2, 9, 9,

            3, 1,
            9, 3, 2, 9, 3, 3, 9, 3, 4, 9, 3, 9, 1, 3, 9, 2, 3, 9,
            3, 3, 9, 4, 3, 9, 9,

            4, 1, 9, 4, 2, 9, 4, 3, 9, 4, 4, 9, 4, 9, 1, 4, 9, 2, 4, 9, 3, 4, 9, 4, 4, 9, 9,

            9, 1, 1, 9, 1, 2, 9, 1, 3, 9, 1, 4, 9, 1, 9, 9, 2, 1, 9, 2,
            2, 9, 2, 3, 9, 2, 4, 9, 2, 9,

            9, 3, 1, 9, 3, 2, 9, 3,
            3, 9, 3, 4, 9, 3, 9, 9, 4, 1, 9, 4, 2, 9, 4, 3, 9, 4,
            4, 9, 4, 9,

            9, 9, 1, 9, 9, 2, 9, 9, 3, 9, 9, 4, 9, 9,
            9








            share|improve this answer













            share|improve this answer




            share|improve this answer










            answered Jun 2 at 7:33









            kglrkglr

            222k10 gold badges253 silver badges511 bronze badges




            222k10 gold badges253 silver badges511 bronze badges


























                6
















                $begingroup$

                try



                Select[Tuples[1,2,3,4,9,3],MemberQ@9] 



                1,1,9,1,2,9,1,3,9,1,4,9,1,9,1,1,9,2,1,9,3,1,9,4,1,9,9,2,1,9,2,2,9,2,3,9,2,4,9,2,9,1,2,9,2,2,9,3,2,9,4,2,9,9,3,1,9,3,2,9,3,3,9,3,4,9,3,9,1,3,9,2,3,9,3,3,9,4,3,9,9,4,1,9,4,2,9,4,3,9,4,4,9,4,9,1,4,9,2,4,9,3,4,9,4,4,9,9,9,1,1,9,1,2,9,1,3,9,1,4,9,1,9,9,2,1,9,2,2,9,2,3,9,2,4,9,2,9,9,3,1,9,3,2,9,3,3,9,3,4,9,3,9,9,4,1,9,4,2,9,4,3,9,4,4,9,4,9,9,9,1,9,9,2,9,9,3,9,9,4,9,9,9







                share|improve this answer












                $endgroup$














                • $begingroup$
                  This can even be shortened to Select[Tuples[1,2,3,4,9,3], MemberQ[9]].
                  $endgroup$
                  – Henrik Schumacher
                  Jun 2 at 9:36










                • $begingroup$
                  @HenrikSchumacher nice!
                  $endgroup$
                  – J42161217
                  Jun 2 at 9:58















                6
















                $begingroup$

                try



                Select[Tuples[1,2,3,4,9,3],MemberQ@9] 



                1,1,9,1,2,9,1,3,9,1,4,9,1,9,1,1,9,2,1,9,3,1,9,4,1,9,9,2,1,9,2,2,9,2,3,9,2,4,9,2,9,1,2,9,2,2,9,3,2,9,4,2,9,9,3,1,9,3,2,9,3,3,9,3,4,9,3,9,1,3,9,2,3,9,3,3,9,4,3,9,9,4,1,9,4,2,9,4,3,9,4,4,9,4,9,1,4,9,2,4,9,3,4,9,4,4,9,9,9,1,1,9,1,2,9,1,3,9,1,4,9,1,9,9,2,1,9,2,2,9,2,3,9,2,4,9,2,9,9,3,1,9,3,2,9,3,3,9,3,4,9,3,9,9,4,1,9,4,2,9,4,3,9,4,4,9,4,9,9,9,1,9,9,2,9,9,3,9,9,4,9,9,9







                share|improve this answer












                $endgroup$














                • $begingroup$
                  This can even be shortened to Select[Tuples[1,2,3,4,9,3], MemberQ[9]].
                  $endgroup$
                  – Henrik Schumacher
                  Jun 2 at 9:36










                • $begingroup$
                  @HenrikSchumacher nice!
                  $endgroup$
                  – J42161217
                  Jun 2 at 9:58













                6














                6










                6







                $begingroup$

                try



                Select[Tuples[1,2,3,4,9,3],MemberQ@9] 



                1,1,9,1,2,9,1,3,9,1,4,9,1,9,1,1,9,2,1,9,3,1,9,4,1,9,9,2,1,9,2,2,9,2,3,9,2,4,9,2,9,1,2,9,2,2,9,3,2,9,4,2,9,9,3,1,9,3,2,9,3,3,9,3,4,9,3,9,1,3,9,2,3,9,3,3,9,4,3,9,9,4,1,9,4,2,9,4,3,9,4,4,9,4,9,1,4,9,2,4,9,3,4,9,4,4,9,9,9,1,1,9,1,2,9,1,3,9,1,4,9,1,9,9,2,1,9,2,2,9,2,3,9,2,4,9,2,9,9,3,1,9,3,2,9,3,3,9,3,4,9,3,9,9,4,1,9,4,2,9,4,3,9,4,4,9,4,9,9,9,1,9,9,2,9,9,3,9,9,4,9,9,9







                share|improve this answer












                $endgroup$



                try



                Select[Tuples[1,2,3,4,9,3],MemberQ@9] 



                1,1,9,1,2,9,1,3,9,1,4,9,1,9,1,1,9,2,1,9,3,1,9,4,1,9,9,2,1,9,2,2,9,2,3,9,2,4,9,2,9,1,2,9,2,2,9,3,2,9,4,2,9,9,3,1,9,3,2,9,3,3,9,3,4,9,3,9,1,3,9,2,3,9,3,3,9,4,3,9,9,4,1,9,4,2,9,4,3,9,4,4,9,4,9,1,4,9,2,4,9,3,4,9,4,4,9,9,9,1,1,9,1,2,9,1,3,9,1,4,9,1,9,9,2,1,9,2,2,9,2,3,9,2,4,9,2,9,9,3,1,9,3,2,9,3,3,9,3,4,9,3,9,9,4,1,9,4,2,9,4,3,9,4,4,9,4,9,9,9,1,9,9,2,9,9,3,9,9,4,9,9,9








                share|improve this answer















                share|improve this answer




                share|improve this answer








                edited Jun 2 at 9:58

























                answered Jun 2 at 7:33









                J42161217J42161217

                5,5105 silver badges27 bronze badges




                5,5105 silver badges27 bronze badges














                • $begingroup$
                  This can even be shortened to Select[Tuples[1,2,3,4,9,3], MemberQ[9]].
                  $endgroup$
                  – Henrik Schumacher
                  Jun 2 at 9:36










                • $begingroup$
                  @HenrikSchumacher nice!
                  $endgroup$
                  – J42161217
                  Jun 2 at 9:58
















                • $begingroup$
                  This can even be shortened to Select[Tuples[1,2,3,4,9,3], MemberQ[9]].
                  $endgroup$
                  – Henrik Schumacher
                  Jun 2 at 9:36










                • $begingroup$
                  @HenrikSchumacher nice!
                  $endgroup$
                  – J42161217
                  Jun 2 at 9:58















                $begingroup$
                This can even be shortened to Select[Tuples[1,2,3,4,9,3], MemberQ[9]].
                $endgroup$
                – Henrik Schumacher
                Jun 2 at 9:36




                $begingroup$
                This can even be shortened to Select[Tuples[1,2,3,4,9,3], MemberQ[9]].
                $endgroup$
                – Henrik Schumacher
                Jun 2 at 9:36












                $begingroup$
                @HenrikSchumacher nice!
                $endgroup$
                – J42161217
                Jun 2 at 9:58




                $begingroup$
                @HenrikSchumacher nice!
                $endgroup$
                – J42161217
                Jun 2 at 9:58











                2
















                $begingroup$

                L = Tuples[1, 2, 3, 4, 9, 3];

                Pick[L, Total /@ UnitBox[L - 9], 1 | 2 | 3]


                Or



                Pick[L, Total /@ UnitStep[L - 8], 1 | 2 | 3]





                share|improve this answer










                $endgroup$



















                  2
















                  $begingroup$

                  L = Tuples[1, 2, 3, 4, 9, 3];

                  Pick[L, Total /@ UnitBox[L - 9], 1 | 2 | 3]


                  Or



                  Pick[L, Total /@ UnitStep[L - 8], 1 | 2 | 3]





                  share|improve this answer










                  $endgroup$

















                    2














                    2










                    2







                    $begingroup$

                    L = Tuples[1, 2, 3, 4, 9, 3];

                    Pick[L, Total /@ UnitBox[L - 9], 1 | 2 | 3]


                    Or



                    Pick[L, Total /@ UnitStep[L - 8], 1 | 2 | 3]





                    share|improve this answer










                    $endgroup$



                    L = Tuples[1, 2, 3, 4, 9, 3];

                    Pick[L, Total /@ UnitBox[L - 9], 1 | 2 | 3]


                    Or



                    Pick[L, Total /@ UnitStep[L - 8], 1 | 2 | 3]






                    share|improve this answer













                    share|improve this answer




                    share|improve this answer










                    answered Jun 2 at 11:03









                    OkkesDulgerciOkkesDulgerci

                    6,3451 gold badge11 silver badges23 bronze badges




                    6,3451 gold badge11 silver badges23 bronze badges
























                        1
















                        $begingroup$

                        lst // Pick[#, Times@@@(# /. 9-> 0), 0] &


                        and



                        Pick[lst,Times@@@(lst/. 9-> 0),0]==
                        Pick[lst, MemberQ[#,9]&/@lst]





                        share|improve this answer










                        $endgroup$



















                          1
















                          $begingroup$

                          lst // Pick[#, Times@@@(# /. 9-> 0), 0] &


                          and



                          Pick[lst,Times@@@(lst/. 9-> 0),0]==
                          Pick[lst, MemberQ[#,9]&/@lst]





                          share|improve this answer










                          $endgroup$

















                            1














                            1










                            1







                            $begingroup$

                            lst // Pick[#, Times@@@(# /. 9-> 0), 0] &


                            and



                            Pick[lst,Times@@@(lst/. 9-> 0),0]==
                            Pick[lst, MemberQ[#,9]&/@lst]





                            share|improve this answer










                            $endgroup$



                            lst // Pick[#, Times@@@(# /. 9-> 0), 0] &


                            and



                            Pick[lst,Times@@@(lst/. 9-> 0),0]==
                            Pick[lst, MemberQ[#,9]&/@lst]






                            share|improve this answer













                            share|improve this answer




                            share|improve this answer










                            answered Jun 2 at 8:01









                            user1066user1066

                            6,5782 gold badges20 silver badges33 bronze badges




                            6,5782 gold badges20 silver badges33 bronze badges
















                                Popular posts from this blog

                                Tamil (spriik) Luke uk diar | Nawigatjuun

                                Align equal signs while including text over equalitiesAMS align: left aligned text/math plus multicolumn alignmentMultiple alignmentsAligning equations in multiple placesNumbering and aligning an equation with multiple columnsHow to align one equation with another multline equationUsing \ in environments inside the begintabularxNumber equations and preserving alignment of equal signsHow can I align equations to the left and to the right?Double equation alignment problem within align enviromentAligned within align: Why are they right-aligned?

                                Training a classifier when some of the features are unknownWhy does Gradient Boosting regression predict negative values when there are no negative y-values in my training set?How to improve an existing (trained) classifier?What is effect when I set up some self defined predisctor variables?Why Matlab neural network classification returns decimal values on prediction dataset?Fitting and transforming text data in training, testing, and validation setsHow to quantify the performance of the classifier (multi-class SVM) using the test data?How do I control for some patients providing multiple samples in my training data?Training and Test setTraining a convolutional neural network for image denoising in MatlabShouldn't an autoencoder with #(neurons in hidden layer) = #(neurons in input layer) be “perfect”?