How to leave only the following strings? Planned maintenance scheduled April 23, 2019 at 23:30 UTC (7:30pm US/Eastern) Announcing the arrival of Valued Associate #679: Cesar Manara Unicorn Meta Zoo #1: Why another podcast?How can I create a class of matrices programmatically?Manipulate excel file and plotHow do I partition a matrix?How to create a table of tables?Turn the following values into percentageHow to select the data in a given way?Reading CSV data from a streamHow to remove from the data the rows of with fixed number of elements?Padding lists for accurate plottingHow to remove the given columns and strings?

Lights are flickering on and off after accidentally bumping into light switch

What is the evidence that custom checks in Northern Ireland are going to result in violence?

Can gravitational waves pass through a black hole?

Etymology of 見舞い

What is the definining line between a helicopter and a drone a person can ride in?

Is Vivien of the Wilds + Wilderness Reclamation a competitive combo?

When speaking, how do you change your mind mid-sentence?

Why did Bronn offer to be Tyrion Lannister's champion in trial by combat?

What is the ongoing value of the Kanban board to the developers as opposed to management

Do chord progressions usually move by fifths?

Why did Israel vote against lifting the American embargo on Cuba?

Can a Knight grant Knighthood to another?

How to charge percentage of transaction cost?

Who can become a wight?

What could prevent concentrated local exploration?

What is the difference between 准时 and 按时?

Why doesn't the university give past final exams' answers?

Is it OK if I do not take the receipt in Germany?

Does using the Inspiration rules for character defects encourage My Guy Syndrome?

Why is ArcGIS Pro not symbolizing my entire range of values?

Marquee sign letters

How to ask rejected full-time candidates to apply to teach individual courses?

How do I deal with an erroneously large refund?

What helicopter has the most rotor blades?



How to leave only the following strings?



Planned maintenance scheduled April 23, 2019 at 23:30 UTC (7:30pm US/Eastern)
Announcing the arrival of Valued Associate #679: Cesar Manara
Unicorn Meta Zoo #1: Why another podcast?How can I create a class of matrices programmatically?Manipulate excel file and plotHow do I partition a matrix?How to create a table of tables?Turn the following values into percentageHow to select the data in a given way?Reading CSV data from a streamHow to remove from the data the rows of with fixed number of elements?Padding lists for accurate plottingHow to remove the given columns and strings?










2












$begingroup$


Consider a data having the form



data = 1,7,4,6,1,6,4,8,2,4,9,2,E,...,1,4,6,3,4,4,6,2,E,...,...


i.e., some number $n_1$ of rows followed by row $E,...$, then some number $n_2$ of rows followed by row $E,...$ and so on.



Could you please tell me how to leave only the last rows before $E,$, i.e. to obtain



subdata= 2,4,9,2,4,4,6,2,...?









share|improve this question









$endgroup$







  • 1




    $begingroup$
    e.g. SequenceCases[data, x_List, E, ___ :> x]
    $endgroup$
    – C. E.
    4 hours ago















2












$begingroup$


Consider a data having the form



data = 1,7,4,6,1,6,4,8,2,4,9,2,E,...,1,4,6,3,4,4,6,2,E,...,...


i.e., some number $n_1$ of rows followed by row $E,...$, then some number $n_2$ of rows followed by row $E,...$ and so on.



Could you please tell me how to leave only the last rows before $E,$, i.e. to obtain



subdata= 2,4,9,2,4,4,6,2,...?









share|improve this question









$endgroup$







  • 1




    $begingroup$
    e.g. SequenceCases[data, x_List, E, ___ :> x]
    $endgroup$
    – C. E.
    4 hours ago













2












2








2





$begingroup$


Consider a data having the form



data = 1,7,4,6,1,6,4,8,2,4,9,2,E,...,1,4,6,3,4,4,6,2,E,...,...


i.e., some number $n_1$ of rows followed by row $E,...$, then some number $n_2$ of rows followed by row $E,...$ and so on.



Could you please tell me how to leave only the last rows before $E,$, i.e. to obtain



subdata= 2,4,9,2,4,4,6,2,...?









share|improve this question









$endgroup$




Consider a data having the form



data = 1,7,4,6,1,6,4,8,2,4,9,2,E,...,1,4,6,3,4,4,6,2,E,...,...


i.e., some number $n_1$ of rows followed by row $E,...$, then some number $n_2$ of rows followed by row $E,...$ and so on.



