How to split a list of vectors to sub-lists by increasing order.











up vote
1
down vote

favorite












I have a list of n vectors. I would like to split it to sub-list where the number of the vectors at each list is different. The number of the vectors is increased sequentially from one list to another. For example,
if I have a list with 6 vectors. Then, I would like to split it to several list as follows:



The first list contains one vector. Then, the second list contains 2 vectors and so on. For example,



Suppose I have the list x as follows:



x <- list(x1=c(1,2,3), x2=c(1,4,3), x3=c(3,4,6), x4=c(4,8,4), x5=c(4,33,4), x6=c(9,6,7))


Then, I would like to split it into 3 lists,



list1 = x1
list2 = list(x2, x3)
list3 = list(x4,x5, x6)


I have similar question (How to splitting a list of vectors to small lists in decreasing order in r) but in a decreasing order.



How I can generate it to arbitrary number of vectors. For example, how if I have 10 or 20 vectors?



Any idea, please?










share|improve this question


























    up vote
    1
    down vote

    favorite












    I have a list of n vectors. I would like to split it to sub-list where the number of the vectors at each list is different. The number of the vectors is increased sequentially from one list to another. For example,
    if I have a list with 6 vectors. Then, I would like to split it to several list as follows:



    The first list contains one vector. Then, the second list contains 2 vectors and so on. For example,



    Suppose I have the list x as follows:



    x <- list(x1=c(1,2,3), x2=c(1,4,3), x3=c(3,4,6), x4=c(4,8,4), x5=c(4,33,4), x6=c(9,6,7))


    Then, I would like to split it into 3 lists,



    list1 = x1
    list2 = list(x2, x3)
    list3 = list(x4,x5, x6)


    I have similar question (How to splitting a list of vectors to small lists in decreasing order in r) but in a decreasing order.



    How I can generate it to arbitrary number of vectors. For example, how if I have 10 or 20 vectors?



    Any idea, please?










    share|improve this question
























      up vote
      1
      down vote

      favorite









      up vote
      1
      down vote

      favorite











      I have a list of n vectors. I would like to split it to sub-list where the number of the vectors at each list is different. The number of the vectors is increased sequentially from one list to another. For example,
      if I have a list with 6 vectors. Then, I would like to split it to several list as follows:



      The first list contains one vector. Then, the second list contains 2 vectors and so on. For example,



      Suppose I have the list x as follows:



      x <- list(x1=c(1,2,3), x2=c(1,4,3), x3=c(3,4,6), x4=c(4,8,4), x5=c(4,33,4), x6=c(9,6,7))


      Then, I would like to split it into 3 lists,



      list1 = x1
      list2 = list(x2, x3)
      list3 = list(x4,x5, x6)


      I have similar question (How to splitting a list of vectors to small lists in decreasing order in r) but in a decreasing order.



      How I can generate it to arbitrary number of vectors. For example, how if I have 10 or 20 vectors?



      Any idea, please?










      share|improve this question













      I have a list of n vectors. I would like to split it to sub-list where the number of the vectors at each list is different. The number of the vectors is increased sequentially from one list to another. For example,
      if I have a list with 6 vectors. Then, I would like to split it to several list as follows:



      The first list contains one vector. Then, the second list contains 2 vectors and so on. For example,



      Suppose I have the list x as follows:



      x <- list(x1=c(1,2,3), x2=c(1,4,3), x3=c(3,4,6), x4=c(4,8,4), x5=c(4,33,4), x6=c(9,6,7))


      Then, I would like to split it into 3 lists,



      list1 = x1
      list2 = list(x2, x3)
      list3 = list(x4,x5, x6)


      I have similar question (How to splitting a list of vectors to small lists in decreasing order in r) but in a decreasing order.



      How I can generate it to arbitrary number of vectors. For example, how if I have 10 or 20 vectors?



      Any idea, please?







      r






      share|improve this question













      share|improve this question











      share|improve this question




      share|improve this question










      asked Nov 12 at 6:00









      Maryam

      18211




      18211
























          2 Answers
          2






          active

          oldest

          votes

















          up vote
          3
          down vote



          accepted










          I'd stick them all in a list of lists



          MyLists <- list()
          i <- 1
          for (inc in 1:3){
          MyLists[[inc]] <- x[i:(i+inc-1)]
          i <- i+inc
          }


          Now MyLists[[1]] is list1, etc.






          share|improve this answer




























            up vote
            1
            down vote













            Building off farnsy's answer, If you need each list in a separate indexed list in the global environment you could do something like this.



            #your Stater list
            x <- list(x1=c(1,2,3), x2=c(1,4,3), x3=c(3,4,6),
            x4=c(4,8,4), x5=c(4,33,4), x6=c(9,6,7))


            #using a paste parse eval approach to evaluate a string
            i<-1
            for(inc in 1:3){
            eval(parse(text =
            paste0("list", inc, "<-list(",
            paste0("x$",names(x)[i:(i+inc-1)],collapse = ","),
            ")")
            ))

            i <- i+inc
            }





            share|improve this answer





















              Your Answer






              StackExchange.ifUsing("editor", function () {
              StackExchange.using("externalEditor", function () {
              StackExchange.using("snippets", function () {
              StackExchange.snippets.init();
              });
              });
              }, "code-snippets");

              StackExchange.ready(function() {
              var channelOptions = {
              tags: "".split(" "),
              id: "1"
              };
              initTagRenderer("".split(" "), "".split(" "), channelOptions);

              StackExchange.using("externalEditor", function() {
              // Have to fire editor after snippets, if snippets enabled
              if (StackExchange.settings.snippets.snippetsEnabled) {
              StackExchange.using("snippets", function() {
              createEditor();
              });
              }
              else {
              createEditor();
              }
              });

              function createEditor() {
              StackExchange.prepareEditor({
              heartbeatType: 'answer',
              convertImagesToLinks: true,
              noModals: true,
              showLowRepImageUploadWarning: true,
              reputationToPostImages: 10,
              bindNavPrevention: true,
              postfix: "",
              imageUploader: {
              brandingHtml: "Powered by u003ca class="icon-imgur-white" href="https://imgur.com/"u003eu003c/au003e",
              contentPolicyHtml: "User contributions licensed under u003ca href="https://creativecommons.org/licenses/by-sa/3.0/"u003ecc by-sa 3.0 with attribution requiredu003c/au003e u003ca href="https://stackoverflow.com/legal/content-policy"u003e(content policy)u003c/au003e",
              allowUrls: true
              },
              onDemand: true,
              discardSelector: ".discard-answer"
              ,immediatelyShowMarkdownHelp:true
              });


              }
              });














              draft saved

              draft discarded


















              StackExchange.ready(
              function () {
              StackExchange.openid.initPostLogin('.new-post-login', 'https%3a%2f%2fstackoverflow.com%2fquestions%2f53256599%2fhow-to-split-a-list-of-vectors-to-sub-lists-by-increasing-order%23new-answer', 'question_page');
              }
              );

              Post as a guest















              Required, but never shown

























              2 Answers
              2






              active

              oldest

              votes








              2 Answers
              2






              active

              oldest

              votes









              active

              oldest

              votes






              active

              oldest

              votes








              up vote
              3
              down vote



              accepted










              I'd stick them all in a list of lists



              MyLists <- list()
              i <- 1
              for (inc in 1:3){
              MyLists[[inc]] <- x[i:(i+inc-1)]
              i <- i+inc
              }


              Now MyLists[[1]] is list1, etc.






              share|improve this answer

























                up vote
                3
                down vote



                accepted










                I'd stick them all in a list of lists



                MyLists <- list()
                i <- 1
                for (inc in 1:3){
                MyLists[[inc]] <- x[i:(i+inc-1)]
                i <- i+inc
                }


                Now MyLists[[1]] is list1, etc.






                share|improve this answer























                  up vote
                  3
                  down vote



                  accepted







                  up vote
                  3
                  down vote



                  accepted






                  I'd stick them all in a list of lists



                  MyLists <- list()
                  i <- 1
                  for (inc in 1:3){
                  MyLists[[inc]] <- x[i:(i+inc-1)]
                  i <- i+inc
                  }


                  Now MyLists[[1]] is list1, etc.






                  share|improve this answer












                  I'd stick them all in a list of lists



                  MyLists <- list()
                  i <- 1
                  for (inc in 1:3){
                  MyLists[[inc]] <- x[i:(i+inc-1)]
                  i <- i+inc
                  }


                  Now MyLists[[1]] is list1, etc.







                  share|improve this answer












                  share|improve this answer



                  share|improve this answer










                  answered Nov 12 at 6:10









                  farnsy

                  1,5021317




                  1,5021317
























                      up vote
                      1
                      down vote













                      Building off farnsy's answer, If you need each list in a separate indexed list in the global environment you could do something like this.



                      #your Stater list
                      x <- list(x1=c(1,2,3), x2=c(1,4,3), x3=c(3,4,6),
                      x4=c(4,8,4), x5=c(4,33,4), x6=c(9,6,7))


                      #using a paste parse eval approach to evaluate a string
                      i<-1
                      for(inc in 1:3){
                      eval(parse(text =
                      paste0("list", inc, "<-list(",
                      paste0("x$",names(x)[i:(i+inc-1)],collapse = ","),
                      ")")
                      ))

                      i <- i+inc
                      }





                      share|improve this answer

























                        up vote
                        1
                        down vote













                        Building off farnsy's answer, If you need each list in a separate indexed list in the global environment you could do something like this.



                        #your Stater list
                        x <- list(x1=c(1,2,3), x2=c(1,4,3), x3=c(3,4,6),
                        x4=c(4,8,4), x5=c(4,33,4), x6=c(9,6,7))


                        #using a paste parse eval approach to evaluate a string
                        i<-1
                        for(inc in 1:3){
                        eval(parse(text =
                        paste0("list", inc, "<-list(",
                        paste0("x$",names(x)[i:(i+inc-1)],collapse = ","),
                        ")")
                        ))

                        i <- i+inc
                        }





                        share|improve this answer























                          up vote
                          1
                          down vote










                          up vote
                          1
                          down vote









                          Building off farnsy's answer, If you need each list in a separate indexed list in the global environment you could do something like this.



                          #your Stater list
                          x <- list(x1=c(1,2,3), x2=c(1,4,3), x3=c(3,4,6),
                          x4=c(4,8,4), x5=c(4,33,4), x6=c(9,6,7))


                          #using a paste parse eval approach to evaluate a string
                          i<-1
                          for(inc in 1:3){
                          eval(parse(text =
                          paste0("list", inc, "<-list(",
                          paste0("x$",names(x)[i:(i+inc-1)],collapse = ","),
                          ")")
                          ))

                          i <- i+inc
                          }





                          share|improve this answer












                          Building off farnsy's answer, If you need each list in a separate indexed list in the global environment you could do something like this.



                          #your Stater list
                          x <- list(x1=c(1,2,3), x2=c(1,4,3), x3=c(3,4,6),
                          x4=c(4,8,4), x5=c(4,33,4), x6=c(9,6,7))


                          #using a paste parse eval approach to evaluate a string
                          i<-1
                          for(inc in 1:3){
                          eval(parse(text =
                          paste0("list", inc, "<-list(",
                          paste0("x$",names(x)[i:(i+inc-1)],collapse = ","),
                          ")")
                          ))

                          i <- i+inc
                          }






                          share|improve this answer












                          share|improve this answer



                          share|improve this answer










                          answered Nov 12 at 7:14









                          Kgrey

                          1613




                          1613






























                              draft saved

                              draft discarded




















































                              Thanks for contributing an answer to Stack Overflow!


                              • Please be sure to answer the question. Provide details and share your research!

                              But avoid



                              • Asking for help, clarification, or responding to other answers.

                              • Making statements based on opinion; back them up with references or personal experience.


                              To learn more, see our tips on writing great answers.





                              Some of your past answers have not been well-received, and you're in danger of being blocked from answering.


                              Please pay close attention to the following guidance:


                              • Please be sure to answer the question. Provide details and share your research!

                              But avoid



                              • Asking for help, clarification, or responding to other answers.

                              • Making statements based on opinion; back them up with references or personal experience.


                              To learn more, see our tips on writing great answers.




                              draft saved


                              draft discarded














                              StackExchange.ready(
                              function () {
                              StackExchange.openid.initPostLogin('.new-post-login', 'https%3a%2f%2fstackoverflow.com%2fquestions%2f53256599%2fhow-to-split-a-list-of-vectors-to-sub-lists-by-increasing-order%23new-answer', 'question_page');
                              }
                              );

                              Post as a guest















                              Required, but never shown





















































                              Required, but never shown














                              Required, but never shown












                              Required, but never shown







                              Required, but never shown

































                              Required, but never shown














                              Required, but never shown












                              Required, but never shown







                              Required, but never shown







                              Popular posts from this blog

                              Bressuire

                              Vorschmack

                              Quarantine