Generate alternate saturday dates list within range in RGenerate graph in MatlabSpeeding up for-loop over a listCompute intersections of all combinations of vectors in a list of vectors in Rfinding names of un-named list elementsAchieve a dataframe from a dynamic list of listsGenerate sample of permuted sequences with non-repeating elementsReduce a number range to the shortest possible rootR function to generate predictions from ratingsR Function to Generate Predictions from Ratings and Save ResultsTransform wide dataset into “tidy-data” within R

Did arcade monitors have same pixel aspect ratio as TV sets?

copy and scale one figure (wheel)

Creature in Shazam mid-credits scene?

Longest common substring in linear time

How to implement a feedback to keep the DC gain at zero for this conceptual passive filter?

What is the evidence for the "tyranny of the majority problem" in a direct democracy context?

Should I stop contributing to retirement accounts?

Does a 'pending' US visa application constitute a denial?

What was this official D&D 3.5e Lovecraft-flavored rulebook?

Loading commands from file

Is there a working SACD iso player for Ubuntu?

GraphicsGrid with a Label for each Column and Row

How should I respond when I lied about my education and the company finds out through background check?

"Spoil" vs "Ruin"

If infinitesimal transformations commute why dont the generators of the Lorentz group commute?

Aragorn's "guise" in the Orthanc Stone

Energy measurement from position eigenstate

Multiplicative persistence

Is there a name for this algorithm to calculate the concentration of a mixture of two solutions containing the same solute?

Creepy dinosaur pc game identification

Why did the Mercure fail?

Melting point of aspirin, contradicting sources

How to indicate a cut out for a product window

Lowest total scrabble score



Generate alternate saturday dates list within range in R


Generate graph in MatlabSpeeding up for-loop over a listCompute intersections of all combinations of vectors in a list of vectors in Rfinding names of un-named list elementsAchieve a dataframe from a dynamic list of listsGenerate sample of permuted sequences with non-repeating elementsReduce a number range to the shortest possible rootR function to generate predictions from ratingsR Function to Generate Predictions from Ratings and Save ResultsTransform wide dataset into “tidy-data” within R













0












$begingroup$


library(tidyr)
d = seq(as.Date("2018-01-01"),Sys.Date()+365,by='day')
saturdayList = d[weekdays(d)=='Saturday']

altSaturdayList = data.frame(lapply(split(saturdayList, format(saturdayList, "%Y-%m")), function(x)
na.omit(x[c(2,4)])))

altSaturdayList = subset(gather(altSaturdayList),select = c(value))
HolidayList = rbind(HolidayList, setNames(altSaturdayList, "Holidays"))
HolidayList = rbind(HolidayList, setNames(as.data.frame(as.Date("2018-11-06")), "Holidays"))
HolidayList = arrange(unique(HolidayList),Holidays)

rm(d)
rm(saturdayList)
rm(altSaturdayList)


The above code generates a list of dates which contain 2nd and 4th saturday of every month within that date range.



As you can tell I have generated and deleted intermediate variables like d, saturdayList and altSaturdayList. I was wondering how I can make this code better and efficient?



I learned about %>% operator but I don't know how I can do it with no input.



Any tips to improve the code is welcomed. Thanks









share







New contributor




newguy is a new contributor to this site. Take care in asking for clarification, commenting, and answering.
Check out our Code of Conduct.