Could you please tell me how to leave only the last rows before $E,$, i.e. to obtain



subdata= 2,4,9,2,4,4,6,2,...?






list-manipulation data






share|improve this question













share|improve this question











share|improve this question




share|improve this question










asked 4 hours ago









John TaylorJohn Taylor

787211




787211







  • 1




    $begingroup$
    e.g. SequenceCases[data, x_List, E, ___ :> x]
    $endgroup$
    – C. E.
    4 hours ago












  • 1




    $begingroup$
    e.g. SequenceCases[data, x_List, E, ___ :> x]
    $endgroup$
    – C. E.
    4 hours ago







1




1




$begingroup$
e.g. SequenceCases[data, x_List, E, ___ :> x]
$endgroup$
– C. E.
4 hours ago




$begingroup$
e.g. SequenceCases[data, x_List, E, ___ :> x]
$endgroup$
– C. E.
4 hours ago










2 Answers
2






active

oldest

votes


















2












$begingroup$

Try SequenceCases:



data = 1, 7, 4, 6, 1, 6, 4, 8, 2, 4, 9, 2, E, 1, 2, 3, 
1, 4, 6, 3, 4, 4, 6, 2, E, 4, 5, 6
SequenceCases[data, p_, E, ___ :> p]


yields



2, 4, 9, 2, 4, 4, 6, 2





share|improve this answer