$endgroup$
















    0












    $begingroup$


    library(tidyr)
    d = seq(as.Date("2018-01-01"),Sys.Date()+365,by='day')
    saturdayList = d[weekdays(d)=='Saturday']

    altSaturdayList = data.frame(lapply(split(saturdayList, format(saturdayList, "%Y-%m")), function(x)
    na.omit(x[c(2,4)])))

    altSaturdayList = subset(gather(altSaturdayList),select = c(value))
    HolidayList = rbind(HolidayList, setNames(altSaturdayList, "Holidays"))
    HolidayList = rbind(HolidayList, setNames(as.data.frame(as.Date("2018-11-06")), "Holidays"))
    HolidayList = arrange(unique(HolidayList),Holidays)

    rm(d)
    rm(saturdayList)
    rm(altSaturdayList)


    The above code generates a list of dates which contain 2nd and 4th saturday of every month within that date range.



    As you can tell I have generated and deleted intermediate variables like d, saturdayList and altSaturdayList. I was wondering how I can make this code better and efficient?



    I learned about %>% operator but I don't know how I can do it with no input.



    Any tips to improve the code is welcomed. Thanks









    share







    New contributor




    newguy is a new contributor to this site. Take care in asking for clarification, commenting, and answering.
    Check out our Code of Conduct.







    $endgroup$














      0












      0








      0





      $begingroup$


      library(tidyr)
      d = seq(as.Date("2018-01-01"),Sys.Date()+365,by='day')
      saturdayList = d[weekdays(d)=='Saturday']

      altSaturdayList = data.frame(lapply(split(saturdayList, format(saturdayList, "%Y-%m")), function(x)
      na.omit(x[c(2,4)])))

      altSaturdayList = subset(gather(altSaturdayList),select = c(value))
      HolidayList = rbind(HolidayList, setNames(altSaturdayList, "Holidays"))
      HolidayList = rbind(HolidayList, setNames(as.data.frame(as.Date("2018-11-06")), "Holidays"))
      HolidayList = arrange(unique(HolidayList),Holidays)

      rm(d)
      rm(saturdayList)
      rm(altSaturdayList)


      The above code generates a list of dates which contain 2nd and 4th saturday of every month within that date range.



      As you can tell I have generated and deleted intermediate variables like d, saturdayList and altSaturdayList. I was wondering how I can make this code better and efficient?



      I learned about %>% operator but I don't know how I can do it with no input.



      Any tips to improve the code is welcomed. Thanks









      share







      New contributor




      newguy is a new contributor to this site. Take care in asking for clarification, commenting, and answering.
      Check out our Code of Conduct.







      $endgroup$




      library(tidyr)
      d = seq(as.Date("2018-01-01"),Sys.Date()+365,by='day')
      saturdayList = d[weekdays(d)=='Saturday']

      altSaturdayList = data.frame(lapply(split(saturdayList, format(saturdayList, "%Y-%m")), function(x)
      na.omit(x[c(2,4)])))

      altSaturdayList = subset(gather(altSaturdayList),select = c(value))
      HolidayList = rbind(HolidayList, setNames(altSaturdayList, "Holidays"))
      HolidayList = rbind(HolidayList, setNames(as.data.frame(as.Date("2018-11-06")), "Holidays"))
      HolidayList = arrange(unique(HolidayList),Holidays)

      rm(d)
      rm(saturdayList)
      rm(altSaturdayList)


      The above code generates a list of dates which contain 2nd and 4th saturday of every month within that date range.



      As you can tell I have generated and deleted intermediate variables like d, saturdayList and altSaturdayList. I was wondering how I can make this code better and efficient?



      I learned about %>% operator but I don't know how I can do it with no input.



      Any tips to improve the code is welcomed. Thanks







      memory-management r





      share







      New contributor




      newguy is a new contributor to this site. Take care in asking for clarification, commenting, and answering.
      Check out our Code of Conduct.










      share







      New contributor




      newguy is a new contributor to this site. Take care in asking for clarification, commenting, and answering.
      Check out our Code of Conduct.








      share



      share






      New contributor




      newguy is a new contributor to this site. Take care in asking for clarification, commenting, and answering.
      Check out our Code of Conduct.









      asked 6 mins ago









      newguynewguy

      1012




      1012




      New contributor




      newguy is a new contributor to this site. Take care in asking for clarification, commenting, and answering.
      Check out our Code of Conduct.





      New contributor





      newguy is a new contributor to this site. Take care in asking for clarification, commenting, and answering.
      Check out our Code of Conduct.






      newguy is a new contributor to this site. Take care in asking for clarification, commenting, and answering.
      Check out our Code of Conduct.




















          0






          active

          oldest

          votes











          Your Answer





          StackExchange.ifUsing("editor", function ()
          return StackExchange.using("mathjaxEditing", function ()
          StackExchange.MarkdownEditor.creationCallbacks.add(function (editor, postfix)
          StackExchange.mathjaxEditing.prepareWmdForMathJax(editor, postfix, [["\$", "\$"]]);
          );
          );
          , "mathjax-editing");

          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: "196"
          ;
          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
          );



          );






          newguy is a new contributor. Be nice, and check out our Code of Conduct.









          draft saved

          draft discarded


















          StackExchange.ready(
          function ()
          StackExchange.openid.initPostLogin('.new-post-login', 'https%3a%2f%2fcodereview.stackexchange.com%2fquestions%2f216092%2fgenerate-alternate-saturday-dates-list-within-range-in-r%23new-answer', 'question_page');

          );

          Post as a guest















          Required, but never shown

























          0






          active

          oldest

          votes








          0






          active

          oldest

          votes









          active

          oldest

          votes






          active

          oldest

          votes








          newguy is a new contributor. Be nice, and check out our Code of Conduct.









          draft saved

          draft discarded


















          newguy is a new contributor. Be nice, and check out our Code of Conduct.












          newguy is a new contributor. Be nice, and check out our Code of Conduct.











          newguy is a new contributor. Be nice, and check out our Code of Conduct.














          Thanks for contributing an answer to Code Review 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%2fcodereview.stackexchange.com%2fquestions%2f216092%2fgenerate-alternate-saturday-dates-list-within-range-in-r%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

          名間水力發電廠 目录 沿革 設施 鄰近設施 註釋 外部連結 导航菜单23°50′10″N 120°42′41″E / 23.83611°N 120.71139°E / 23.83611; 120.7113923°50′10″N 120°42′41″E / 23.83611°N 120.71139°E / 23.83611; 120.71139計畫概要原始内容臺灣第一座BOT 模式開發的水力發電廠-名間水力電廠名間水力發電廠 水利署首件BOT案原始内容《小檔案》名間電廠 首座BOT水力發電廠原始内容名間電廠BOT - 經濟部水利署中區水資源局

          Prove that NP is closed under karp reduction?Space(n) not closed under Karp reductions - what about NTime(n)?Class P is closed under rotation?Prove or disprove that $NL$ is closed under polynomial many-one reductions$mathbfNC_2$ is closed under log-space reductionOn Karp reductionwhen can I know if a class (complexity) is closed under reduction (cook/karp)Check if class $PSPACE$ is closed under polyonomially space reductionIs NPSPACE also closed under polynomial-time reduction and under log-space reduction?Prove PSPACE is closed under complement?Prove PSPACE is closed under union?

          Is my guitar’s action too high? Announcing the arrival of Valued Associate #679: Cesar Manara Planned maintenance scheduled April 23, 2019 at 23:30 UTC (7:30pm US/Eastern)Strings too stiff on a recently purchased acoustic guitar | Cort AD880CEIs the action of my guitar really high?Μy little finger is too weak to play guitarWith guitar, how long should I give my fingers to strengthen / callous?When playing a fret the guitar sounds mutedPlaying (Barre) chords up the guitar neckI think my guitar strings are wound too tight and I can't play barre chordsF barre chord on an SG guitarHow to find to the right strings of a barre chord by feel?High action on higher fret on my steel acoustic guitar