$endgroup$




















    2












    $begingroup$

    The most idiomatic solution to this problem is, in my opinion, pattern matching (as Sakra has also answered):



    SequenceCases[data, x_List, E, ___ :> x]



    2, 4, 9, 2, 4, 4, 6, 2




    But the problem also lends itself to functional solutions, e.g.:



    pairs = Partition[data, 2, 1];
    If[#[[2, 1]] == E, #[[1]], Nothing] & /@ pairs



    2, 4, 9, 2, 4, 4, 6, 2




    Or in one go:



    BlockMap[If[#[[2, 1]] == E, #[[1]], Nothing] &, data, 2, 1]



    2, 4, 9, 2, 4, 4, 6, 2







    share|improve this answer











    $endgroup$













      Your Answer








      StackExchange.ready(function()
      var channelOptions =
      tags: "".split(" "),
      id: "387"
      ;
      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',
      autoActivateHeartbeat: false,
      convertImagesToLinks: false,
      noModals: true,
      showLowRepImageUploadWarning: true,
      reputationToPostImages: null,
      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%2fmathematica.stackexchange.com%2fquestions%2f195786%2fhow-to-leave-only-the-following-strings%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









      2












      $begingroup$

      Try SequenceCases:



      data = 1, 7, 4, 6, 1, 6, 4, 8, 2, 4, 9, 2, E, 1, 2, 3, 
      1, 4, 6, 3, 4, 4, 6, 2, E, 4, 5, 6
      SequenceCases[data, p_, E, ___ :> p]


      yields



      2, 4, 9, 2, 4, 4, 6, 2





      share|improve this answer









      $endgroup$

















        2












        $begingroup$

        Try SequenceCases:



        data = 1, 7, 4, 6, 1, 6, 4, 8, 2, 4, 9, 2, E, 1, 2, 3, 
        1, 4, 6, 3, 4, 4, 6, 2, E, 4, 5, 6
        SequenceCases[data, p_, E, ___ :> p]


        yields



        2, 4, 9, 2, 4, 4, 6, 2





        share|improve this answer









        $endgroup$















          2












          2








          2





          $begingroup$

          Try SequenceCases:



          data = 1, 7, 4, 6, 1, 6, 4, 8, 2, 4, 9, 2, E, 1, 2, 3, 
          1, 4, 6, 3, 4, 4, 6, 2, E, 4, 5, 6
          SequenceCases[data, p_, E, ___ :> p]


          yields



          2, 4, 9, 2, 4, 4, 6, 2





          share|improve this answer









          $endgroup$



          Try SequenceCases:



          data = 1, 7, 4, 6, 1, 6, 4, 8, 2, 4, 9, 2, E, 1, 2, 3, 
          1, 4, 6, 3, 4, 4, 6, 2, E, 4, 5, 6
          SequenceCases[data, p_, E, ___ :> p]


          yields



          2, 4, 9, 2, 4, 4, 6, 2






          share|improve this answer












          share|improve this answer



          share|improve this answer










          answered 4 hours ago









          sakrasakra

          2,8231429




          2,8231429





















              2












              $begingroup$

              The most idiomatic solution to this problem is, in my opinion, pattern matching (as Sakra has also answered):



              SequenceCases[data, x_List, E, ___ :> x]



              2, 4, 9, 2, 4, 4, 6, 2




              But the problem also lends itself to functional solutions, e.g.:



              pairs = Partition[data, 2, 1];
              If[#[[2, 1]] == E, #[[1]], Nothing] & /@ pairs



              2, 4, 9, 2, 4, 4, 6, 2




              Or in one go:



              BlockMap[If[#[[2, 1]] == E, #[[1]], Nothing] &, data, 2, 1]



              2, 4, 9, 2, 4, 4, 6, 2







              share|improve this answer











              $endgroup$

















                2












                $begingroup$

                The most idiomatic solution to this problem is, in my opinion, pattern matching (as Sakra has also answered):



                SequenceCases[data, x_List, E, ___ :> x]



                2, 4, 9, 2, 4, 4, 6, 2




                But the problem also lends itself to functional solutions, e.g.:



                pairs = Partition[data, 2, 1];
                If[#[[2, 1]] == E, #[[1]], Nothing] & /@ pairs



                2, 4, 9, 2, 4, 4, 6, 2




                Or in one go:



                BlockMap[If[#[[2, 1]] == E, #[[1]], Nothing] &, data, 2, 1]



                2, 4, 9, 2, 4, 4, 6, 2







                share|improve this answer











                $endgroup$















                  2












                  2








                  2





                  $begingroup$

                  The most idiomatic solution to this problem is, in my opinion, pattern matching (as Sakra has also answered):



                  SequenceCases[data, x_List, E, ___ :> x]



                  2, 4, 9, 2, 4, 4, 6, 2




                  But the problem also lends itself to functional solutions, e.g.:



                  pairs = Partition[data, 2, 1];
                  If[#[[2, 1]] == E, #[[1]], Nothing] & /@ pairs



                  2, 4, 9, 2, 4, 4, 6, 2




                  Or in one go:



                  BlockMap[If[#[[2, 1]] == E, #[[1]], Nothing] &, data, 2, 1]



                  2, 4, 9, 2, 4, 4, 6, 2







                  share|improve this answer











                  $endgroup$



                  The most idiomatic solution to this problem is, in my opinion, pattern matching (as Sakra has also answered):



                  SequenceCases[data, x_List, E, ___ :> x]



                  2, 4, 9, 2, 4, 4, 6, 2




                  But the problem also lends itself to functional solutions, e.g.:



                  pairs = Partition[data, 2, 1];
                  If[#[[2, 1]] == E, #[[1]], Nothing] & /@ pairs



                  2, 4, 9, 2, 4, 4, 6, 2




                  Or in one go:



                  BlockMap[If[#[[2, 1]] == E, #[[1]], Nothing] &, data, 2, 1]



                  2, 4, 9, 2, 4, 4, 6, 2








                  share|improve this answer














                  share|improve this answer



                  share|improve this answer








                  edited 2 hours ago

























                  answered 4 hours ago









                  C. E.C. E.

                  51.4k3101207




                  51.4k3101207



























                      draft saved

                      draft discarded
















































                      Thanks for contributing an answer to Mathematica Stack Exchange!


                      • 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.

                      Use MathJax to format equations. MathJax reference.


                      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%2fmathematica.stackexchange.com%2fquestions%2f195786%2fhow-to-leave-only-the-following-strings%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

                      На ростанях Змест Гісторыя напісання | Месца дзеяння | Час дзеяння | Назва | Праблематыка трылогіі | Аўтабіяграфічнасць | Трылогія ў тэатры і кіно | Пераклады | У культуры | Зноскі Літаратура | Спасылкі | НавігацыяДагледжаная версіяправерана1 зменаДагледжаная версіяправерана1 зменаАкадэмік МІЦКЕВІЧ Канстанцін Міхайлавіч (Якуб Колас) Прадмова М. І. Мушынскага, доктара філалагічных навук, члена-карэспандэнта Нацыянальнай акадэміі навук Рэспублікі Беларусь, прафесараНашаніўцы ў трылогіі Якуба Коласа «На ростанях»: вобразы і прататыпы125 лет Янке МавруКнижно-документальная выставка к 125-летию со дня рождения Якуба Коласа (1882—1956)Колас Якуб. Новая зямля (паэма), На ростанях (трылогія). Сулкоўскі Уладзімір. Радзіма Якуба Коласа (серыял жывапісных палотнаў)Вокладка кнігіІлюстрацыя М. С. БасалыгіНа ростаняхАўдыёверсія трылогііВ. Жолтак У Люсiнскай школе 1959

                      Францішак Багушэвіч Змест Сям'я | Біяграфія | Творчасць | Мова Багушэвіча | Ацэнкі дзейнасці | Цікавыя факты | Спадчына | Выбраная бібліяграфія | Ушанаванне памяці | У філатэліі | Зноскі | Літаратура | Спасылкі | НавігацыяЛяхоўскі У. Рупіўся дзеля Бога і людзей: Жыццёвы шлях Лявона Вітан-Дубейкаўскага // Вольскі і Памідораў з песняй пра немца Адвакат, паэт, народны заступнік Ашмянскі веснікВ Минске появится площадь Богушевича и улица Сырокомли, Белорусская деловая газета, 19 июля 2001 г.Айцец беларускай нацыянальнай ідэі паўстаў у бронзе Сяргей Аляксандравіч Адашкевіч (1918, Мінск). 80-я гады. Бюст «Францішак Багушэвіч».Яўген Мікалаевіч Ціхановіч. «Партрэт Францішка Багушэвіча»Мікола Мікалаевіч Купава. «Партрэт зачынальніка новай беларускай літаратуры Францішка Багушэвіча»Уладзімір Іванавіч Мелехаў. На помніку «Змагарам за родную мову» Барэльеф «Францішак Багушэвіч»Памяць пра Багушэвіча на Віленшчыне Страчаная сталіца. Беларускія шыльды на вуліцах Вільні«Krynica». Ideologia i przywódcy białoruskiego katolicyzmuФранцішак БагушэвічТворы на knihi.comТворы Францішка Багушэвіча на bellib.byСодаль Уладзімір. Францішак Багушэвіч на Лідчыне;Луцкевіч Антон. Жыцьцё і творчасьць Фр. Багушэвіча ў успамінах ягоных сучасьнікаў // Запісы Беларускага Навуковага таварыства. Вільня, 1938. Сшытак 1. С. 16-34.Большая российская1188761710000 0000 5537 633Xn9209310021619551927869394п

                      Беларусь Змест Назва Гісторыя Геаграфія Сімволіка Дзяржаўны лад Палітычныя партыі Міжнароднае становішча і знешняя палітыка Адміністрацыйны падзел Насельніцтва Эканоміка Культура і грамадства Сацыяльная сфера Узброеныя сілы Заўвагі Літаратура Спасылкі НавігацыяHGЯOiТоп-2011 г. (па версіі ej.by)Топ-2013 г. (па версіі ej.by)Топ-2016 г. (па версіі ej.by)Топ-2017 г. (па версіі ej.by)Нацыянальны статыстычны камітэт Рэспублікі БеларусьШчыльнасць насельніцтва па краінахhttp://naviny.by/rubrics/society/2011/09/16/ic_articles_116_175144/А. Калечыц, У. Ксяндзоў. Спробы засялення краю неандэртальскім чалавекам.І ў Менску былі мамантыА. Калечыц, У. Ксяндзоў. Старажытны каменны век (палеаліт). Першапачатковае засяленне тэрыторыіГ. Штыхаў. Балты і славяне ў VI—VIII стст.М. Клімаў. Полацкае княства ў IX—XI стст.Г. Штыхаў, В. Ляўко. Палітычная гісторыя Полацкай зямліГ. Штыхаў. Дзяржаўны лад у землях-княствахГ. Штыхаў. Дзяржаўны лад у землях-княствахБеларускія землі ў складзе Вялікага Княства ЛітоўскагаЛюблінская унія 1569 г."The Early Stages of Independence"Zapomniane prawdy25 гадоў таму было аб'яўлена, што Язэп Пілсудскі — беларус (фота)Наша вадаДакументы ЧАЭС: Забруджванне тэрыторыі Беларусі « ЧАЭС Зона адчужэнняСведения о политических партиях, зарегистрированных в Республике Беларусь // Министерство юстиции Республики БеларусьСтатыстычны бюлетэнь „Полаўзроставая структура насельніцтва Рэспублікі Беларусь на 1 студзеня 2012 года і сярэднегадовая колькасць насельніцтва за 2011 год“Индекс человеческого развития Беларуси — не было бы нижеБеларусь занимает первое место в СНГ по индексу развития с учетом гендерного факцёраНацыянальны статыстычны камітэт Рэспублікі БеларусьКанстытуцыя РБ. Артыкул 17Трансфармацыйныя задачы БеларусіВыйсце з крызісу — далейшае рэфармаванне Беларускі рубель — сусветны лідар па дэвальвацыяхПра змену коштаў у кастрычніку 2011 г.Бядней за беларусаў у СНД толькі таджыкіСярэдні заробак у верасні дасягнуў 2,26 мільёна рублёўЭканомікаГаласуем за ТОП-100 беларускай прозыСучасныя беларускія мастакіАрхитектура Беларуси BELARUS.BYА. Каханоўскі. Культура Беларусі ўсярэдзіне XVII—XVIII ст.Анталогія беларускай народнай песні, гуказапісы спеваўБеларускія Музычныя IнструментыБеларускі рок, які мы страцілі. Топ-10 гуртоў«Мясцовы час» — нязгаслая легенда беларускай рок-музыкіСЯРГЕЙ БУДКІН. МЫ НЯ ЗНАЕМ СВАЁЙ МУЗЫКІМ. А. Каладзінскі. НАРОДНЫ ТЭАТРМагнацкія культурныя цэнтрыПублічная дыскусія «Беларуская новая пьеса: без беларускай мовы ці беларуская?»Беларускія драматургі па-ранейшаму лепш ставяцца за мяжой, чым на радзіме«Працэс незалежнага кіно пайшоў, і дзяржаву турбуе яго непадкантрольнасць»Беларускія філосафы ў пошуках прасторыВсе идём в библиотекуАрхіваванаАб Нацыянальнай праграме даследавання і выкарыстання касмічнай прасторы ў мірных мэтах на 2008—2012 гадыУ космас — разам.У суседнім з Барысаўскім раёне пабудуюць Камандна-вымяральны пунктСвяты і абрады беларусаў«Мірныя бульбашы з малой краіны» — 5 непраўдзівых стэрэатыпаў пра БеларусьМ. Раманюк. Беларускае народнае адзеннеУ Беларусі скарачаецца колькасць злачынстваўЛукашэнка незадаволены мінскімі ўладамі Крадзяжы складаюць у Мінску каля 70% злачынстваў Узровень злачыннасці ў Мінскай вобласці — адзін з самых высокіх у краіне Генпракуратура аналізуе стан са злачыннасцю ў Беларусі па каэфіцыенце злачыннасці У Беларусі стабілізавалася крымінагеннае становішча, лічыць генпракурорЗамежнікі сталі здзяйсняць у Беларусі больш злачынстваўМУС Беларусі турбуе рост рэцыдыўнай злачыннасціЯ з ЖЭСа. Дазволіце вас абкрасці! Рэйтынг усіх службаў і падраздзяленняў ГУУС Мінгарвыканкама вырасАб КДБ РБГісторыя Аператыўна-аналітычнага цэнтра РБГісторыя ДКФРТаможняagentura.ruБеларусьBelarus.by — Афіцыйны сайт Рэспублікі БеларусьСайт урада БеларусіRadzima.org — Збор архітэктурных помнікаў, гісторыя Беларусі«Глобус Беларуси»Гербы и флаги БеларусиАсаблівасці каменнага веку на БеларусіА. Калечыц, У. Ксяндзоў. Старажытны каменны век (палеаліт). Першапачатковае засяленне тэрыторыіУ. Ксяндзоў. Сярэдні каменны век (мезаліт). Засяленне краю плямёнамі паляўнічых, рыбакоў і збіральнікаўА. Калечыц, М. Чарняўскі. Плямёны на тэрыторыі Беларусі ў новым каменным веку (неаліце)А. Калечыц, У. Ксяндзоў, М. Чарняўскі. Гаспадарчыя заняткі ў каменным векуЭ. Зайкоўскі. Духоўная культура ў каменным векуАсаблівасці бронзавага веку на БеларусіФарміраванне супольнасцей ранняга перыяду бронзавага векуФотографии БеларусиРоля беларускіх зямель ва ўтварэнні і ўмацаванні ВКЛВ. Фадзеева. З гісторыі развіцця беларускай народнай вышыўкіDMOZGran catalanaБольшая российскаяBritannica (анлайн)Швейцарскі гістарычны15325917611952699xDA123282154079143-90000 0001 2171 2080n9112870100577502ge128882171858027501086026362074122714179пппппп