class: title-slide, left, top # RMarkdown: ## reproducible reporting ### Tom Mock, PhD • RStudio ### 2022-04-26 <svg aria-hidden="true" role="img" viewBox="0 0 496 512" style="height:1em;width:0.97em;vertical-align:-0.125em;margin-left:auto;margin-right:auto;font-size:inherit;fill:white;overflow:visible;position:relative;"><path d="M165.9 397.4c0 2-2.3 3.6-5.2 3.6-3.3.3-5.6-1.3-5.6-3.6 0-2 2.3-3.6 5.2-3.6 3-.3 5.6 1.3 5.6 3.6zm-31.1-4.5c-.7 2 1.3 4.3 4.3 4.9 2.6 1 5.6 0 6.2-2s-1.3-4.3-4.3-5.2c-2.6-.7-5.5.3-6.2 2.3zm44.2-1.7c-2.9.7-4.9 2.6-4.6 4.9.3 2 2.9 3.3 5.9 2.6 2.9-.7 4.9-2.6 4.6-4.6-.3-1.9-3-3.2-5.9-2.9zM244.8 8C106.1 8 0 113.3 0 252c0 110.9 69.8 205.8 169.5 239.2 12.8 2.3 17.3-5.6 17.3-12.1 0-6.2-.3-40.4-.3-61.4 0 0-70 15-84.7-29.8 0 0-11.4-29.1-27.8-36.6 0 0-22.9-15.7 1.6-15.4 0 0 24.9 2 38.6 25.8 21.9 38.6 58.6 27.5 72.9 20.9 2.3-16 8.8-27.1 16-33.7-55.9-6.2-112.3-14.3-112.3-110.5 0-27.5 7.6-41.3 23.6-58.9-2.6-6.5-11.1-33.3 2.6-67.9 20.9-6.5 69 27 69 27 20-5.6 41.5-8.5 62.8-8.5s42.8 2.9 62.8 8.5c0 0 48.1-33.6 69-27 13.7 34.7 5.2 61.4 2.6 67.9 16 17.7 25.8 31.5 25.8 58.9 0 96.5-58.9 104.2-114.8 110.5 9.2 7.9 17 22.9 17 46.4 0 33.7-.3 75.4-.3 83.6 0 6.5 4.6 14.4 17.3 12.1C428.2 457.8 496 362.9 496 252 496 113.3 383.5 8 244.8 8zM97.2 352.9c-1.3 1-1 3.3.7 5.2 1.6 1.6 3.9 2.3 5.2 1 1.3-1 1-3.3-.7-5.2-1.6-1.6-3.9-2.3-5.2-1zm-10.8-8.1c-.7 1.3.3 2.9 2.3 3.9 1.6 1 3.6.7 4.3-.7.7-1.3-.3-2.9-2.3-3.9-2-.6-3.6-.3-4.3.7zm32.4 35.6c-1.6 1.3-1 4.3 1.3 6.2 2.3 2.3 5.2 2.6 6.5 1 1.3-1.3.7-4.3-1.3-6.2-2.2-2.3-5.2-2.6-6.5-1zm-11.4-14.7c-1.6 1-1.6 3.6 0 5.9 1.6 2.3 4.3 3.3 5.6 2.3 1.6-1.3 1.6-3.9 0-6.2-1.4-2.3-4-3.3-5.6-2z"/></svg> [github.com/jthomasmock/rmd-nhs/](https://github.com/jthomasmock/rmd-nhs/tree/master/workshop) <svg aria-hidden="true" role="img" viewBox="0 0 512 512" style="height:1em;width:1em;vertical-align:-0.125em;margin-left:auto;margin-right:auto;font-size:inherit;fill:white;overflow:visible;position:relative;"><path d="M326.612 185.391c59.747 59.809 58.927 155.698.36 214.59-.11.12-.24.25-.36.37l-67.2 67.2c-59.27 59.27-155.699 59.262-214.96 0-59.27-59.26-59.27-155.7 0-214.96l37.106-37.106c9.84-9.84 26.786-3.3 27.294 10.606.648 17.722 3.826 35.527 9.69 52.721 1.986 5.822.567 12.262-3.783 16.612l-13.087 13.087c-28.026 28.026-28.905 73.66-1.155 101.96 28.024 28.579 74.086 28.749 102.325.51l67.2-67.19c28.191-28.191 28.073-73.757 0-101.83-3.701-3.694-7.429-6.564-10.341-8.569a16.037 16.037 0 0 1-6.947-12.606c-.396-10.567 3.348-21.456 11.698-29.806l21.054-21.055c5.521-5.521 14.182-6.199 20.584-1.731a152.482 152.482 0 0 1 20.522 17.197zM467.547 44.449c-59.261-59.262-155.69-59.27-214.96 0l-67.2 67.2c-.12.12-.25.25-.36.37-58.566 58.892-59.387 154.781.36 214.59a152.454 152.454 0 0 0 20.521 17.196c6.402 4.468 15.064 3.789 20.584-1.731l21.054-21.055c8.35-8.35 12.094-19.239 11.698-29.806a16.037 16.037 0 0 0-6.947-12.606c-2.912-2.005-6.64-4.875-10.341-8.569-28.073-28.073-28.191-73.639 0-101.83l67.2-67.19c28.239-28.239 74.3-28.069 102.325.51 27.75 28.3 26.872 73.934-1.155 101.96l-13.087 13.087c-4.35 4.35-5.769 10.79-3.783 16.612 5.864 17.194 9.042 34.999 9.69 52.721.509 13.906 17.454 20.446 27.294 10.606l37.106-37.106c59.271-59.259 59.271-155.699.001-214.959z"/></svg> [jthomasmock.github.io/rmd-nhs/index.html](https://jthomasmock.github.io/rmd-nhs/index.html) <span style='color:white;'>Slides released under</span> [CC-BY 2.0](https://creativecommons.org/licenses/by/2.0/)&nbsp;&nbsp;<svg aria-hidden="true" role="img" viewBox="0 0 496 512" style="height:1em;width:0.97em;vertical-align:-0.125em;margin-left:auto;margin-right:auto;font-size:inherit;fill:white;overflow:visible;position:relative;"><path d="M245.83 214.87l-33.22 17.28c-9.43-19.58-25.24-19.93-27.46-19.93-22.13 0-33.22 14.61-33.22 43.84 0 23.57 9.21 43.84 33.22 43.84 14.47 0 24.65-7.09 30.57-21.26l30.55 15.5c-6.17 11.51-25.69 38.98-65.1 38.98-22.6 0-73.96-10.32-73.96-77.05 0-58.69 43-77.06 72.63-77.06 30.72-.01 52.7 11.95 65.99 35.86zm143.05 0l-32.78 17.28c-9.5-19.77-25.72-19.93-27.9-19.93-22.14 0-33.22 14.61-33.22 43.84 0 23.55 9.23 43.84 33.22 43.84 14.45 0 24.65-7.09 30.54-21.26l31 15.5c-2.1 3.75-21.39 38.98-65.09 38.98-22.69 0-73.96-9.87-73.96-77.05 0-58.67 42.97-77.06 72.63-77.06 30.71-.01 52.58 11.95 65.56 35.86zM247.56 8.05C104.74 8.05 0 123.11 0 256.05c0 138.49 113.6 248 247.56 248 129.93 0 248.44-100.87 248.44-248 0-137.87-106.62-248-248.44-248zm.87 450.81c-112.54 0-203.7-93.04-203.7-202.81 0-105.42 85.43-203.27 203.72-203.27 112.53 0 202.82 89.46 202.82 203.26-.01 121.69-99.68 202.82-202.84 202.82z"/></svg><svg aria-hidden="true" role="img" viewBox="0 0 496 512" style="height:1em;width:0.97em;vertical-align:-0.125em;margin-left:auto;margin-right:auto;font-size:inherit;fill:white;overflow:visible;position:relative;"><path d="M314.9 194.4v101.4h-28.3v120.5h-77.1V295.9h-28.3V194.4c0-4.4 1.6-8.2 4.6-11.3 3.1-3.1 6.9-4.7 11.3-4.7H299c4.1 0 7.8 1.6 11.1 4.7 3.1 3.2 4.8 6.9 4.8 11.3zm-101.5-63.7c0-23.3 11.5-35 34.5-35s34.5 11.7 34.5 35c0 23-11.5 34.5-34.5 34.5s-34.5-11.5-34.5-34.5zM247.6 8C389.4 8 496 118.1 496 256c0 147.1-118.5 248-248.4 248C113.6 504 0 394.5 0 256 0 123.1 104.7 8 247.6 8zm.8 44.7C130.2 52.7 44.7 150.6 44.7 256c0 109.8 91.2 202.8 203.7 202.8 103.2 0 202.8-81.1 202.8-202.8.1-113.8-90.2-203.3-202.8-203.3z"/></svg> ] <div style = "position: absolute;top: -50px;right: -200px;"><img src="images/letters.png" alt="A collection of wooden letters loosely arranged. The letters are used for stamps." width="800"></img></div> <div style = "position: absolute;bottom: 5px;right:25px;font-size:8px;color:white;">Image Credit: Bruno Martins, unsplash.com/photos/OhJmwB4XWLE</div> --- layout: true <div class="my-footer"><span>jthomasmock.github.io/rmd-nhs/</span></div> --- # Resources ### Workshop materials: [on Github](https://github.com/jthomasmock/rmd-nhs/tree/master/workshop) ### Slides: [jthomasmock.github.io/rmd-nhs/](https://jthomasmock.github.io/rmd-nhs/) Some content adapted from superstar Dr. Alison Hill [CDC](https://www.apreshill.com/talk/2020-rmd4cdc/) & [R4Pharma](https://rmd4pharma.netlify.app/): CC-BY --- ### What is R Markdown? 1. ["An authoring framework for data science."](https://rmarkdown.rstudio.com/lesson-1.html) (✔️) 1. [A document format (.Rmd).](https://bookdown.org/yihui/rmarkdown/) (✔️) 1. [An R package named rmarkdown.](https://rmarkdown.rstudio.com/docs/) (✔️) 1. ["A file format for making dynamic documents with R."](https://rmarkdown.rstudio.com/articles_intro.html) (✔️) 1. ["A tool for integrating text, code, and results."](https://r4ds.had.co.nz/communicate-intro.html) (✔️) 1. ["A computational document."](http://radar.oreilly.com/2011/07/wolframs-computational-documen.html) (✔️) -- 1. Magic (🧙️) --- background-image: url("https://raw.githubusercontent.com/allisonhorst/stats-illustrations/master/rstats-artwork/rmarkdown_wizards.png") background-position: center background-size: contain --- ### Why RMarkdown? 1. Reproducibility -- 2. Re-usability -- 3. Extensibility -- 4. "Lazy" ability --- ### Change your mental model .pull-left[ #### Source <-> Output <img src="images/word.png" width="50%" /> ] -- .pull-right[ #### Source -> Output <img src="images/rmd-file.png" width="50%" /> ] --- ### R Markdown > R Markdown documents are fully reproducible. Use a productive notebook interface to weave together narrative text and code to produce elegantly formatted output. Use multiple languages including R, Python, and SQL. -- No more copy-paste, no more manually rebuilding analyses from disparate components, no more dread when the data is updated and you need to run an analysis. --- background-image: url("https://images.unsplash.com/4/madebyvadim.jpg?ixid=MnwxMjA3fDB8MHxwaG90by1wYWdlfHx8fGVufDB8fHx8&ixlib=rb-1.2.1&auto=format&fit=crop&w=1469&q=80") background-position: center background-size: fill class: center, middle -- <h1 style='color:black;background-color: rgba(255,255,255,0.75);padding:5px;line-height:2em;'>Ease of Use VS Full Details</h1> --- ### Pouring milk A straight-forward task - pour the boxed milk into the glass. -- .pull-left[ > Easy to use  ] -- .pull-right[ > Understanding the Full details  ] --- .pull-left[ ### Many [RMarkdown Formats](https://rmarkdown.rstudio.com/formats.html) <div id="zdrofucuzu" style="overflow-x:auto;overflow-y:auto;width:auto;height:auto;"> <style>@import url("https://fonts.googleapis.com/css2?family=Open+Sans:ital,wght@0,100;0,200;0,300;0,400;0,500;0,600;0,700;0,800;0,900;1,100;1,200;1,300;1,400;1,500;1,600;1,700;1,800;1,900&display=swap"); @import url("https://fonts.googleapis.com/css2?family=Fira+Mono:ital,wght@0,100;0,200;0,300;0,400;0,500;0,600;0,700;0,800;0,900;1,100;1,200;1,300;1,400;1,500;1,600;1,700;1,800;1,900&display=swap"); @import url("https://fonts.googleapis.com/css2?family=Source+Sans+Pro:ital,wght@0,100;0,200;0,300;0,400;0,500;0,600;0,700;0,800;0,900;1,100;1,200;1,300;1,400;1,500;1,600;1,700;1,800;1,900&display=swap"); @import url("https://fonts.googleapis.com/css2?family=Libre+Franklin:ital,wght@0,100;0,200;0,300;0,400;0,500;0,600;0,700;0,800;0,900;1,100;1,200;1,300;1,400;1,500;1,600;1,700;1,800;1,900&display=swap"); @import url("https://fonts.googleapis.com/css2?family=Source+Sans+Pro:ital,wght@0,100;0,200;0,300;0,400;0,500;0,600;0,700;0,800;0,900;1,100;1,200;1,300;1,400;1,500;1,600;1,700;1,800;1,900&display=swap"); html { font-family: 'Open Sans', -apple-system, BlinkMacSystemFont, 'Segoe UI', Roboto, Oxygen, Ubuntu, Cantarell, 'Helvetica Neue', 'Fira Sans', 'Droid Sans', Arial, sans-serif; } #zdrofucuzu .gt_table { display: table; border-collapse: collapse; margin-left: auto; margin-right: auto; color: #333333; font-size: 16px; font-weight: normal; font-style: none; background-color: #FFFFFF; width: auto; border-top-style: none; border-top-width: 2px; border-top-color: #A8A8A8; border-right-style: none; border-right-width: 2px; border-right-color: #D3D3D3; border-bottom-style: none; border-bottom-width: 2px; border-bottom-color: #A8A8A8; border-left-style: none; border-left-width: 2px; border-left-color: #D3D3D3; } #zdrofucuzu .gt_heading { background-color: #FFFFFF; text-align: left; border-bottom-color: #FFFFFF; border-left-style: none; border-left-width: 1px; border-left-color: #D3D3D3; border-right-style: none; border-right-width: 1px; border-right-color: #D3D3D3; } #zdrofucuzu .gt_title { color: #333333; font-size: 125%; font-weight: initial; padding-top: 4px; padding-bottom: 4px; padding-left: 5px; padding-right: 5px; border-bottom-color: #FFFFFF; border-bottom-width: 0; } #zdrofucuzu .gt_subtitle { color: #333333; font-size: 85%; font-weight: initial; padding-top: 0; padding-bottom: 6px; padding-left: 5px; padding-right: 5px; border-top-color: #FFFFFF; border-top-width: 0; } #zdrofucuzu .gt_bottom_border { border-bottom-style: none; border-bottom-width: 2px; border-bottom-color: #D3D3D3; } #zdrofucuzu .gt_col_headings { border-top-style: none; border-top-width: 2px; border-top-color: #D3D3D3; border-bottom-style: none; border-bottom-width: 1px; border-bottom-color: #334422; border-left-style: none; border-left-width: 1px; border-left-color: #D3D3D3; border-right-style: none; border-right-width: 1px; border-right-color: #D3D3D3; } #zdrofucuzu .gt_col_heading { color: #333333; background-color: #FFFFFF; font-size: 12px; font-weight: normal; text-transform: inherit; border-left-style: none; border-left-width: 1px; border-left-color: #D3D3D3; border-right-style: none; border-right-width: 1px; border-right-color: #D3D3D3; vertical-align: bottom; padding-top: 5px; padding-bottom: 6px; padding-left: 5px; padding-right: 5px; overflow-x: hidden; } #zdrofucuzu .gt_column_spanner_outer { color: #333333; background-color: #FFFFFF; font-size: 12px; font-weight: normal; text-transform: inherit; padding-top: 0; padding-bottom: 0; padding-left: 4px; padding-right: 4px; } #zdrofucuzu .gt_column_spanner_outer:first-child { padding-left: 0; } #zdrofucuzu .gt_column_spanner_outer:last-child { padding-right: 0; } #zdrofucuzu .gt_column_spanner { border-bottom-style: none; border-bottom-width: 1px; border-bottom-color: #334422; vertical-align: bottom; padding-top: 5px; padding-bottom: 5px; overflow-x: hidden; display: inline-block; width: 100%; } #zdrofucuzu .gt_group_heading { padding-top: 8px; padding-bottom: 8px; padding-left: 5px; padding-right: 5px; color: #333333; background-color: #FFFFFF; font-size: 100%; font-weight: initial; text-transform: inherit; border-top-style: none; border-top-width: 2px; border-top-color: #D3D3D3; border-bottom-style: none; border-bottom-width: 2px; border-bottom-color: #D3D3D3; border-left-style: none; border-left-width: 1px; border-left-color: #D3D3D3; border-right-style: none; border-right-width: 1px; border-right-color: #D3D3D3; vertical-align: middle; } #zdrofucuzu .gt_empty_group_heading { padding: 0.5px; color: #333333; background-color: #FFFFFF; font-size: 100%; font-weight: initial; border-top-style: none; border-top-width: 2px; border-top-color: #D3D3D3; border-bottom-style: none; border-bottom-width: 2px; border-bottom-color: #D3D3D3; vertical-align: middle; } #zdrofucuzu .gt_from_md > :first-child { margin-top: 0; } #zdrofucuzu .gt_from_md > :last-child { margin-bottom: 0; } #zdrofucuzu .gt_row { padding-top: 7px; padding-bottom: 7px; padding-left: 5px; padding-right: 5px; margin: 10px; border-top-style: none; border-top-width: 1px; border-top-color: #D3D3D3; border-left-style: none; border-left-width: 1px; border-left-color: #D3D3D3; border-right-style: none; border-right-width: 1px; border-right-color: #D3D3D3; vertical-align: middle; overflow-x: hidden; } #zdrofucuzu .gt_stub { color: #333333; background-color: #FFFFFF; font-size: 100%; font-weight: initial; text-transform: inherit; border-right-style: none; border-right-width: 2px; border-right-color: #D3D3D3; padding-left: 5px; padding-right: 5px; } #zdrofucuzu .gt_stub_row_group { color: #333333; background-color: #FFFFFF; font-size: 100%; font-weight: initial; text-transform: inherit; border-right-style: none; border-right-width: 2px; border-right-color: #D3D3D3; padding-left: 5px; padding-right: 5px; vertical-align: top; } #zdrofucuzu .gt_row_group_first td { border-top-width: 2px; } #zdrofucuzu .gt_summary_row { color: #333333; background-color: #FFFFFF; text-transform: inherit; padding-top: 8px; padding-bottom: 8px; padding-left: 5px; padding-right: 5px; } #zdrofucuzu .gt_first_summary_row { border-top-style: none; border-top-color: #D3D3D3; } #zdrofucuzu .gt_first_summary_row.thick { border-top-width: 2px; } #zdrofucuzu .gt_last_summary_row { padding-top: 8px; padding-bottom: 8px; padding-left: 5px; padding-right: 5px; border-bottom-style: none; border-bottom-width: 2px; border-bottom-color: #D3D3D3; } #zdrofucuzu .gt_grand_summary_row { color: #333333; background-color: #FFFFFF; text-transform: inherit; padding-top: 8px; padding-bottom: 8px; padding-left: 5px; padding-right: 5px; } #zdrofucuzu .gt_first_grand_summary_row { padding-top: 8px; padding-bottom: 8px; padding-left: 5px; padding-right: 5px; border-top-style: none; border-top-width: 6px; border-top-color: #D3D3D3; } #zdrofucuzu .gt_striped { background-color: rgba(128, 128, 128, 0.05); } #zdrofucuzu .gt_table_body { border-top-style: none; border-top-width: 2px; border-top-color: #D3D3D3; border-bottom-style: none; border-bottom-width: 2px; border-bottom-color: #FFFFFF; } #zdrofucuzu .gt_footnotes { color: #333333; background-color: #FFFFFF; border-bottom-style: none; border-bottom-width: 2px; border-bottom-color: #D3D3D3; border-left-style: none; border-left-width: 2px; border-left-color: #D3D3D3; border-right-style: none; border-right-width: 2px; border-right-color: #D3D3D3; } #zdrofucuzu .gt_footnote { margin: 0px; font-size: 90%; padding-left: 4px; padding-right: 4px; padding-left: 5px; padding-right: 5px; } #zdrofucuzu .gt_sourcenotes { color: #333333; background-color: #FFFFFF; border-bottom-style: none; border-bottom-width: 2px; border-bottom-color: #D3D3D3; border-left-style: none; border-left-width: 2px; border-left-color: #D3D3D3; border-right-style: none; border-right-width: 2px; border-right-color: #D3D3D3; } #zdrofucuzu .gt_sourcenote { font-size: 90%; padding-top: 4px; padding-bottom: 4px; padding-left: 5px; padding-right: 5px; } #zdrofucuzu .gt_left { text-align: left; } #zdrofucuzu .gt_center { text-align: center; } #zdrofucuzu .gt_right { text-align: right; font-variant-numeric: tabular-nums; } #zdrofucuzu .gt_font_normal { font-weight: normal; } #zdrofucuzu .gt_font_bold { font-weight: bold; } #zdrofucuzu .gt_font_italic { font-style: italic; } #zdrofucuzu .gt_super { font-size: 65%; } #zdrofucuzu .gt_two_val_uncert { display: inline-block; line-height: 1em; text-align: right; font-size: 60%; vertical-align: -0.25em; margin-left: 0.1em; } #zdrofucuzu .gt_footnote_marks { font-style: italic; font-weight: normal; font-size: 75%; vertical-align: 0.4em; } #zdrofucuzu .gt_asterisk { font-size: 100%; vertical-align: 0; } #zdrofucuzu .gt_slash_mark { font-size: 0.7em; line-height: 0.7em; vertical-align: 0.15em; } #zdrofucuzu .gt_fraction_numerator { font-size: 0.6em; line-height: 0.6em; vertical-align: 0.45em; } #zdrofucuzu .gt_fraction_denominator { font-size: 0.6em; line-height: 0.6em; vertical-align: -0.05em; } </style> <table class="gt_table"> <thead class="gt_col_headings"> <tr> <th class="gt_col_heading gt_columns_bottom_border gt_left" rowspan="1" colspan="1"></th> <th class="gt_col_heading gt_columns_bottom_border gt_left" rowspan="1" colspan="1" style="color: #A9A9A9; font-family: 'Source Sans Pro'; text-transform: uppercase;"></th> </tr> </thead> <tbody class="gt_table_body"> <tr class="gt_group_heading_row"> <td colspan="2" class="gt_group_heading" style="border-bottom-width: 3px; border-bottom-style: solid; border-bottom-color: black; color: #000000; font-weight: bold; background-color: #D3D3D3;">Documents</td> </tr> <tr class="gt_row_group_first"><td class="gt_row gt_right gt_stub" style="font-family: 'Fira Mono';"><a href ='https://bookdown.org/yihui/rmarkdown/notebook.html' style='text-decoration:none;' target='_blank'> Notebook</a></td> <td class="gt_row gt_left" style="font-family: 'Source Sans Pro'; font-weight: 400;">Interactive R Notebooks</td></tr> <tr><td class="gt_row gt_right gt_stub" style="font-family: 'Fira Mono';"><a href ='https://bookdown.org/yihui/rmarkdown/html-document.html' style='text-decoration:none;' target='_blank'> HTML</a></td> <td class="gt_row gt_left" style="font-family: 'Source Sans Pro'; font-weight: 400;">HTML document w/ Bootstrap CSS</td></tr> <tr><td class="gt_row gt_right gt_stub" style="font-family: 'Fira Mono';"><a href ='https://bookdown.org/yihui/rmarkdown/pdf-document.html' style='text-decoration:none;' target='_blank'> PDF</a></td> <td class="gt_row gt_left" style="font-family: 'Source Sans Pro'; font-weight: 400;">PDF document (via LaTeX template)</td></tr> <tr><td class="gt_row gt_right gt_stub" style="font-family: 'Fira Mono';"><a href ='https://bookdown.org/yihui/rmarkdown/word-document.html' style='text-decoration:none;' target='_blank'> Word</a></td> <td class="gt_row gt_left" style="font-family: 'Source Sans Pro'; font-weight: 400;">Microsoft Word document (docx)</td></tr> <tr><td class="gt_row gt_right gt_stub" style="font-family: 'Fira Mono';"><a href ='https://bookdown.org/yihui/rmarkdown/opendocument-text-document.html' style='text-decoration:none;' target='_blank'> ODT</a></td> <td class="gt_row gt_left" style="font-family: 'Source Sans Pro'; font-weight: 400;">OpenDocument Text document</td></tr> <tr><td class="gt_row gt_right gt_stub" style="font-family: 'Fira Mono';"><a href ='https://bookdown.org/yihui/rmarkdown/rich-text-format-document.html' style='text-decoration:none;' target='_blank'> RTF</a></td> <td class="gt_row gt_left" style="font-family: 'Source Sans Pro'; font-weight: 400;">Rich Text Format document</td></tr> <tr><td class="gt_row gt_right gt_stub" style="font-family: 'Fira Mono';"><a href ='https://bookdown.org/yihui/rmarkdown/markdown-document.html' style='text-decoration:none;' target='_blank'> Markdown</a></td> <td class="gt_row gt_left" style="font-family: 'Source Sans Pro'; font-weight: 400;">Markdown document (various flavors)</td></tr> <tr class="gt_group_heading_row"> <td colspan="2" class="gt_group_heading" style="border-bottom-width: 3px; border-bottom-style: solid; border-bottom-color: black; color: #000000; font-weight: bold; background-color: #D3D3D3;">Presentations</td> </tr> <tr class="gt_row_group_first"><td class="gt_row gt_right gt_stub" style="font-family: 'Fira Mono';"><a href ='https://bookdown.org/yihui/rmarkdown/ioslides-presentation.html' style='text-decoration:none;' target='_blank'> ioslides</a></td> <td class="gt_row gt_left" style="font-family: 'Source Sans Pro'; font-weight: 400;">HTML presentation with ioslides</td></tr> <tr><td class="gt_row gt_right gt_stub" style="font-family: 'Fira Mono';"><a href ='https://bookdown.org/yihui/rmarkdown/revealjs.html' style='text-decoration:none;' target='_blank'> reveal.js</a></td> <td class="gt_row gt_left" style="font-family: 'Source Sans Pro'; font-weight: 400;">HTML presentation with reveal.js</td></tr> <tr><td class="gt_row gt_right gt_stub" style="font-family: 'Fira Mono';"><a href ='https://bookdown.org/yihui/rmarkdown/slidy-presentation.html' style='text-decoration:none;' target='_blank'> Slidy</a></td> <td class="gt_row gt_left" style="font-family: 'Source Sans Pro'; font-weight: 400;">HTML presentation with W3C Slidy</td></tr> <tr><td class="gt_row gt_right gt_stub" style="font-family: 'Fira Mono';"><a href ='https://bookdown.org/yihui/rmarkdown/beamer-presentation.html' style='text-decoration:none;' target='_blank'> Beamer</a></td> <td class="gt_row gt_left" style="font-family: 'Source Sans Pro'; font-weight: 400;">PDF presentation with LaTeX Beamer</td></tr> <tr><td class="gt_row gt_right gt_stub" style="font-family: 'Fira Mono';"><a href ='https://bookdown.org/yihui/rmarkdown/powerpoint-presentation.html' style='text-decoration:none;' target='_blank'> PowerPoint</a></td> <td class="gt_row gt_left" style="font-family: 'Source Sans Pro'; font-weight: 400;">PowerPoint presentation</td></tr> </tbody> </table> </div> ] -- .pull-right[ <div id="viwrbzvubs" style="overflow-x:auto;overflow-y:auto;width:auto;height:auto;"> <style>@import url("https://fonts.googleapis.com/css2?family=Open+Sans:ital,wght@0,100;0,200;0,300;0,400;0,500;0,600;0,700;0,800;0,900;1,100;1,200;1,300;1,400;1,500;1,600;1,700;1,800;1,900&display=swap"); @import url("https://fonts.googleapis.com/css2?family=Fira+Mono:ital,wght@0,100;0,200;0,300;0,400;0,500;0,600;0,700;0,800;0,900;1,100;1,200;1,300;1,400;1,500;1,600;1,700;1,800;1,900&display=swap"); @import url("https://fonts.googleapis.com/css2?family=Source+Sans+Pro:ital,wght@0,100;0,200;0,300;0,400;0,500;0,600;0,700;0,800;0,900;1,100;1,200;1,300;1,400;1,500;1,600;1,700;1,800;1,900&display=swap"); @import url("https://fonts.googleapis.com/css2?family=Libre+Franklin:ital,wght@0,100;0,200;0,300;0,400;0,500;0,600;0,700;0,800;0,900;1,100;1,200;1,300;1,400;1,500;1,600;1,700;1,800;1,900&display=swap"); @import url("https://fonts.googleapis.com/css2?family=Source+Sans+Pro:ital,wght@0,100;0,200;0,300;0,400;0,500;0,600;0,700;0,800;0,900;1,100;1,200;1,300;1,400;1,500;1,600;1,700;1,800;1,900&display=swap"); html { font-family: 'Open Sans', -apple-system, BlinkMacSystemFont, 'Segoe UI', Roboto, Oxygen, Ubuntu, Cantarell, 'Helvetica Neue', 'Fira Sans', 'Droid Sans', Arial, sans-serif; } #viwrbzvubs .gt_table { display: table; border-collapse: collapse; margin-left: auto; margin-right: auto; color: #333333; font-size: 16px; font-weight: normal; font-style: none; background-color: #FFFFFF; width: auto; border-top-style: none; border-top-width: 2px; border-top-color: #A8A8A8; border-right-style: none; border-right-width: 2px; border-right-color: #D3D3D3; border-bottom-style: none; border-bottom-width: 2px; border-bottom-color: #A8A8A8; border-left-style: none; border-left-width: 2px; border-left-color: #D3D3D3; } #viwrbzvubs .gt_heading { background-color: #FFFFFF; text-align: left; border-bottom-color: #FFFFFF; border-left-style: none; border-left-width: 1px; border-left-color: #D3D3D3; border-right-style: none; border-right-width: 1px; border-right-color: #D3D3D3; } #viwrbzvubs .gt_title { color: #333333; font-size: 125%; font-weight: initial; padding-top: 4px; padding-bottom: 4px; padding-left: 5px; padding-right: 5px; border-bottom-color: #FFFFFF; border-bottom-width: 0; } #viwrbzvubs .gt_subtitle { color: #333333; font-size: 85%; font-weight: initial; padding-top: 0; padding-bottom: 6px; padding-left: 5px; padding-right: 5px; border-top-color: #FFFFFF; border-top-width: 0; } #viwrbzvubs .gt_bottom_border { border-bottom-style: none; border-bottom-width: 2px; border-bottom-color: #D3D3D3; } #viwrbzvubs .gt_col_headings { border-top-style: none; border-top-width: 2px; border-top-color: #D3D3D3; border-bottom-style: none; border-bottom-width: 1px; border-bottom-color: #334422; border-left-style: none; border-left-width: 1px; border-left-color: #D3D3D3; border-right-style: none; border-right-width: 1px; border-right-color: #D3D3D3; } #viwrbzvubs .gt_col_heading { color: #333333; background-color: #FFFFFF; font-size: 12px; font-weight: normal; text-transform: inherit; border-left-style: none; border-left-width: 1px; border-left-color: #D3D3D3; border-right-style: none; border-right-width: 1px; border-right-color: #D3D3D3; vertical-align: bottom; padding-top: 5px; padding-bottom: 6px; padding-left: 5px; padding-right: 5px; overflow-x: hidden; } #viwrbzvubs .gt_column_spanner_outer { color: #333333; background-color: #FFFFFF; font-size: 12px; font-weight: normal; text-transform: inherit; padding-top: 0; padding-bottom: 0; padding-left: 4px; padding-right: 4px; } #viwrbzvubs .gt_column_spanner_outer:first-child { padding-left: 0; } #viwrbzvubs .gt_column_spanner_outer:last-child { padding-right: 0; } #viwrbzvubs .gt_column_spanner { border-bottom-style: none; border-bottom-width: 1px; border-bottom-color: #334422; vertical-align: bottom; padding-top: 5px; padding-bottom: 5px; overflow-x: hidden; display: inline-block; width: 100%; } #viwrbzvubs .gt_group_heading { padding-top: 8px; padding-bottom: 8px; padding-left: 5px; padding-right: 5px; color: #333333; background-color: #FFFFFF; font-size: 100%; font-weight: initial; text-transform: inherit; border-top-style: none; border-top-width: 2px; border-top-color: #D3D3D3; border-bottom-style: none; border-bottom-width: 2px; border-bottom-color: #D3D3D3; border-left-style: none; border-left-width: 1px; border-left-color: #D3D3D3; border-right-style: none; border-right-width: 1px; border-right-color: #D3D3D3; vertical-align: middle; } #viwrbzvubs .gt_empty_group_heading { padding: 0.5px; color: #333333; background-color: #FFFFFF; font-size: 100%; font-weight: initial; border-top-style: none; border-top-width: 2px; border-top-color: #D3D3D3; border-bottom-style: none; border-bottom-width: 2px; border-bottom-color: #D3D3D3; vertical-align: middle; } #viwrbzvubs .gt_from_md > :first-child { margin-top: 0; } #viwrbzvubs .gt_from_md > :last-child { margin-bottom: 0; } #viwrbzvubs .gt_row { padding-top: 7px; padding-bottom: 7px; padding-left: 5px; padding-right: 5px; margin: 10px; border-top-style: none; border-top-width: 1px; border-top-color: #D3D3D3; border-left-style: none; border-left-width: 1px; border-left-color: #D3D3D3; border-right-style: none; border-right-width: 1px; border-right-color: #D3D3D3; vertical-align: middle; overflow-x: hidden; } #viwrbzvubs .gt_stub { color: #333333; background-color: #FFFFFF; font-size: 100%; font-weight: initial; text-transform: inherit; border-right-style: none; border-right-width: 2px; border-right-color: #D3D3D3; padding-left: 5px; padding-right: 5px; } #viwrbzvubs .gt_stub_row_group { color: #333333; background-color: #FFFFFF; font-size: 100%; font-weight: initial; text-transform: inherit; border-right-style: none; border-right-width: 2px; border-right-color: #D3D3D3; padding-left: 5px; padding-right: 5px; vertical-align: top; } #viwrbzvubs .gt_row_group_first td { border-top-width: 2px; } #viwrbzvubs .gt_summary_row { color: #333333; background-color: #FFFFFF; text-transform: inherit; padding-top: 8px; padding-bottom: 8px; padding-left: 5px; padding-right: 5px; } #viwrbzvubs .gt_first_summary_row { border-top-style: none; border-top-color: #D3D3D3; } #viwrbzvubs .gt_first_summary_row.thick { border-top-width: 2px; } #viwrbzvubs .gt_last_summary_row { padding-top: 8px; padding-bottom: 8px; padding-left: 5px; padding-right: 5px; border-bottom-style: none; border-bottom-width: 2px; border-bottom-color: #D3D3D3; } #viwrbzvubs .gt_grand_summary_row { color: #333333; background-color: #FFFFFF; text-transform: inherit; padding-top: 8px; padding-bottom: 8px; padding-left: 5px; padding-right: 5px; } #viwrbzvubs .gt_first_grand_summary_row { padding-top: 8px; padding-bottom: 8px; padding-left: 5px; padding-right: 5px; border-top-style: none; border-top-width: 6px; border-top-color: #D3D3D3; } #viwrbzvubs .gt_striped { background-color: rgba(128, 128, 128, 0.05); } #viwrbzvubs .gt_table_body { border-top-style: none; border-top-width: 2px; border-top-color: #D3D3D3; border-bottom-style: none; border-bottom-width: 2px; border-bottom-color: #FFFFFF; } #viwrbzvubs .gt_footnotes { color: #333333; background-color: #FFFFFF; border-bottom-style: none; border-bottom-width: 2px; border-bottom-color: #D3D3D3; border-left-style: none; border-left-width: 2px; border-left-color: #D3D3D3; border-right-style: none; border-right-width: 2px; border-right-color: #D3D3D3; } #viwrbzvubs .gt_footnote { margin: 0px; font-size: 90%; padding-left: 4px; padding-right: 4px; padding-left: 5px; padding-right: 5px; } #viwrbzvubs .gt_sourcenotes { color: #333333; background-color: #FFFFFF; border-bottom-style: none; border-bottom-width: 2px; border-bottom-color: #D3D3D3; border-left-style: none; border-left-width: 2px; border-left-color: #D3D3D3; border-right-style: none; border-right-width: 2px; border-right-color: #D3D3D3; } #viwrbzvubs .gt_sourcenote { font-size: 90%; padding-top: 4px; padding-bottom: 4px; padding-left: 5px; padding-right: 5px; } #viwrbzvubs .gt_left { text-align: left; } #viwrbzvubs .gt_center { text-align: center; } #viwrbzvubs .gt_right { text-align: right; font-variant-numeric: tabular-nums; } #viwrbzvubs .gt_font_normal { font-weight: normal; } #viwrbzvubs .gt_font_bold { font-weight: bold; } #viwrbzvubs .gt_font_italic { font-style: italic; } #viwrbzvubs .gt_super { font-size: 65%; } #viwrbzvubs .gt_two_val_uncert { display: inline-block; line-height: 1em; text-align: right; font-size: 60%; vertical-align: -0.25em; margin-left: 0.1em; } #viwrbzvubs .gt_footnote_marks { font-style: italic; font-weight: normal; font-size: 75%; vertical-align: 0.4em; } #viwrbzvubs .gt_asterisk { font-size: 100%; vertical-align: 0; } #viwrbzvubs .gt_slash_mark { font-size: 0.7em; line-height: 0.7em; vertical-align: 0.15em; } #viwrbzvubs .gt_fraction_numerator { font-size: 0.6em; line-height: 0.6em; vertical-align: 0.45em; } #viwrbzvubs .gt_fraction_denominator { font-size: 0.6em; line-height: 0.6em; vertical-align: -0.05em; } </style> <table class="gt_table"> <thead class="gt_col_headings"> <tr> <th class="gt_col_heading gt_columns_bottom_border gt_left" rowspan="1" colspan="1"></th> <th class="gt_col_heading gt_columns_bottom_border gt_left" rowspan="1" colspan="1" style="color: #A9A9A9; font-family: 'Source Sans Pro'; text-transform: uppercase;"></th> </tr> </thead> <tbody class="gt_table_body"> <tr class="gt_group_heading_row"> <td colspan="2" class="gt_group_heading" style="border-bottom-width: 3px; border-bottom-style: solid; border-bottom-color: black; color: #000000; font-weight: bold; background-color: #D3D3D3;">Journals</td> </tr> <tr class="gt_row_group_first"><td class="gt_row gt_right gt_stub" style="font-family: 'Fira Mono';"><a href ='https://rstudio.github.io/distill/' style='text-decoration:none;' target='_blank'> distill</a></td> <td class="gt_row gt_left" style="font-family: 'Source Sans Pro'; font-weight: 400;">Scientific and technical writing for the web</td></tr> <tr><td class="gt_row gt_right gt_stub" style="font-family: 'Fira Mono';"><a href ='https://github.com/rstudio/rticles' style='text-decoration:none;' target='_blank'> jss_article</a></td> <td class="gt_row gt_left" style="font-family: 'Source Sans Pro'; font-weight: 400;">Journal of Statistical Software (JSS)</td></tr> <tr><td class="gt_row gt_right gt_stub" style="font-family: 'Fira Mono';"><a href ='https://github.com/rstudio/rticles' style='text-decoration:none;' target='_blank'> acm_article</a></td> <td class="gt_row gt_left" style="font-family: 'Source Sans Pro'; font-weight: 400;">Association for Computing Machinery (ACM)</td></tr> <tr><td class="gt_row gt_right gt_stub" style="font-family: 'Fira Mono';"><a href ='https://github.com/rstudio/rticles' style='text-decoration:none;' target='_blank'> acs_article</a></td> <td class="gt_row gt_left" style="font-family: 'Source Sans Pro'; font-weight: 400;">American Chemical Society (ACS) Journal</td></tr> <tr><td class="gt_row gt_right gt_stub" style="font-family: 'Fira Mono';"><a href ='https://github.com/rstudio/rticles' style='text-decoration:none;' target='_blank'> ctex</a></td> <td class="gt_row gt_left" style="font-family: 'Source Sans Pro'; font-weight: 400;">Documents based on the LaTeX package ctex</td></tr> <tr><td class="gt_row gt_right gt_stub" style="font-family: 'Fira Mono';"><a href ='https://github.com/rstudio/rticles' style='text-decoration:none;' target='_blank'> elsevier_article</a></td> <td class="gt_row gt_left" style="font-family: 'Source Sans Pro'; font-weight: 400;">Submissions to Elsevier journals</td></tr> <tr class="gt_group_heading_row"> <td colspan="2" class="gt_group_heading" style="border-bottom-width: 3px; border-bottom-style: solid; border-bottom-color: black; color: #000000; font-weight: bold; background-color: #D3D3D3;">More</td> </tr> <tr class="gt_row_group_first"><td class="gt_row gt_right gt_stub" style="font-family: 'Fira Mono';"><a href ='flexdashboard/index.html' style='text-decoration:none;' target='_blank'> flexdashboard</a></td> <td class="gt_row gt_left" style="font-family: 'Source Sans Pro'; font-weight: 400;">Interactive dashboards</td></tr> <tr><td class="gt_row gt_right gt_stub" style="font-family: 'Fira Mono';"><a href ='https://bookdown.org' style='text-decoration:none;' target='_blank'> bookdown</a></td> <td class="gt_row gt_left" style="font-family: 'Source Sans Pro'; font-weight: 400;">HTML, PDF, ePub, and Kindle books</td></tr> <tr><td class="gt_row gt_right gt_stub" style="font-family: 'Fira Mono';"><a href ='https://bookdown.org/yihui/rmarkdown/rmarkdown-site.html' style='text-decoration:none;' target='_blank'> Websites</a></td> <td class="gt_row gt_left" style="font-family: 'Source Sans Pro'; font-weight: 400;">Multi-page websites</td></tr> <tr><td class="gt_row gt_right gt_stub" style="font-family: 'Fira Mono';"><a href ='https://bookdown.org/yihui/blogdown/' style='text-decoration:none;' target='_blank'> blogdown</a></td> <td class="gt_row gt_left" style="font-family: 'Source Sans Pro'; font-weight: 400;">Customizable websites and blogs</td></tr> <tr><td class="gt_row gt_right gt_stub" style="font-family: 'Fira Mono';"><a href ='https://pkgdown.r-lib.org/' style='text-decoration:none;' target='_blank'> pkgdown</a></td> <td class="gt_row gt_left" style="font-family: 'Source Sans Pro'; font-weight: 400;">Package documentation websites</td></tr> <tr><td class="gt_row gt_right gt_stub" style="font-family: 'Fira Mono';"><a href ='https://bookdown.org/yihui/rmarkdown/tufte-handouts.html' style='text-decoration:none;' target='_blank'> Tufte Handout</a></td> <td class="gt_row gt_left" style="font-family: 'Source Sans Pro'; font-weight: 400;">Handouts in the style of Edward Tufte</td></tr> <tr><td class="gt_row gt_right gt_stub" style="font-family: 'Fira Mono';"><a href ='https://bookdown.org/yihui/rmarkdown/r-package-vignette.html' style='text-decoration:none;' target='_blank'> Package Vignette</a></td> <td class="gt_row gt_left" style="font-family: 'Source Sans Pro'; font-weight: 400;">R package vignette (HTML)</td></tr> <tr><td class="gt_row gt_right gt_stub" style="font-family: 'Fira Mono';"><a href ='github_document_format.html' style='text-decoration:none;' target='_blank'> Github Document</a></td> <td class="gt_row gt_left" style="font-family: 'Source Sans Pro'; font-weight: 400;">GitHub Flavored Markdown document.</td></tr> </tbody> </table> </div> ] --- ### Anatomy of RMarkdown - Metadata (YAML) ``` --- output: html_document --- ``` -- - Code ````md ```{r basicExample, echo = TRUE} library(dplyr) mtcars %>% group_by(cyl) %>% summarize(n = n(), mean = mean(mpg)) ``` ```` -- - Text ``` # Heading 1 This is a sentence with some **bold text**, some *italic text* and an [image](image.png). ``` --- ### Metadata: YAML The [YAML](https://yaml.org/) metadata or header is: > processed in many stages of the rendering process and can influence the final document in many different ways. It is placed at the very beginning of the document and is read by each of Pandoc, rmarkdown, and knitr. Along the way, the information that it contains can affect the code, content, and the rendering process. - [RMarkdown Cookbook](https://bookdown.org/yihui/rmarkdown-cookbook/rmarkdown-anatomy.html) -- A generic YAML follows a pattern like the below: ``` --- key: value --- ``` Valid YAML requires 3 dashes `---` on either end, creating the YAML block, with `key` + `value` pairs assigned throughout. --- ### Metadata: YAML Specific metadata about the document and rendering options are included in this YAML header. Note that if you want to find out what type of options are available, you can run `?rmarkdown::html_document()` or `?rmarkdown::pdf_document()`, etc, to show the specific rendering options for _that_ specific output format. There is also a [`rmarkdown` `pkgdown` site](https://rmarkdown.rstudio.com/docs/reference/html_document.html), so you can explore specific options there as well. --- ### Output options ``` --- output: html_document --- ``` <img src="https://d33wubrfki0l68.cloudfront.net/aee91187a9c6811a802ddc524c3271302893a149/a7003/images/bandthree2.png" title="Image of the letter R slightly tilted, along with the various RMarkdown outputs scattered around it. It includes HTML logo, PDF, a report, a dashboard, Word, Tufte, ePUB, kindle and LATEX" alt="Image of the letter R slightly tilted, along with the various RMarkdown outputs scattered around it. It includes HTML logo, PDF, a report, a dashboard, Word, Tufte, ePUB, kindle and LATEX" width="30%" /> --- ### Specify output options in YAML .pull-left[ ``` --- title: My First RMarkdown Report author: Tom Mock output: html_document --- ``` ] --- ### Specify output options in YAML .pull-left[ ``` --- title: My First RMarkdown Report author: Tom Mock output: html_document --- ``` ``` --- title: My First RMarkdown Report author: Tom Mock output: html_document: toc: true toc_float: true theme: united code_download: true --- ``` ] -- .pull-right[ ``` --- title: My PDF RMarkdown Report author: Tom Mock output: pdf_document --- ``` ] --- ### Specify output options in YAML .pull-left[ ``` --- title: My First RMarkdown Report author: Tom Mock output: html_document --- ``` ``` --- title: My First RMarkdown Report author: Tom Mock output: html_document: toc: true toc_float: true theme: united code_download: true --- ``` ] .pull-right[ ``` --- title: My PDF RMarkdown Report author: Tom Mock output: pdf_document --- ``` ``` --- title: "My Presentation" subtitle: "made with xaringan" author: "Yihui Xie" date: "2021-10-30" output: xaringan --- ``` ] --- class: inverse, center, middle # Text --- ### Text and Markdown text * _Text_ is **human language** * _Markdown_ is **markup language** -- ``` * _Text_ is **human language** * _Markdown_ is **markup language** ``` -- You can read all about Markdown via the [Markdown guide](https://www.markdownguide.org/) or use the [`rmarkdown` cheat sheet](https://github.com/rstudio/cheatsheets/blob/master/rmarkdown-2.0.pdf)! --- ### Headings for splitting up your document .pull-left[ ``` # Header 1 ## Header 2 ### Header 3 #### Header 4 ``` ] -- .pull-right[ # Header 1 ## Header 2 ### Header 3 #### Header 4 ] --- ### Headings for splitting up your document <img src="images/rstudio-headers.png" width="65%" /> --- ### More than _just_ text You can inline R code, so that you can programatically generate specific components of the document. -- IE I can report that there are `r nrow(mtcars)` -- Which returns 32. -- These inline texts can be as complex or simple as you like, and can also return R objects. ```r car_rows <- glue::glue("There are {nrow(mtcars)} rows in the `mtcars` dataset.") ``` -- `r car_rows` -- There are 32 rows in the `mtcars` dataset. --- .pull-left[ ### More than _just_ text ``` Indeed, parents whose children are vaccinated no longer have to worry about their child's death or disability from: - whooping cough, - polio, - diphtheria, - hepatitis, or - a host of other infections. Vaccines are the most cost-effective health care interventions there are. We have three new, extremely effective vaccines to roll out in developing countries: 1. pneumonia 1. rotavirus 1. meningitis A ``` ] -- .pull-right[ Indeed, parents whose children are vaccinated no longer have to worry about their child's death or disability from: - whooping cough, - polio, - diphtheria, - hepatitis, or - a host of other infections. Vaccines are the most cost-effective health care interventions there are. We have three new, extremely effective vaccines to roll out in developing countries: 1. pneumonia 1. rotavirus 1. meningitis A ] --- ### Images .pull-left[ ```   ```  ] -- .pull-right[ ```r knitr::include_graphics("https://user-images.githubusercontent.com/163582/45438104-ea200600-b67b-11e8-80fa-d9f2a99a03b0.png") ``` <img src="https://user-images.githubusercontent.com/163582/45438104-ea200600-b67b-11e8-80fa-d9f2a99a03b0.png" width="30%" /> ] --- .pull-left[ ### RStudio 1.4 and beyond RStudio v1.4 (and future versions) include a visual markdown editing mode. Write code, text, and markdown. See the results in real time! ] .pull-right[ <img src="https://rstudio.github.io/visual-markdown-editing/images/visual-editing.png" title="A screenshot showing the conversion of markdown into it's formatted output inside the RStudio IDE" alt="A screenshot showing the conversion of markdown into it's formatted output inside the RStudio IDE" width="100%" style="display: block; margin: auto;" /> ] --- ### Visual Editor * The visual editor is more than _just_ the ability to see the output in real time. * It also provides "word processor" like formatting of text, math, and other capabilities! <img src="https://rstudio.github.io/visual-markdown-editing/images/visual-editing-math.png" title="A screenshot of a RMarkdown document inside the RStudio visual editor. It highlights the text processing abilities and shortcuts." alt="A screenshot of a RMarkdown document inside the RStudio visual editor. It highlights the text processing abilities and shortcuts." width="60%" style="display: block; margin: auto;" /> --- class: inverse, middle, center # Code chunks --- ### Code chunks Specified sections of the document that are used to evaluate code and optionally return outputs. .pull-left[ ````md ```{r, echo = FALSE} mtcars %>% distinct(cyl) ``` ```` ] -- .pull-right[ ```r mtcars %>% distinct(cyl) ``` ``` ## cyl ## Mazda RX4 6 ## Datsun 710 4 ## Hornet Sportabout 8 ``` ] --- ### Anatomy of a code chunk .pull-left[ ````md ```{r car-stuff, echo = FALSE} mtcars %>% distinct(cyl) ``` ```` ] -- .pull-right[ - Has 3x backticks on each end ```` ``` ```` - Place engine (`r` and chunk label `label`) between curly braces `{r label}` - Place options behind the label, after a comma: `{r label, option1=value}` ] --- ### Code chunks Code in a chunk auto print, unless saved to an object, which needs to be explicitly returned. ```r n_manufacturers <- n_distinct(gt::gtcars$mfr) ``` -- ```r n_manufacturers ``` ``` ## [1] 19 ``` -- ```r n_manufacturers <- n_distinct(gt::gtcars$mfr) n_manufacturers ``` ``` ## [1] 19 ``` --- ### Code chunks return more than just data .pull-left[ ```r car_data <- gt::gtcars %>% filter(!is.na(mpg_h)) %>% group_by(mfr) %>% summarise( mean_mpg = mean(mpg_h), n_models = n_distinct(model) ) %>% filter(n_models >= 2) %>% arrange(desc(n_models)) ``` ```r ggplot(car_data, aes(x = mean_mpg, y = fct_reorder(mfr, mean_mpg))) + geom_col() ``` ] -- .pull-right[ ```r ggplot(car_data, aes(x = mean_mpg, y = fct_reorder(mfr, mean_mpg))) + geom_col() ``` <!-- --> ] --- ### Code chunks return more than just data ```r car_data %>% gt::gt() ``` <div id="npgoqyxtwb" style="overflow-x:auto;overflow-y:auto;width:auto;height:auto;"> <style>html { font-family: -apple-system, BlinkMacSystemFont, 'Segoe UI', Roboto, Oxygen, Ubuntu, Cantarell, 'Helvetica Neue', 'Fira Sans', 'Droid Sans', Arial, sans-serif; } #npgoqyxtwb .gt_table { display: table; border-collapse: collapse; margin-left: auto; margin-right: auto; color: #333333; font-size: 16px; font-weight: normal; font-style: normal; background-color: #FFFFFF; width: auto; border-top-style: solid; border-top-width: 2px; border-top-color: #A8A8A8; border-right-style: none; border-right-width: 2px; border-right-color: #D3D3D3; border-bottom-style: solid; border-bottom-width: 2px; border-bottom-color: #A8A8A8; border-left-style: none; border-left-width: 2px; border-left-color: #D3D3D3; } #npgoqyxtwb .gt_heading { background-color: #FFFFFF; text-align: center; border-bottom-color: #FFFFFF; border-left-style: none; border-left-width: 1px; border-left-color: #D3D3D3; border-right-style: none; border-right-width: 1px; border-right-color: #D3D3D3; } #npgoqyxtwb .gt_title { color: #333333; font-size: 125%; font-weight: initial; padding-top: 4px; padding-bottom: 4px; padding-left: 5px; padding-right: 5px; border-bottom-color: #FFFFFF; border-bottom-width: 0; } #npgoqyxtwb .gt_subtitle { color: #333333; font-size: 85%; font-weight: initial; padding-top: 0; padding-bottom: 6px; padding-left: 5px; padding-right: 5px; border-top-color: #FFFFFF; border-top-width: 0; } #npgoqyxtwb .gt_bottom_border { border-bottom-style: solid; border-bottom-width: 2px; border-bottom-color: #D3D3D3; } #npgoqyxtwb .gt_col_headings { border-top-style: solid; border-top-width: 2px; border-top-color: #D3D3D3; border-bottom-style: solid; border-bottom-width: 2px; border-bottom-color: #D3D3D3; border-left-style: none; border-left-width: 1px; border-left-color: #D3D3D3; border-right-style: none; border-right-width: 1px; border-right-color: #D3D3D3; } #npgoqyxtwb .gt_col_heading { color: #333333; background-color: #FFFFFF; font-size: 100%; font-weight: normal; text-transform: inherit; border-left-style: none; border-left-width: 1px; border-left-color: #D3D3D3; border-right-style: none; border-right-width: 1px; border-right-color: #D3D3D3; vertical-align: bottom; padding-top: 5px; padding-bottom: 6px; padding-left: 5px; padding-right: 5px; overflow-x: hidden; } #npgoqyxtwb .gt_column_spanner_outer { color: #333333; background-color: #FFFFFF; font-size: 100%; font-weight: normal; text-transform: inherit; padding-top: 0; padding-bottom: 0; padding-left: 4px; padding-right: 4px; } #npgoqyxtwb .gt_column_spanner_outer:first-child { padding-left: 0; } #npgoqyxtwb .gt_column_spanner_outer:last-child { padding-right: 0; } #npgoqyxtwb .gt_column_spanner { border-bottom-style: solid; border-bottom-width: 2px; border-bottom-color: #D3D3D3; vertical-align: bottom; padding-top: 5px; padding-bottom: 5px; overflow-x: hidden; display: inline-block; width: 100%; } #npgoqyxtwb .gt_group_heading { padding-top: 8px; padding-bottom: 8px; padding-left: 5px; padding-right: 5px; color: #333333; background-color: #FFFFFF; font-size: 100%; font-weight: initial; text-transform: inherit; border-top-style: solid; border-top-width: 2px; border-top-color: #D3D3D3; border-bottom-style: solid; border-bottom-width: 2px; border-bottom-color: #D3D3D3; border-left-style: none; border-left-width: 1px; border-left-color: #D3D3D3; border-right-style: none; border-right-width: 1px; border-right-color: #D3D3D3; vertical-align: middle; } #npgoqyxtwb .gt_empty_group_heading { padding: 0.5px; color: #333333; background-color: #FFFFFF; font-size: 100%; font-weight: initial; border-top-style: solid; border-top-width: 2px; border-top-color: #D3D3D3; border-bottom-style: solid; border-bottom-width: 2px; border-bottom-color: #D3D3D3; vertical-align: middle; } #npgoqyxtwb .gt_from_md > :first-child { margin-top: 0; } #npgoqyxtwb .gt_from_md > :last-child { margin-bottom: 0; } #npgoqyxtwb .gt_row { padding-top: 8px; padding-bottom: 8px; padding-left: 5px; padding-right: 5px; margin: 10px; border-top-style: solid; border-top-width: 1px; border-top-color: #D3D3D3; border-left-style: none; border-left-width: 1px; border-left-color: #D3D3D3; border-right-style: none; border-right-width: 1px; border-right-color: #D3D3D3; vertical-align: middle; overflow-x: hidden; } #npgoqyxtwb .gt_stub { color: #333333; background-color: #FFFFFF; font-size: 100%; font-weight: initial; text-transform: inherit; border-right-style: solid; border-right-width: 2px; border-right-color: #D3D3D3; padding-left: 5px; padding-right: 5px; } #npgoqyxtwb .gt_stub_row_group { color: #333333; background-color: #FFFFFF; font-size: 100%; font-weight: initial; text-transform: inherit; border-right-style: solid; border-right-width: 2px; border-right-color: #D3D3D3; padding-left: 5px; padding-right: 5px; vertical-align: top; } #npgoqyxtwb .gt_row_group_first td { border-top-width: 2px; } #npgoqyxtwb .gt_summary_row { color: #333333; background-color: #FFFFFF; text-transform: inherit; padding-top: 8px; padding-bottom: 8px; padding-left: 5px; padding-right: 5px; } #npgoqyxtwb .gt_first_summary_row { border-top-style: solid; border-top-color: #D3D3D3; } #npgoqyxtwb .gt_first_summary_row.thick { border-top-width: 2px; } #npgoqyxtwb .gt_last_summary_row { padding-top: 8px; padding-bottom: 8px; padding-left: 5px; padding-right: 5px; border-bottom-style: solid; border-bottom-width: 2px; border-bottom-color: #D3D3D3; } #npgoqyxtwb .gt_grand_summary_row { color: #333333; background-color: #FFFFFF; text-transform: inherit; padding-top: 8px; padding-bottom: 8px; padding-left: 5px; padding-right: 5px; } #npgoqyxtwb .gt_first_grand_summary_row { padding-top: 8px; padding-bottom: 8px; padding-left: 5px; padding-right: 5px; border-top-style: double; border-top-width: 6px; border-top-color: #D3D3D3; } #npgoqyxtwb .gt_striped { background-color: rgba(128, 128, 128, 0.05); } #npgoqyxtwb .gt_table_body { border-top-style: solid; border-top-width: 2px; border-top-color: #D3D3D3; border-bottom-style: solid; border-bottom-width: 2px; border-bottom-color: #D3D3D3; } #npgoqyxtwb .gt_footnotes { color: #333333; background-color: #FFFFFF; border-bottom-style: none; border-bottom-width: 2px; border-bottom-color: #D3D3D3; border-left-style: none; border-left-width: 2px; border-left-color: #D3D3D3; border-right-style: none; border-right-width: 2px; border-right-color: #D3D3D3; } #npgoqyxtwb .gt_footnote { margin: 0px; font-size: 90%; padding-left: 4px; padding-right: 4px; padding-left: 5px; padding-right: 5px; } #npgoqyxtwb .gt_sourcenotes { color: #333333; background-color: #FFFFFF; border-bottom-style: none; border-bottom-width: 2px; border-bottom-color: #D3D3D3; border-left-style: none; border-left-width: 2px; border-left-color: #D3D3D3; border-right-style: none; border-right-width: 2px; border-right-color: #D3D3D3; } #npgoqyxtwb .gt_sourcenote { font-size: 90%; padding-top: 4px; padding-bottom: 4px; padding-left: 5px; padding-right: 5px; } #npgoqyxtwb .gt_left { text-align: left; } #npgoqyxtwb .gt_center { text-align: center; } #npgoqyxtwb .gt_right { text-align: right; font-variant-numeric: tabular-nums; } #npgoqyxtwb .gt_font_normal { font-weight: normal; } #npgoqyxtwb .gt_font_bold { font-weight: bold; } #npgoqyxtwb .gt_font_italic { font-style: italic; } #npgoqyxtwb .gt_super { font-size: 65%; } #npgoqyxtwb .gt_two_val_uncert { display: inline-block; line-height: 1em; text-align: right; font-size: 60%; vertical-align: -0.25em; margin-left: 0.1em; } #npgoqyxtwb .gt_footnote_marks { font-style: italic; font-weight: normal; font-size: 75%; vertical-align: 0.4em; } #npgoqyxtwb .gt_asterisk { font-size: 100%; vertical-align: 0; } #npgoqyxtwb .gt_slash_mark { font-size: 0.7em; line-height: 0.7em; vertical-align: 0.15em; } #npgoqyxtwb .gt_fraction_numerator { font-size: 0.6em; line-height: 0.6em; vertical-align: 0.45em; } #npgoqyxtwb .gt_fraction_denominator { font-size: 0.6em; line-height: 0.6em; vertical-align: -0.05em; } </style> <table class="gt_table"> <thead class="gt_col_headings"> <tr> <th class="gt_col_heading gt_columns_bottom_border gt_left" rowspan="1" colspan="1">mfr</th> <th class="gt_col_heading gt_columns_bottom_border gt_right" rowspan="1" colspan="1">mean_mpg</th> <th class="gt_col_heading gt_columns_bottom_border gt_right" rowspan="1" colspan="1">n_models</th> </tr> </thead> <tbody class="gt_table_body"> <tr><td class="gt_row gt_left">Ferrari</td> <td class="gt_row gt_right">17.88889</td> <td class="gt_row gt_right">9</td></tr> <tr><td class="gt_row gt_left">Audi</td> <td class="gt_row gt_right">24.80000</td> <td class="gt_row gt_right">5</td></tr> <tr><td class="gt_row gt_left">BMW</td> <td class="gt_row gt_right">25.40000</td> <td class="gt_row gt_right">5</td></tr> <tr><td class="gt_row gt_left">Aston Martin</td> <td class="gt_row gt_right">20.50000</td> <td class="gt_row gt_right">4</td></tr> <tr><td class="gt_row gt_left">Porsche</td> <td class="gt_row gt_right">28.25000</td> <td class="gt_row gt_right">4</td></tr> <tr><td class="gt_row gt_left">Lamborghini</td> <td class="gt_row gt_right">19.33333</td> <td class="gt_row gt_right">3</td></tr> <tr><td class="gt_row gt_left">Maserati</td> <td class="gt_row gt_right">22.66667</td> <td class="gt_row gt_right">3</td></tr> <tr><td class="gt_row gt_left">Mercedes-Benz</td> <td class="gt_row gt_right">24.50000</td> <td class="gt_row gt_right">2</td></tr> <tr><td class="gt_row gt_left">Rolls-Royce</td> <td class="gt_row gt_right">20.00000</td> <td class="gt_row gt_right">2</td></tr> </tbody> </table> </div> --- ### Code chunks are controllable There are many chunk options you can control via `knitr` (the package that provides core features of RMarkdown). Link to all the [`knitr` options](https://yihui.org/knitr/options/#code-chunk) -- .pull-left[ ````md ```{r, eval = FALSE} mtcars %>% distinct(cyl) ``` ```` ] -- .pull-right[ ```r # This won't return, because the # chunk is not evaluated # via eval = FALSE mtcars %>% distinct(cyl) ``` ] --- ### Code chunks are controllable Some examples | Option | Description | | ----------- | ----------- | | `fig.dim = c(4,6)` | Plots generated from this chunk will have a width of 4 and height of 6. | | `dpi = 150` | Plots generated will have a dots per inch (pixel density) of 150 | | `echo = FALSE` | Code will not be echoed (ie not shown) | | `eval = FALSE` | Nothing will be evaluated, but could still be printed | | `cache = TRUE` | Results will be cached, and chunk will not be run in subsequent renders, unless code is changed. | | `message = FALSE` | No messages will be printed | | `warning = FALSE` | No warnings will be printed | | `include = FALSE` | No ouputs/echo/messages/etc will be returned | --- ### Code chunks are controllable ````md ```{r, fig.dim = c(6,4), dpi=150} mtcars %>% count(cyl) %>% ggplot(aes(x = n, y = factor(cyl))) + geom_col() ``` ```` -- New to `knitr` v1.35, there's now support for in-chunk option setting via special chunk option comments (ie `#|`). Very useful for longer options (like `fig.cap` or `fig.alt`), for setting many chunks at once, or for logical statements. ````md ```{r} #| fig.dim = c(6,4), dpi = 150, #| fig.alt = "A simple barplot with the count of observations on the x-axis by the number of cylinders on the y-axis. There are 14 eight-cylinder cars, 7 six-cylinder cars, and 11 four-cylinder cars.\n ``` ```` --- ### Code chunks are controllable .pull-left[ Default plot, too big and "fuzzy" ```r mtcars %>% count(cyl) %>% ggplot(aes(x = n, y = factor(cyl))) + geom_col() ``` <!-- --> ] -- .pull-right[ opts set: `fig.dim = c(6,4)` and `dpi=150` ```r mtcars %>% count(cyl) %>% ggplot(aes(x = n, y = factor(cyl))) + geom_col() ``` <!-- --> ] --- ### Chunk options can be globally set ````md ```{r setup, include = FALSE} knitr::opts_chunk$set( echo = FALSE, fig.width = 6, dpi = 150 ) ``` ```` -- This is typically most useful in avoiding repeating yourself throughout a document and making the different components consistent between chunks without _having_ to manually set these for **EACH** chunk. --- ### Chunk option defaults .pull-left[ ```r str(knitr::opts_chunk$get()[1:27]) ``` ``` ## List of 27 ## $ eval : logi TRUE ## $ echo : logi TRUE ## $ results : chr "markup" ## $ tidy : logi FALSE ## $ tidy.opts : NULL ## $ collapse : logi FALSE ## $ prompt : logi FALSE ## $ comment : chr "##" ## $ highlight : logi TRUE ## $ size : chr "normalsize" ## $ background : chr "#F7F7F7" ## $ strip.white : 'AsIs' logi TRUE ## $ cache : logi FALSE ## $ cache.path : chr "index_cache/html/" ## $ cache.vars : NULL ## $ cache.lazy : logi TRUE ## $ dependson : NULL ## $ autodep : logi FALSE ## $ cache.rebuild: logi FALSE ## $ fig.keep : chr "high" ## $ fig.show : chr "asis" ## $ fig.align : chr "default" ## $ fig.path : chr "index_files/figure-html/" ## $ dev : chr "png" ## $ dev.args : NULL ## $ dpi : num 72 ## $ fig.ext : NULL ``` ] -- .pull-right[ ```r str(knitr::opts_chunk$get()[28:53]) ``` ``` ## List of 26 ## $ fig.width : num 7 ## $ fig.height: num 7 ## $ fig.env : chr "figure" ## $ fig.cap : NULL ## $ fig.scap : NULL ## $ fig.lp : chr "fig:" ## $ fig.subcap: NULL ## $ fig.pos : chr "" ## $ out.width : NULL ## $ out.height: NULL ## $ out.extra : NULL ## $ fig.retina: num 1 ## $ external : logi TRUE ## $ sanitize : logi FALSE ## $ interval : num 1 ## $ aniopts : chr "controls,loop" ## $ warning : logi TRUE ## $ error : logi FALSE ## $ message : logi TRUE ## $ render : NULL ## $ ref.label : NULL ## $ child : NULL ## $ engine : chr "R" ## $ split : logi FALSE ## $ include : logi TRUE ## $ purl : logi TRUE ``` ] --- ### Chunks can be named .pull-left[ * Useful for managing your longer documents (RStudio outline) <img src="images/chunk-outline.png" title="A screenshot of a RMarkdown document inside RStudio. The screenshot highlights the automatically generated document outline for each chunk name." alt="A screenshot of a RMarkdown document inside RStudio. The screenshot highlights the automatically generated document outline for each chunk name." width="80%" /> ] -- .pull-right[ * Useful for troubleshooting (ie _where_ is the document failing on render) ``` label: unnamed-chunk-23 |..............................| 83% ordinary text without R code |..............................| 85% label: unnamed-chunk-24 (with options) List of 2 $ fig.dim: num [1:2] 6 4 $ dpi : num 150 |..............................| 86% ordinary text without R code ``` ] --- ### Named chunks can be re-used! .pull-left[ ````md ```{r myPlt, eval = FALSE} ggplot(mtcars, aes(x = disp, y = mpg, color = factor(cyl))) + geom_point() ``` ```` Note that you when using **named chunks** you can't alter the internal code, only the chunk options. This is necessary because you are referencing the initially defined code in that chunk. ] -- .pull-right[ ````md ```{r myPlt, dpi=300,fig.dim=c(6,4)} ``` ```` <!-- --> ] --- <h2 style = 'text-align: center;'>Chunk names, good and bad</h2> .pull-left[ ### Good - `chunk` - `myChunk` - `my-chunk` - `mychunk1` ] -- .pull-right[ ### Bad (These _will_ fail) - `my_chunk` - `my chunk` ] --- ### The setup chunk .pull-left[ ````r ```{r setup, include=FALSE} knitr::opts_chunk$set( collapse = TRUE, comment = "#>", out.width = "100%" ) ``` ```` ] -- .pull-right[ - A special chunk label: `setup` - Typically the first chunk - All following chunks will use these options (i.e., sets global chunk options) - Tip: set `include=FALSE` - You can (and should) use individual chunk options too ] --- ### Chunks don't _have_ to be `R` .pull-left[ ```` ```{python} x = 42 * 2 print(x) ``` ```` ```` ```{bash} echo "Hello Bash!" cat flights1.csv flights2.csv > flights.csv ``` ```` ] -- .pull-right[ ```` ```{r} library(DBI) db = dbConnect(RSQLite::SQLite(), dbname = "sql.sqlite") ``` ```` ```` ```{sql, connection=db} SELECT * FROM trials ``` ```` ] --- ### Chunk language engines ```r names(knitr::knit_engines$get()) ``` ``` ## [1] "awk" "bash" "coffee" "gawk" "groovy" "haskell" ## [7] "lein" "mysql" "node" "octave" "perl" "psql" ## [13] "Rscript" "ruby" "sas" "scala" "sed" "sh" ## [19] "stata" "zsh" "asis" "asy" "block" "block2" ## [25] "bslib" "c" "cat" "cc" "comment" "css" ## [31] "ditaa" "dot" "embed" "exec" "fortran" "fortran95" ## [37] "go" "highlight" "js" "julia" "python" "R" ## [43] "Rcpp" "sass" "scss" "sql" "stan" "targets" ## [49] "tikz" "verbatim" "glue" "glue_sql" "gluesql" ``` --- class: center, middle # ⌛ # Time for a break! --- class: inverse, middle, center # Using `RMarkdown` --- ### Use an RStudio Project for your analysis! > One day you will need to quit R, go do something else and return to your analysis the next day. One day you will be working on multiple analyses simultaneously that all use R and you want to keep them separate. One day you will need to bring data from the outside world into R and send numerical results and figures from R back out into the world. To handle these real life situations, you need to make two decisions: > 1: What about your analysis is “real”, i.e. what will you save as your lasting record of what happened? > 2: Where does your analysis “live”? - [Hadley Wickham, R4DS](https://r4ds.had.co.nz/workflow-projects.html) -- `RStudio > New Project` - this gives you a lightweight environment for managing your data analysis code, data, and outputs, that can be shared across teams (ie via version control, shared drives, etc) -- Expanded in great detail in [R4DS](https://r4ds.had.co.nz/workflow-projects.html) --- ### RMarkdown rendering Rendering a RMarkdown doc is also called "knitting" as you are knitting all the components together. -- - You can use the RStudio button (Knit) - You can use `rmarkdown::render("file-name.rmd")` --- ### RMarkdown paths .pull-left[ RMarkdown starts in it's own directory. ``` #> tom/demo-project #> ├── analysis #> │ └── report.Rmd #> ├── data #> │ └── penguins.csv #> ├── demo-project.Rproj #> └── prepare #> └── penguins.R ``` ``` # inside report.Rmd getwd() #> [1] "Users/thomasmock/demo-project/analysis" ``` ] -- .pull-right[ Use the `here` package to reference files in other directories, as `here` references the project directory by default. ```r my_csv <- here::here("data", "penguins.csv") ``` ] -- - [RMarkdown + `here` vignette](https://cran.r-project.org/web/packages/here/vignettes/rmarkdown.html) - [Use `here` with RMarkdown + RStudio Projects](https://malco.io/2018/11/05/why-should-i-use-the-here-package-when-i-m-already-using-projects/) --- ### Creating a document In RStudio: - File > New RMarkdown - Cmd + Shift + P > `Create a new R Markdown document` - `rstudioapi::documentNew("---", type = "rmarkdown")` -- ### DEMO 💻 --- ### Insert new chunk - Click `+C` (Insert new chunk buttom) - Cmd + Shift + P > `Insert a new code chunk` - Command (or Cmd) `⌘` + Option (or Alt) `⌥` + `i` (Mac) - `Ctrl + Alt + i` (Windows/Linux) -- ### DEMO 💻 --- ### Anatomy of a RMarkdown in RStudio <img src="images/rmd-doc.png" width="40%" /> --- ### Anatomy of a RMarkdown in RStudio <img src="images/rmd-doc2.png" title="A screenshot of the RMarkdown bar inside RStudio" alt="A screenshot of the RMarkdown bar inside RStudio" width="80%" /> - Undo-redo buttons - Open in it's own Source window - Save - Automatically Knit/Render on save - Initiate spell checking - Find or Find and Replace --- ### Anatomy of a RMarkdown in RStudio .pull-left[  ] -- .pull-right[ - Knit to specific defaults (HTML, PDF, Word) - Knit with parameters - Knit directory controls - Clear knit cache (ie clear the outputs) ] --- ### Anatomy of a RMarkdown in RStudio .pull-left[ <img src="images/rmd-settings.png" title="Screenshot of the RMarkdown settings options in RStudio" alt="Screenshot of the RMarkdown settings options in RStudio" width="80%" /> ] -- .pull-right[ - Use Visual Editor Mode - Preview plots inline (ie Window) or in the RStudio Plot/Viewer pane - Preview outputs - Chunk output to R console or inline in notebook - Expand output/collapse output - Clear output for that chunk or globally - Output options ] --- ### Anatomy of a RMarkdown in RStudio .pull-left[ <img src="images/insert-chunk.png" title="Screenshot of the Insert code chunk menu in RStudio" alt="Screenshot of the Insert code chunk menu in RStudio" width="35%" /> - Insert specific languages (ie R, Bash, D3, Python, Rcpp, SQL, Stan) ] -- .pull-right[ <img src="images/rmd-run.png" title="Screenshot of the Run Rmarkdown menu in RStudio" alt="Screenshot of the Run Rmarkdown menu in RStudio" width="60%" /> - Run highlighted Line(s) - Run Current or Next Chunk - Select whether named `Setup` chunk should be run or automatically run - Run all Chunks ] --- ### Anatomy of a RMarkdown in RStudio  - Publish the document to RStudio Connect or RPubs.com - Open/Close the Document Outline - Toggle the Visual Editor mode --- ### Take-aways - ✔️ **Document your document**: use YAML to set up meaningful metadata - ✔️ **Style your document**: use YAML to add options to your chosen output format - ✔️ **Organize your text**: use markdown headers with `#` - ✔️ **Organize your code**: use `knitr` chunk labels - ✔️ **Style your text**: use markdown **bold**, _italics_, `-` bullets, and `1.` lists - ✔️ **Style your output**: use `knitr` chunk options ### 🧶 early, 🧶 often --- class: center, middle, inverse # Graphics --- .pull-left[  ] ### `ggplot2` .pull-right[ - [`ggplot2` package](https://ggplot2.tidyverse.org/) - [`ggplot2` cheatsheet](https://github.com/rstudio/cheatsheets/blob/main/data-visualization-2.1.pdf) - [`ggplot2` Book](https://ggplot2-book.org/) - [R4DS Visualization chapter](https://r4ds.had.co.nz/data-visualisation.html) - [Data Visualization - Healy](https://socviz.co/lookatdata.html#lookatdata) - [Fundamentals of Data Visualization - Wilke](https://clauswilke.com/dataviz/) - [Data Visualization Course - Heiss](https://datavizs21.classes.andrewheiss.com/) ] --- ### Some data ```r mockdata_all <- read_csv(here::here("data/mockdata.csv")) %>% mutate_at(vars(starts_with("ae_")), ~as.factor(.)) %>% mutate(fu_fct = fct_recode(as.factor(fu_stat), "Lived" = "1", "Died" = "2")) ``` ``` ## Rows: 1499 Columns: 25 ## ── Column specification ──────────────────────────────────────────────────────── ## Delimiter: "," ## chr (10): arm, sex, race, age_ord, site, country, ethnicity, name, first_nam... ## dbl (15): case, age, fu_time, fu_stat, ps, hgb, bmi, alk_phos, ast, mdqualit... ## ## ℹ Use `spec()` to retrieve the full column specification for this data. ## ℹ Specify the column types or set `show_col_types = FALSE` to quiet this message. ``` ```r mockdata <- mockdata_all %>% filter(!site == "Nur-Sultan") ``` --- ### Generate plots .pull-left[ ```r surv_days_plot <- ggplot(mockdata) + aes(x = fu_time, y=arm, fill = fu_fct, group = interaction(arm, fu_fct)) + ggridges::geom_density_ridges() + labs(x= "Survival Time in Days (Censored)", y= "Study Arm") + scale_fill_manual( values = c("lightgrey", "#5C5CFF"), breaks = c("Died", "Lived"), name = "Follow-up status:") + theme_minimal() + theme(legend.position = "top") surv_days_plot ``` ] -- .pull-right[ One plot, served many ways ``` ## Picking joint bandwidth of 147 ``` <!-- --> ] --- ### Control plots .pull-left[ - figure resolution - "quality" of the plot - defaults to 72/96 depending on format - DPI increases can improve the "quality", but also increase file size - figure size - The height, width - Controllable in several ways - figure captions and alt text - Captions are printed captions for the document - Alt text are embedded, used by screen readers for visually impaired ] -- .pull-right[ Also see: - [R4DS Figure Sizing](https://r4ds.had.co.nz/graphics-for-communication.html#figure-sizing) - [Working with images in RMD - Zev Ross](http://zevross.com/blog/2017/06/19/tips-and-tricks-for-working-with-images-and-figures-in-r-markdown-documents/) - [RMarkdown site](https://rmarkdown.rstudio.com/docs/articles/rmarkdown.html) ] --- ### Figure resolution .pull-left[ `{r, dpi = 72, fig.width = 5}` ``` ## Picking joint bandwidth of 147 ``` <!-- --> ] -- .pull-left[ `{r, dpi = 300, fig.width = 5}` ``` ## Picking joint bandwidth of 147 ``` <!-- --> ] --- ### Figure resolution .pull-left[ `{r, dpi = 72, fig.width = 4}` ``` ## Picking joint bandwidth of 147 ``` <!-- --> ] -- .pull-right[ `{r, fig.retina=3, fig.width=4}` ``` ## Picking joint bandwidth of 147 ``` <img src="index_files/figure-html/surv-plot-1.png" width="288" /> ] --- ### Figure size .pull-left[ `{r, fig.retina=2, fig.dim = c(5,3)}` ``` ## Picking joint bandwidth of 147 ``` <img src="index_files/figure-html/surv-plot-1.png" width="360" /> ] -- .pull-right[ `{r, fig.retina=2, fig.width=4}` ``` ## Picking joint bandwidth of 147 ``` <img src="index_files/figure-html/surv-plot-1.png" width="288" /> ] --- ### Figure size `{r, fig.retina=2, fig.dim=c(4,6)}` ``` ## Picking joint bandwidth of 147 ``` <img src="index_files/figure-html/surv-plot-1.png" width="288" /> --- ### Figure size `{r, fig.retina=2, fig.dim=c(8,6)}` ``` ## Picking joint bandwidth of 147 ``` <img src="index_files/figure-html/surv-plot-1.png" width="576" /> --- ### Arrange plots > The goal of [`patchwork`](https://patchwork.data-imaginist.com/) is to make it ridiculously simple to combine separate ggplots. ```r library(patchwork) p1 <- ggplot(mtcars) + geom_point(aes(mpg, disp)) p2 <- ggplot(mtcars) + geom_boxplot(aes(gear, disp, group = gear)) p1 + p2 ``` <!-- --> --- ### One plot, two plot .pull-left[ ```r age_histogram <- ggplot(mockdata, aes(age)) + geom_histogram(color = 'white', fill = "#5C5CFF", bins = 20) + labs(x = "Age", y = "Count") + scale_y_continuous( breaks = scales::pretty_breaks()) + theme_minimal() + geom_hline(yintercept = 0) ``` ] -- .pull-right[ ```r age_histogram ``` <!-- --> ] --- ### One plot, two plot ```r # using fig.dim=c(8,4), fig.retina=2 surv_days_plot + age_histogram ``` ``` ## Picking joint bandwidth of 147 ``` <img src="index_files/figure-html/unnamed-chunk-36-1.png" width="576" /> --- ### Labeled subplots ```r # using fig.dim=c(8,4), fig.retina=1 surv_days_plot + age_histogram + plot_annotation(tag_levels = "A") # can set the tagging ``` ``` ## Picking joint bandwidth of 147 ``` <!-- --> --- ### Labeled subplots ```r # using fig.dim=c(8,4), fig.retina=1 surv_days_plot + age_histogram + plot_annotation(tag_levels = "1") # can alter the tagging ``` ``` ## Picking joint bandwidth of 147 ``` <!-- --> --- ### Saving plots `fig.path` - an alternative to calling `ggsave()` over and over! -- <blockquote class="twitter-tweet"><p lang="en" dir="ltr">I would encourage a past Silvia to experiment with code chunk options like dev=c(&quot;png&quot;, &quot;pdf&quot;) and fig.path to streamline saving plots when knitting<br><br>Past Silvia used to specify these things using ggsave() lines after each ggplot, and that eventually became cumbersome ☺️</p>&mdash; Silvia Canelón (@spcanelon) <a href="https://twitter.com/spcanelon/status/1333888658022281218?ref_src=twsrc%5Etfw">December 1, 2020</a></blockquote> <script async src="https://platform.twitter.com/widgets.js" charset="utf-8"></script> --- ## A global `setup` chunk .pull-left[ ```` ```{r setup, include = FALSE} knitr::opts_chunk$set( warning = FALSE, message = FALSE, echo = FALSE, fig.retina = 2, fig.width = 6, fig.path = here::here("tom-figs/") ) ``` ```` ] -- .pull-right[ - No messages/warnings in my final report - No code returning, unless I explicitly override - High quality figures of a decent width - Save my figures out to a specific directory ] -- You should experiment with your "defaults" so that you have to minimally change the individual chunks. --- class: center, middle, inverse # Tables --- ### Tables Given the duration of this workshop, a deep dive on tables is out of scope. In short, depending on the output (HTML, PDF, Office) you'll likely lean on specific packages. You can always output tables as an image (ie `.png`) and embed like you would a plot, but note that you lose the accessible benefit of a table in that case. -- Great R packages for tables: - [`gt`](https://gt.rstudio.com/): Aiming to be a `grammar of tables`, as `ggplot2` is an implemementation of the `grammar of graphics`. - [`gtsummary`](https://www.danieldsjoberg.com/gtsummary/index.html): a great package for quickly summarizing data or common statistical outputs. - [`flextable`](https://ardata-fr.github.io/flextable-book/): flexible package for output, especially powerful in that it can output tables to Word/Powerpoint. - [`gtExtras`](https://jthomasmock.github.io/gtExtras/): my own package, primarily for embedding many data visualizations into `gt` tables. - [`kableExtra`](https://github.com/haozhu233/kableExtra): very stable and easy to use package for quickly creating tables in HTML/LaTeX (ie PDF). - [`bstfun`](http://www.danieldsjoberg.com/bstfun/index.html): A miscellaneous collection of functions to used by members of the Biostatistics Department at MSKCC --- ### `gtsummary` I am a huge fan of `gtsummary` and `gt`. `gtsummary` is especially powerful as it combines common tasks with rich support for outputs (Word, PDF, HTML). It is a wrapper around several packages with many additional capabilities built in. -- ```r library(gtsummary) library(tidyverse) library(survival) ``` --- ### Examples .pull-left[ ```r select(trial, trt, age, grade, response) %>% tbl_summary(by = trt) ``` ] -- .pull-right[ <div id="dwehuqfmam" style="overflow-x:auto;overflow-y:auto;width:auto;height:auto;"> <style>html { font-family: -apple-system, BlinkMacSystemFont, 'Segoe UI', Roboto, Oxygen, Ubuntu, Cantarell, 'Helvetica Neue', 'Fira Sans', 'Droid Sans', Arial, sans-serif; } #dwehuqfmam .gt_table { display: table; border-collapse: collapse; margin-left: auto; margin-right: auto; color: #333333; font-size: 16px; font-weight: normal; font-style: normal; background-color: #FFFFFF; width: auto; border-top-style: solid; border-top-width: 2px; border-top-color: #A8A8A8; border-right-style: none; border-right-width: 2px; border-right-color: #D3D3D3; border-bottom-style: solid; border-bottom-width: 2px; border-bottom-color: #A8A8A8; border-left-style: none; border-left-width: 2px; border-left-color: #D3D3D3; } #dwehuqfmam .gt_heading { background-color: #FFFFFF; text-align: center; border-bottom-color: #FFFFFF; border-left-style: none; border-left-width: 1px; border-left-color: #D3D3D3; border-right-style: none; border-right-width: 1px; border-right-color: #D3D3D3; } #dwehuqfmam .gt_title { color: #333333; font-size: 125%; font-weight: initial; padding-top: 4px; padding-bottom: 4px; padding-left: 5px; padding-right: 5px; border-bottom-color: #FFFFFF; border-bottom-width: 0; } #dwehuqfmam .gt_subtitle { color: #333333; font-size: 85%; font-weight: initial; padding-top: 0; padding-bottom: 6px; padding-left: 5px; padding-right: 5px; border-top-color: #FFFFFF; border-top-width: 0; } #dwehuqfmam .gt_bottom_border { border-bottom-style: solid; border-bottom-width: 2px; border-bottom-color: #D3D3D3; } #dwehuqfmam .gt_col_headings { border-top-style: solid; border-top-width: 2px; border-top-color: #D3D3D3; border-bottom-style: solid; border-bottom-width: 2px; border-bottom-color: #D3D3D3; border-left-style: none; border-left-width: 1px; border-left-color: #D3D3D3; border-right-style: none; border-right-width: 1px; border-right-color: #D3D3D3; } #dwehuqfmam .gt_col_heading { color: #333333; background-color: #FFFFFF; font-size: 100%; font-weight: normal; text-transform: inherit; border-left-style: none; border-left-width: 1px; border-left-color: #D3D3D3; border-right-style: none; border-right-width: 1px; border-right-color: #D3D3D3; vertical-align: bottom; padding-top: 5px; padding-bottom: 6px; padding-left: 5px; padding-right: 5px; overflow-x: hidden; } #dwehuqfmam .gt_column_spanner_outer { color: #333333; background-color: #FFFFFF; font-size: 100%; font-weight: normal; text-transform: inherit; padding-top: 0; padding-bottom: 0; padding-left: 4px; padding-right: 4px; } #dwehuqfmam .gt_column_spanner_outer:first-child { padding-left: 0; } #dwehuqfmam .gt_column_spanner_outer:last-child { padding-right: 0; } #dwehuqfmam .gt_column_spanner { border-bottom-style: solid; border-bottom-width: 2px; border-bottom-color: #D3D3D3; vertical-align: bottom; padding-top: 5px; padding-bottom: 5px; overflow-x: hidden; display: inline-block; width: 100%; } #dwehuqfmam .gt_group_heading { padding-top: 8px; padding-bottom: 8px; padding-left: 5px; padding-right: 5px; color: #333333; background-color: #FFFFFF; font-size: 100%; font-weight: initial; text-transform: inherit; border-top-style: solid; border-top-width: 2px; border-top-color: #D3D3D3; border-bottom-style: solid; border-bottom-width: 2px; border-bottom-color: #D3D3D3; border-left-style: none; border-left-width: 1px; border-left-color: #D3D3D3; border-right-style: none; border-right-width: 1px; border-right-color: #D3D3D3; vertical-align: middle; } #dwehuqfmam .gt_empty_group_heading { padding: 0.5px; color: #333333; background-color: #FFFFFF; font-size: 100%; font-weight: initial; border-top-style: solid; border-top-width: 2px; border-top-color: #D3D3D3; border-bottom-style: solid; border-bottom-width: 2px; border-bottom-color: #D3D3D3; vertical-align: middle; } #dwehuqfmam .gt_from_md > :first-child { margin-top: 0; } #dwehuqfmam .gt_from_md > :last-child { margin-bottom: 0; } #dwehuqfmam .gt_row { padding-top: 8px; padding-bottom: 8px; padding-left: 5px; padding-right: 5px; margin: 10px; border-top-style: solid; border-top-width: 1px; border-top-color: #D3D3D3; border-left-style: none; border-left-width: 1px; border-left-color: #D3D3D3; border-right-style: none; border-right-width: 1px; border-right-color: #D3D3D3; vertical-align: middle; overflow-x: hidden; } #dwehuqfmam .gt_stub { color: #333333; background-color: #FFFFFF; font-size: 100%; font-weight: initial; text-transform: inherit; border-right-style: solid; border-right-width: 2px; border-right-color: #D3D3D3; padding-left: 5px; padding-right: 5px; } #dwehuqfmam .gt_stub_row_group { color: #333333; background-color: #FFFFFF; font-size: 100%; font-weight: initial; text-transform: inherit; border-right-style: solid; border-right-width: 2px; border-right-color: #D3D3D3; padding-left: 5px; padding-right: 5px; vertical-align: top; } #dwehuqfmam .gt_row_group_first td { border-top-width: 2px; } #dwehuqfmam .gt_summary_row { color: #333333; background-color: #FFFFFF; text-transform: inherit; padding-top: 8px; padding-bottom: 8px; padding-left: 5px; padding-right: 5px; } #dwehuqfmam .gt_first_summary_row { border-top-style: solid; border-top-color: #D3D3D3; } #dwehuqfmam .gt_first_summary_row.thick { border-top-width: 2px; } #dwehuqfmam .gt_last_summary_row { padding-top: 8px; padding-bottom: 8px; padding-left: 5px; padding-right: 5px; border-bottom-style: solid; border-bottom-width: 2px; border-bottom-color: #D3D3D3; } #dwehuqfmam .gt_grand_summary_row { color: #333333; background-color: #FFFFFF; text-transform: inherit; padding-top: 8px; padding-bottom: 8px; padding-left: 5px; padding-right: 5px; } #dwehuqfmam .gt_first_grand_summary_row { padding-top: 8px; padding-bottom: 8px; padding-left: 5px; padding-right: 5px; border-top-style: double; border-top-width: 6px; border-top-color: #D3D3D3; } #dwehuqfmam .gt_striped { background-color: rgba(128, 128, 128, 0.05); } #dwehuqfmam .gt_table_body { border-top-style: solid; border-top-width: 2px; border-top-color: #D3D3D3; border-bottom-style: solid; border-bottom-width: 2px; border-bottom-color: #D3D3D3; } #dwehuqfmam .gt_footnotes { color: #333333; background-color: #FFFFFF; border-bottom-style: none; border-bottom-width: 2px; border-bottom-color: #D3D3D3; border-left-style: none; border-left-width: 2px; border-left-color: #D3D3D3; border-right-style: none; border-right-width: 2px; border-right-color: #D3D3D3; } #dwehuqfmam .gt_footnote { margin: 0px; font-size: 90%; padding-left: 4px; padding-right: 4px; padding-left: 5px; padding-right: 5px; } #dwehuqfmam .gt_sourcenotes { color: #333333; background-color: #FFFFFF; border-bottom-style: none; border-bottom-width: 2px; border-bottom-color: #D3D3D3; border-left-style: none; border-left-width: 2px; border-left-color: #D3D3D3; border-right-style: none; border-right-width: 2px; border-right-color: #D3D3D3; } #dwehuqfmam .gt_sourcenote { font-size: 90%; padding-top: 4px; padding-bottom: 4px; padding-left: 5px; padding-right: 5px; } #dwehuqfmam .gt_left { text-align: left; } #dwehuqfmam .gt_center { text-align: center; } #dwehuqfmam .gt_right { text-align: right; font-variant-numeric: tabular-nums; } #dwehuqfmam .gt_font_normal { font-weight: normal; } #dwehuqfmam .gt_font_bold { font-weight: bold; } #dwehuqfmam .gt_font_italic { font-style: italic; } #dwehuqfmam .gt_super { font-size: 65%; } #dwehuqfmam .gt_two_val_uncert { display: inline-block; line-height: 1em; text-align: right; font-size: 60%; vertical-align: -0.25em; margin-left: 0.1em; } #dwehuqfmam .gt_footnote_marks { font-style: italic; font-weight: normal; font-size: 75%; vertical-align: 0.4em; } #dwehuqfmam .gt_asterisk { font-size: 100%; vertical-align: 0; } #dwehuqfmam .gt_slash_mark { font-size: 0.7em; line-height: 0.7em; vertical-align: 0.15em; } #dwehuqfmam .gt_fraction_numerator { font-size: 0.6em; line-height: 0.6em; vertical-align: 0.45em; } #dwehuqfmam .gt_fraction_denominator { font-size: 0.6em; line-height: 0.6em; vertical-align: -0.05em; } </style> <table class="gt_table"> <thead class="gt_col_headings"> <tr> <th class="gt_col_heading gt_columns_bottom_border gt_left" rowspan="1" colspan="1"><strong>Characteristic</strong></th> <th class="gt_col_heading gt_columns_bottom_border gt_center" rowspan="1" colspan="1"><strong>Drug A</strong>, N = 98<sup class="gt_footnote_marks">1</sup></th> <th class="gt_col_heading gt_columns_bottom_border gt_center" rowspan="1" colspan="1"><strong>Drug B</strong>, N = 102<sup class="gt_footnote_marks">1</sup></th> </tr> </thead> <tbody class="gt_table_body"> <tr><td class="gt_row gt_left">Age</td> <td class="gt_row gt_center">46 (37, 59)</td> <td class="gt_row gt_center">48 (39, 56)</td></tr> <tr><td class="gt_row gt_left" style="text-align: left; text-indent: 10px;">Unknown</td> <td class="gt_row gt_center">7</td> <td class="gt_row gt_center">4</td></tr> <tr><td class="gt_row gt_left">Grade</td> <td class="gt_row gt_center"></td> <td class="gt_row gt_center"></td></tr> <tr><td class="gt_row gt_left" style="text-align: left; text-indent: 10px;">I</td> <td class="gt_row gt_center">35 (36%)</td> <td class="gt_row gt_center">33 (32%)</td></tr> <tr><td class="gt_row gt_left" style="text-align: left; text-indent: 10px;">II</td> <td class="gt_row gt_center">32 (33%)</td> <td class="gt_row gt_center">36 (35%)</td></tr> <tr><td class="gt_row gt_left" style="text-align: left; text-indent: 10px;">III</td> <td class="gt_row gt_center">31 (32%)</td> <td class="gt_row gt_center">33 (32%)</td></tr> <tr><td class="gt_row gt_left">Tumor Response</td> <td class="gt_row gt_center">28 (29%)</td> <td class="gt_row gt_center">33 (34%)</td></tr> <tr><td class="gt_row gt_left" style="text-align: left; text-indent: 10px;">Unknown</td> <td class="gt_row gt_center">3</td> <td class="gt_row gt_center">4</td></tr> </tbody> <tfoot class="gt_footnotes"> <tr> <td class="gt_footnote" colspan="3"><sup class="gt_footnote_marks">1</sup> Median (IQR); n (%)</td> </tr> </tfoot> </table> </div> ] --- ### `bstfun` adds some fun! My own package `gtExtras` can be used natively with `gt`, and Daniel has wrapped it to be supported in `gtsummary`! ```r library(gtsummary) select(trial, age, marker) %>% tbl_summary(missing = "no") %>% bstfun::add_sparkline() # brought in from gtExtras ``` <div id="htrirgldqz" style="overflow-x:auto;overflow-y:auto;width:auto;height:auto;"> <style>html { font-family: -apple-system, BlinkMacSystemFont, 'Segoe UI', Roboto, Oxygen, Ubuntu, Cantarell, 'Helvetica Neue', 'Fira Sans', 'Droid Sans', Arial, sans-serif; } #htrirgldqz .gt_table { display: table; border-collapse: collapse; margin-left: auto; margin-right: auto; color: #333333; font-size: 16px; font-weight: normal; font-style: normal; background-color: #FFFFFF; width: auto; border-top-style: solid; border-top-width: 2px; border-top-color: #A8A8A8; border-right-style: none; border-right-width: 2px; border-right-color: #D3D3D3; border-bottom-style: solid; border-bottom-width: 2px; border-bottom-color: #A8A8A8; border-left-style: none; border-left-width: 2px; border-left-color: #D3D3D3; } #htrirgldqz .gt_heading { background-color: #FFFFFF; text-align: center; border-bottom-color: #FFFFFF; border-left-style: none; border-left-width: 1px; border-left-color: #D3D3D3; border-right-style: none; border-right-width: 1px; border-right-color: #D3D3D3; } #htrirgldqz .gt_title { color: #333333; font-size: 125%; font-weight: initial; padding-top: 4px; padding-bottom: 4px; padding-left: 5px; padding-right: 5px; border-bottom-color: #FFFFFF; border-bottom-width: 0; } #htrirgldqz .gt_subtitle { color: #333333; font-size: 85%; font-weight: initial; padding-top: 0; padding-bottom: 6px; padding-left: 5px; padding-right: 5px; border-top-color: #FFFFFF; border-top-width: 0; } #htrirgldqz .gt_bottom_border { border-bottom-style: solid; border-bottom-width: 2px; border-bottom-color: #D3D3D3; } #htrirgldqz .gt_col_headings { border-top-style: solid; border-top-width: 2px; border-top-color: #D3D3D3; border-bottom-style: solid; border-bottom-width: 2px; border-bottom-color: #D3D3D3; border-left-style: none; border-left-width: 1px; border-left-color: #D3D3D3; border-right-style: none; border-right-width: 1px; border-right-color: #D3D3D3; } #htrirgldqz .gt_col_heading { color: #333333; background-color: #FFFFFF; font-size: 100%; font-weight: normal; text-transform: inherit; border-left-style: none; border-left-width: 1px; border-left-color: #D3D3D3; border-right-style: none; border-right-width: 1px; border-right-color: #D3D3D3; vertical-align: bottom; padding-top: 5px; padding-bottom: 6px; padding-left: 5px; padding-right: 5px; overflow-x: hidden; } #htrirgldqz .gt_column_spanner_outer { color: #333333; background-color: #FFFFFF; font-size: 100%; font-weight: normal; text-transform: inherit; padding-top: 0; padding-bottom: 0; padding-left: 4px; padding-right: 4px; } #htrirgldqz .gt_column_spanner_outer:first-child { padding-left: 0; } #htrirgldqz .gt_column_spanner_outer:last-child { padding-right: 0; } #htrirgldqz .gt_column_spanner { border-bottom-style: solid; border-bottom-width: 2px; border-bottom-color: #D3D3D3; vertical-align: bottom; padding-top: 5px; padding-bottom: 5px; overflow-x: hidden; display: inline-block; width: 100%; } #htrirgldqz .gt_group_heading { padding-top: 8px; padding-bottom: 8px; padding-left: 5px; padding-right: 5px; color: #333333; background-color: #FFFFFF; font-size: 100%; font-weight: initial; text-transform: inherit; border-top-style: solid; border-top-width: 2px; border-top-color: #D3D3D3; border-bottom-style: solid; border-bottom-width: 2px; border-bottom-color: #D3D3D3; border-left-style: none; border-left-width: 1px; border-left-color: #D3D3D3; border-right-style: none; border-right-width: 1px; border-right-color: #D3D3D3; vertical-align: middle; } #htrirgldqz .gt_empty_group_heading { padding: 0.5px; color: #333333; background-color: #FFFFFF; font-size: 100%; font-weight: initial; border-top-style: solid; border-top-width: 2px; border-top-color: #D3D3D3; border-bottom-style: solid; border-bottom-width: 2px; border-bottom-color: #D3D3D3; vertical-align: middle; } #htrirgldqz .gt_from_md > :first-child { margin-top: 0; } #htrirgldqz .gt_from_md > :last-child { margin-bottom: 0; } #htrirgldqz .gt_row { padding-top: 8px; padding-bottom: 8px; padding-left: 5px; padding-right: 5px; margin: 10px; border-top-style: solid; border-top-width: 1px; border-top-color: #D3D3D3; border-left-style: none; border-left-width: 1px; border-left-color: #D3D3D3; border-right-style: none; border-right-width: 1px; border-right-color: #D3D3D3; vertical-align: middle; overflow-x: hidden; } #htrirgldqz .gt_stub { color: #333333; background-color: #FFFFFF; font-size: 100%; font-weight: initial; text-transform: inherit; border-right-style: solid; border-right-width: 2px; border-right-color: #D3D3D3; padding-left: 5px; padding-right: 5px; } #htrirgldqz .gt_stub_row_group { color: #333333; background-color: #FFFFFF; font-size: 100%; font-weight: initial; text-transform: inherit; border-right-style: solid; border-right-width: 2px; border-right-color: #D3D3D3; padding-left: 5px; padding-right: 5px; vertical-align: top; } #htrirgldqz .gt_row_group_first td { border-top-width: 2px; } #htrirgldqz .gt_summary_row { color: #333333; background-color: #FFFFFF; text-transform: inherit; padding-top: 8px; padding-bottom: 8px; padding-left: 5px; padding-right: 5px; } #htrirgldqz .gt_first_summary_row { border-top-style: solid; border-top-color: #D3D3D3; } #htrirgldqz .gt_first_summary_row.thick { border-top-width: 2px; } #htrirgldqz .gt_last_summary_row { padding-top: 8px; padding-bottom: 8px; padding-left: 5px; padding-right: 5px; border-bottom-style: solid; border-bottom-width: 2px; border-bottom-color: #D3D3D3; } #htrirgldqz .gt_grand_summary_row { color: #333333; background-color: #FFFFFF; text-transform: inherit; padding-top: 8px; padding-bottom: 8px; padding-left: 5px; padding-right: 5px; } #htrirgldqz .gt_first_grand_summary_row { padding-top: 8px; padding-bottom: 8px; padding-left: 5px; padding-right: 5px; border-top-style: double; border-top-width: 6px; border-top-color: #D3D3D3; } #htrirgldqz .gt_striped { background-color: rgba(128, 128, 128, 0.05); } #htrirgldqz .gt_table_body { border-top-style: solid; border-top-width: 2px; border-top-color: #D3D3D3; border-bottom-style: solid; border-bottom-width: 2px; border-bottom-color: #D3D3D3; } #htrirgldqz .gt_footnotes { color: #333333; background-color: #FFFFFF; border-bottom-style: none; border-bottom-width: 2px; border-bottom-color: #D3D3D3; border-left-style: none; border-left-width: 2px; border-left-color: #D3D3D3; border-right-style: none; border-right-width: 2px; border-right-color: #D3D3D3; } #htrirgldqz .gt_footnote { margin: 0px; font-size: 90%; padding-left: 4px; padding-right: 4px; padding-left: 5px; padding-right: 5px; } #htrirgldqz .gt_sourcenotes { color: #333333; background-color: #FFFFFF; border-bottom-style: none; border-bottom-width: 2px; border-bottom-color: #D3D3D3; border-left-style: none; border-left-width: 2px; border-left-color: #D3D3D3; border-right-style: none; border-right-width: 2px; border-right-color: #D3D3D3; } #htrirgldqz .gt_sourcenote { font-size: 90%; padding-top: 4px; padding-bottom: 4px; padding-left: 5px; padding-right: 5px; } #htrirgldqz .gt_left { text-align: left; } #htrirgldqz .gt_center { text-align: center; } #htrirgldqz .gt_right { text-align: right; font-variant-numeric: tabular-nums; } #htrirgldqz .gt_font_normal { font-weight: normal; } #htrirgldqz .gt_font_bold { font-weight: bold; } #htrirgldqz .gt_font_italic { font-style: italic; } #htrirgldqz .gt_super { font-size: 65%; } #htrirgldqz .gt_two_val_uncert { display: inline-block; line-height: 1em; text-align: right; font-size: 60%; vertical-align: -0.25em; margin-left: 0.1em; } #htrirgldqz .gt_footnote_marks { font-style: italic; font-weight: normal; font-size: 75%; vertical-align: 0.4em; } #htrirgldqz .gt_asterisk { font-size: 100%; vertical-align: 0; } #htrirgldqz .gt_slash_mark { font-size: 0.7em; line-height: 0.7em; vertical-align: 0.15em; } #htrirgldqz .gt_fraction_numerator { font-size: 0.6em; line-height: 0.6em; vertical-align: 0.45em; } #htrirgldqz .gt_fraction_denominator { font-size: 0.6em; line-height: 0.6em; vertical-align: -0.05em; } </style> <table class="gt_table"> <thead class="gt_col_headings"> <tr> <th class="gt_col_heading gt_columns_bottom_border gt_left" rowspan="1" colspan="1"><strong>Characteristic</strong></th> <th class="gt_col_heading gt_columns_bottom_border gt_center" rowspan="1" colspan="1"><strong>N = 200</strong><sup class="gt_footnote_marks">1</sup></th> <th class="gt_col_heading gt_columns_bottom_border gt_center" rowspan="1" colspan="1"><strong>Histogram</strong></th> </tr> </thead> <tbody class="gt_table_body"> <tr><td class="gt_row gt_left">Age</td> <td class="gt_row gt_center">47 (38, 57)</td> <td class="gt_row gt_center"><?xml version='1.0' encoding='UTF-8' ?><svg xmlns='http://www.w3.org/2000/svg' xmlns:xlink='http://www.w3.org/1999/xlink' class='svglite' width='85.04pt' height='14.17pt' viewBox='0 0 85.04 14.17'><defs> <style type='text/css'><![CDATA[ .svglite line, .svglite polyline, .svglite polygon, .svglite path, .svglite rect, .svglite circle { fill: none; stroke: #000000; stroke-linecap: round; stroke-linejoin: round; stroke-miterlimit: 10.00; } .svglite text { white-space: pre; } ]]></style></defs><rect width='100%' height='100%' style='stroke: none; fill: none;'/><defs> <clipPath id='cpMC4wMHw4NS4wNHwwLjAwfDE0LjE3'> <rect x='0.00' y='0.00' width='85.04' height='14.17' /> </clipPath></defs><g clip-path='url(#cpMC4wMHw4NS4wNHwwLjAwfDE0LjE3)'><rect x='2.76' y='12.79' width='6.39' height='0.74' style='stroke-width: 1.07; stroke-linecap: square; stroke-linejoin: miter; fill: #BEBEBE;' /><rect x='9.15' y='13.16' width='6.39' height='0.37' style='stroke-width: 1.07; stroke-linecap: square; stroke-linejoin: miter; fill: #BEBEBE;' /><rect x='15.54' y='10.95' width='6.39' height='2.58' style='stroke-width: 1.07; stroke-linecap: square; stroke-linejoin: miter; fill: #BEBEBE;' /><rect x='21.93' y='10.95' width='6.39' height='2.58' style='stroke-width: 1.07; stroke-linecap: square; stroke-linejoin: miter; fill: #BEBEBE;' /><rect x='28.33' y='4.33' width='6.39' height='9.20' style='stroke-width: 1.07; stroke-linecap: square; stroke-linejoin: miter; fill: #BEBEBE;' /><rect x='34.72' y='1.75' width='6.39' height='11.78' style='stroke-width: 1.07; stroke-linecap: square; stroke-linejoin: miter; fill: #BEBEBE;' /><rect x='41.11' y='0.64' width='6.39' height='12.88' style='stroke-width: 1.07; stroke-linecap: square; stroke-linejoin: miter; fill: #BEBEBE;' /><rect x='47.50' y='2.48' width='6.39' height='11.04' style='stroke-width: 1.07; stroke-linecap: square; stroke-linejoin: miter; fill: #BEBEBE;' /><rect x='53.90' y='6.53' width='6.39' height='6.99' style='stroke-width: 1.07; stroke-linecap: square; stroke-linejoin: miter; fill: #BEBEBE;' /><rect x='60.29' y='5.80' width='6.39' height='7.73' style='stroke-width: 1.07; stroke-linecap: square; stroke-linejoin: miter; fill: #BEBEBE;' /><rect x='66.68' y='10.58' width='6.39' height='2.95' style='stroke-width: 1.07; stroke-linecap: square; stroke-linejoin: miter; fill: #BEBEBE;' /><rect x='73.07' y='13.16' width='6.39' height='0.37' style='stroke-width: 1.07; stroke-linecap: square; stroke-linejoin: miter; fill: #BEBEBE;' /><rect x='79.47' y='13.16' width='6.39' height='0.37' style='stroke-width: 1.07; stroke-linecap: square; stroke-linejoin: miter; fill: #BEBEBE;' /></g></svg></td></tr> <tr><td class="gt_row gt_left">Marker Level (ng/mL)</td> <td class="gt_row gt_center">0.64 (0.22, 1.39)</td> <td class="gt_row gt_center"><?xml version='1.0' encoding='UTF-8' ?><svg xmlns='http://www.w3.org/2000/svg' xmlns:xlink='http://www.w3.org/1999/xlink' class='svglite' width='85.04pt' height='14.17pt' viewBox='0 0 85.04 14.17'><defs> <style type='text/css'><![CDATA[ .svglite line, .svglite polyline, .svglite polygon, .svglite path, .svglite rect, .svglite circle { fill: none; stroke: #000000; stroke-linecap: round; stroke-linejoin: round; stroke-miterlimit: 10.00; } .svglite text { white-space: pre; } ]]></style></defs><rect width='100%' height='100%' style='stroke: none; fill: none;'/><defs> <clipPath id='cpMC4wMHw4NS4wNHwwLjAwfDE0LjE3'> <rect x='0.00' y='0.00' width='85.04' height='14.17' /> </clipPath></defs><g clip-path='url(#cpMC4wMHw4NS4wNHwwLjAwfDE0LjE3)'><rect x='1.36' y='2.19' width='7.87' height='11.34' style='stroke-width: 1.07; stroke-linecap: square; stroke-linejoin: miter; fill: #BEBEBE;' /><rect x='9.23' y='0.64' width='7.87' height='12.88' style='stroke-width: 1.07; stroke-linecap: square; stroke-linejoin: miter; fill: #BEBEBE;' /><rect x='17.10' y='7.60' width='7.87' height='5.93' style='stroke-width: 1.07; stroke-linecap: square; stroke-linejoin: miter; fill: #BEBEBE;' /><rect x='24.97' y='6.57' width='7.87' height='6.96' style='stroke-width: 1.07; stroke-linecap: square; stroke-linejoin: miter; fill: #BEBEBE;' /><rect x='32.84' y='9.92' width='7.87' height='3.61' style='stroke-width: 1.07; stroke-linecap: square; stroke-linejoin: miter; fill: #BEBEBE;' /><rect x='40.71' y='9.15' width='7.87' height='4.38' style='stroke-width: 1.07; stroke-linecap: square; stroke-linejoin: miter; fill: #BEBEBE;' /><rect x='48.58' y='11.98' width='7.87' height='1.55' style='stroke-width: 1.07; stroke-linecap: square; stroke-linejoin: miter; fill: #BEBEBE;' /><rect x='56.45' y='12.24' width='7.87' height='1.29' style='stroke-width: 1.07; stroke-linecap: square; stroke-linejoin: miter; fill: #BEBEBE;' /><rect x='64.32' y='13.27' width='7.87' height='0.26' style='stroke-width: 1.07; stroke-linecap: square; stroke-linejoin: miter; fill: #BEBEBE;' /><rect x='72.19' y='12.76' width='7.87' height='0.77' style='stroke-width: 1.07; stroke-linecap: square; stroke-linejoin: miter; fill: #BEBEBE;' /></g></svg></td></tr> </tbody> <tfoot class="gt_footnotes"> <tr> <td class="gt_footnote" colspan="3"><sup class="gt_footnote_marks">1</sup> Median (IQR)</td> </tr> </tfoot> </table> </div> --- .pull-left[ ### Examples ```r t1 <- glm(response ~ trt + grade + age, trial, family = binomial) %>% tbl_regression(exponentiate = TRUE) # time to death Cox model t2 <- coxph(Surv(ttdeath, death) ~ trt + grade + age, trial) %>% tbl_regression(exponentiate = TRUE) # printing merged table combo_tab <- tbl_merge( tbls = list(t1, t2), tab_spanner = c("**Tumor Response**", "**Time to Death**") ) ``` ] - .pull-right[ <div id="lmojprqqzd" style="overflow-x:auto;overflow-y:auto;width:auto;height:auto;"> <style>html { font-family: -apple-system, BlinkMacSystemFont, 'Segoe UI', Roboto, Oxygen, Ubuntu, Cantarell, 'Helvetica Neue', 'Fira Sans', 'Droid Sans', Arial, sans-serif; } #lmojprqqzd .gt_table { display: table; border-collapse: collapse; margin-left: auto; margin-right: auto; color: #333333; font-size: 16px; font-weight: normal; font-style: normal; background-color: #FFFFFF; width: auto; border-top-style: solid; border-top-width: 2px; border-top-color: #A8A8A8; border-right-style: none; border-right-width: 2px; border-right-color: #D3D3D3; border-bottom-style: solid; border-bottom-width: 2px; border-bottom-color: #A8A8A8; border-left-style: none; border-left-width: 2px; border-left-color: #D3D3D3; } #lmojprqqzd .gt_heading { background-color: #FFFFFF; text-align: center; border-bottom-color: #FFFFFF; border-left-style: none; border-left-width: 1px; border-left-color: #D3D3D3; border-right-style: none; border-right-width: 1px; border-right-color: #D3D3D3; } #lmojprqqzd .gt_title { color: #333333; font-size: 125%; font-weight: initial; padding-top: 4px; padding-bottom: 4px; padding-left: 5px; padding-right: 5px; border-bottom-color: #FFFFFF; border-bottom-width: 0; } #lmojprqqzd .gt_subtitle { color: #333333; font-size: 85%; font-weight: initial; padding-top: 0; padding-bottom: 6px; padding-left: 5px; padding-right: 5px; border-top-color: #FFFFFF; border-top-width: 0; } #lmojprqqzd .gt_bottom_border { border-bottom-style: solid; border-bottom-width: 2px; border-bottom-color: #D3D3D3; } #lmojprqqzd .gt_col_headings { border-top-style: solid; border-top-width: 2px; border-top-color: #D3D3D3; border-bottom-style: solid; border-bottom-width: 2px; border-bottom-color: #D3D3D3; border-left-style: none; border-left-width: 1px; border-left-color: #D3D3D3; border-right-style: none; border-right-width: 1px; border-right-color: #D3D3D3; } #lmojprqqzd .gt_col_heading { color: #333333; background-color: #FFFFFF; font-size: 100%; font-weight: normal; text-transform: inherit; border-left-style: none; border-left-width: 1px; border-left-color: #D3D3D3; border-right-style: none; border-right-width: 1px; border-right-color: #D3D3D3; vertical-align: bottom; padding-top: 5px; padding-bottom: 6px; padding-left: 5px; padding-right: 5px; overflow-x: hidden; } #lmojprqqzd .gt_column_spanner_outer { color: #333333; background-color: #FFFFFF; font-size: 100%; font-weight: normal; text-transform: inherit; padding-top: 0; padding-bottom: 0; padding-left: 4px; padding-right: 4px; } #lmojprqqzd .gt_column_spanner_outer:first-child { padding-left: 0; } #lmojprqqzd .gt_column_spanner_outer:last-child { padding-right: 0; } #lmojprqqzd .gt_column_spanner { border-bottom-style: solid; border-bottom-width: 2px; border-bottom-color: #D3D3D3; vertical-align: bottom; padding-top: 5px; padding-bottom: 5px; overflow-x: hidden; display: inline-block; width: 100%; } #lmojprqqzd .gt_group_heading { padding-top: 8px; padding-bottom: 8px; padding-left: 5px; padding-right: 5px; color: #333333; background-color: #FFFFFF; font-size: 100%; font-weight: initial; text-transform: inherit; border-top-style: solid; border-top-width: 2px; border-top-color: #D3D3D3; border-bottom-style: solid; border-bottom-width: 2px; border-bottom-color: #D3D3D3; border-left-style: none; border-left-width: 1px; border-left-color: #D3D3D3; border-right-style: none; border-right-width: 1px; border-right-color: #D3D3D3; vertical-align: middle; } #lmojprqqzd .gt_empty_group_heading { padding: 0.5px; color: #333333; background-color: #FFFFFF; font-size: 100%; font-weight: initial; border-top-style: solid; border-top-width: 2px; border-top-color: #D3D3D3; border-bottom-style: solid; border-bottom-width: 2px; border-bottom-color: #D3D3D3; vertical-align: middle; } #lmojprqqzd .gt_from_md > :first-child { margin-top: 0; } #lmojprqqzd .gt_from_md > :last-child { margin-bottom: 0; } #lmojprqqzd .gt_row { padding-top: 8px; padding-bottom: 8px; padding-left: 5px; padding-right: 5px; margin: 10px; border-top-style: solid; border-top-width: 1px; border-top-color: #D3D3D3; border-left-style: none; border-left-width: 1px; border-left-color: #D3D3D3; border-right-style: none; border-right-width: 1px; border-right-color: #D3D3D3; vertical-align: middle; overflow-x: hidden; } #lmojprqqzd .gt_stub { color: #333333; background-color: #FFFFFF; font-size: 100%; font-weight: initial; text-transform: inherit; border-right-style: solid; border-right-width: 2px; border-right-color: #D3D3D3; padding-left: 5px; padding-right: 5px; } #lmojprqqzd .gt_stub_row_group { color: #333333; background-color: #FFFFFF; font-size: 100%; font-weight: initial; text-transform: inherit; border-right-style: solid; border-right-width: 2px; border-right-color: #D3D3D3; padding-left: 5px; padding-right: 5px; vertical-align: top; } #lmojprqqzd .gt_row_group_first td { border-top-width: 2px; } #lmojprqqzd .gt_summary_row { color: #333333; background-color: #FFFFFF; text-transform: inherit; padding-top: 8px; padding-bottom: 8px; padding-left: 5px; padding-right: 5px; } #lmojprqqzd .gt_first_summary_row { border-top-style: solid; border-top-color: #D3D3D3; } #lmojprqqzd .gt_first_summary_row.thick { border-top-width: 2px; } #lmojprqqzd .gt_last_summary_row { padding-top: 8px; padding-bottom: 8px; padding-left: 5px; padding-right: 5px; border-bottom-style: solid; border-bottom-width: 2px; border-bottom-color: #D3D3D3; } #lmojprqqzd .gt_grand_summary_row { color: #333333; background-color: #FFFFFF; text-transform: inherit; padding-top: 8px; padding-bottom: 8px; padding-left: 5px; padding-right: 5px; } #lmojprqqzd .gt_first_grand_summary_row { padding-top: 8px; padding-bottom: 8px; padding-left: 5px; padding-right: 5px; border-top-style: double; border-top-width: 6px; border-top-color: #D3D3D3; } #lmojprqqzd .gt_striped { background-color: rgba(128, 128, 128, 0.05); } #lmojprqqzd .gt_table_body { border-top-style: solid; border-top-width: 2px; border-top-color: #D3D3D3; border-bottom-style: solid; border-bottom-width: 2px; border-bottom-color: #D3D3D3; } #lmojprqqzd .gt_footnotes { color: #333333; background-color: #FFFFFF; border-bottom-style: none; border-bottom-width: 2px; border-bottom-color: #D3D3D3; border-left-style: none; border-left-width: 2px; border-left-color: #D3D3D3; border-right-style: none; border-right-width: 2px; border-right-color: #D3D3D3; } #lmojprqqzd .gt_footnote { margin: 0px; font-size: 90%; padding-left: 4px; padding-right: 4px; padding-left: 5px; padding-right: 5px; } #lmojprqqzd .gt_sourcenotes { color: #333333; background-color: #FFFFFF; border-bottom-style: none; border-bottom-width: 2px; border-bottom-color: #D3D3D3; border-left-style: none; border-left-width: 2px; border-left-color: #D3D3D3; border-right-style: none; border-right-width: 2px; border-right-color: #D3D3D3; } #lmojprqqzd .gt_sourcenote { font-size: 90%; padding-top: 4px; padding-bottom: 4px; padding-left: 5px; padding-right: 5px; } #lmojprqqzd .gt_left { text-align: left; } #lmojprqqzd .gt_center { text-align: center; } #lmojprqqzd .gt_right { text-align: right; font-variant-numeric: tabular-nums; } #lmojprqqzd .gt_font_normal { font-weight: normal; } #lmojprqqzd .gt_font_bold { font-weight: bold; } #lmojprqqzd .gt_font_italic { font-style: italic; } #lmojprqqzd .gt_super { font-size: 65%; } #lmojprqqzd .gt_two_val_uncert { display: inline-block; line-height: 1em; text-align: right; font-size: 60%; vertical-align: -0.25em; margin-left: 0.1em; } #lmojprqqzd .gt_footnote_marks { font-style: italic; font-weight: normal; font-size: 75%; vertical-align: 0.4em; } #lmojprqqzd .gt_asterisk { font-size: 100%; vertical-align: 0; } #lmojprqqzd .gt_slash_mark { font-size: 0.7em; line-height: 0.7em; vertical-align: 0.15em; } #lmojprqqzd .gt_fraction_numerator { font-size: 0.6em; line-height: 0.6em; vertical-align: 0.45em; } #lmojprqqzd .gt_fraction_denominator { font-size: 0.6em; line-height: 0.6em; vertical-align: -0.05em; } </style> <table class="gt_table"> <thead class="gt_col_headings"> <tr> <th class="gt_col_heading gt_columns_bottom_border gt_left" rowspan="2" colspan="1"><strong>Characteristic</strong></th> <th class="gt_center gt_columns_top_border gt_column_spanner_outer" rowspan="1" colspan="3"> <span class="gt_column_spanner"><strong>Tumor Response</strong></span> </th> <th class="gt_center gt_columns_top_border gt_column_spanner_outer" rowspan="1" colspan="3"> <span class="gt_column_spanner"><strong>Time to Death</strong></span> </th> </tr> <tr> <th class="gt_col_heading gt_columns_bottom_border gt_center" rowspan="1" colspan="1"><strong>OR</strong><sup class="gt_footnote_marks">1</sup></th> <th class="gt_col_heading gt_columns_bottom_border gt_center" rowspan="1" colspan="1"><strong>95% CI</strong><sup class="gt_footnote_marks">1</sup></th> <th class="gt_col_heading gt_columns_bottom_border gt_center" rowspan="1" colspan="1"><strong>p-value</strong></th> <th class="gt_col_heading gt_columns_bottom_border gt_center" rowspan="1" colspan="1"><strong>HR</strong><sup class="gt_footnote_marks">1</sup></th> <th class="gt_col_heading gt_columns_bottom_border gt_center" rowspan="1" colspan="1"><strong>95% CI</strong><sup class="gt_footnote_marks">1</sup></th> <th class="gt_col_heading gt_columns_bottom_border gt_center" rowspan="1" colspan="1"><strong>p-value</strong></th> </tr> </thead> <tbody class="gt_table_body"> <tr><td class="gt_row gt_left">Chemotherapy Treatment</td> <td class="gt_row gt_center"></td> <td class="gt_row gt_center"></td> <td class="gt_row gt_center"></td> <td class="gt_row gt_center"></td> <td class="gt_row gt_center"></td> <td class="gt_row gt_center"></td></tr> <tr><td class="gt_row gt_left" style="text-align: left; text-indent: 10px;">Drug A</td> <td class="gt_row gt_center">—</td> <td class="gt_row gt_center">—</td> <td class="gt_row gt_center"></td> <td class="gt_row gt_center">—</td> <td class="gt_row gt_center">—</td> <td class="gt_row gt_center"></td></tr> <tr><td class="gt_row gt_left" style="text-align: left; text-indent: 10px;">Drug B</td> <td class="gt_row gt_center">1.13</td> <td class="gt_row gt_center">0.60, 2.13</td> <td class="gt_row gt_center">0.7</td> <td class="gt_row gt_center">1.30</td> <td class="gt_row gt_center">0.88, 1.92</td> <td class="gt_row gt_center">0.2</td></tr> <tr><td class="gt_row gt_left">Grade</td> <td class="gt_row gt_center"></td> <td class="gt_row gt_center"></td> <td class="gt_row gt_center"></td> <td class="gt_row gt_center"></td> <td class="gt_row gt_center"></td> <td class="gt_row gt_center"></td></tr> <tr><td class="gt_row gt_left" style="text-align: left; text-indent: 10px;">I</td> <td class="gt_row gt_center">—</td> <td class="gt_row gt_center">—</td> <td class="gt_row gt_center"></td> <td class="gt_row gt_center">—</td> <td class="gt_row gt_center">—</td> <td class="gt_row gt_center"></td></tr> <tr><td class="gt_row gt_left" style="text-align: left; text-indent: 10px;">II</td> <td class="gt_row gt_center">0.85</td> <td class="gt_row gt_center">0.39, 1.85</td> <td class="gt_row gt_center">0.7</td> <td class="gt_row gt_center">1.21</td> <td class="gt_row gt_center">0.73, 1.99</td> <td class="gt_row gt_center">0.5</td></tr> <tr><td class="gt_row gt_left" style="text-align: left; text-indent: 10px;">III</td> <td class="gt_row gt_center">1.01</td> <td class="gt_row gt_center">0.47, 2.15</td> <td class="gt_row gt_center">>0.9</td> <td class="gt_row gt_center">1.79</td> <td class="gt_row gt_center">1.12, 2.86</td> <td class="gt_row gt_center">0.014</td></tr> <tr><td class="gt_row gt_left">Age</td> <td class="gt_row gt_center">1.02</td> <td class="gt_row gt_center">1.00, 1.04</td> <td class="gt_row gt_center">0.10</td> <td class="gt_row gt_center">1.01</td> <td class="gt_row gt_center">0.99, 1.02</td> <td class="gt_row gt_center">0.3</td></tr> </tbody> <tfoot class="gt_footnotes"> <tr> <td class="gt_footnote" colspan="7"><sup class="gt_footnote_marks">1</sup> OR = Odds Ratio, CI = Confidence Interval, HR = Hazard Ratio</td> </tr> </tfoot> </table> </div> ]- --- .pull-left[ ### [10 Guidelines for Better Tables in R](https://themockup.blog/posts/2020-09-04-10-table-rules-in-r/) ] .pull-right[ <blockquote class="twitter-tweet"><p lang="en" dir="ltr">I recently published &quot;Ten Guidelines for Better Tables&quot; in the Journal of Benefit Cost Analysis (<a href="https://twitter.com/benefitcost?ref_src=twsrc%5Etfw">@benefitcost</a>) on ways to improve your data tables. <br><br>Here&#39;s a thread summarizing the 10 guidelines. <br><br>Full paper is here: <a href="https://t.co/VSGYnfg7iP">https://t.co/VSGYnfg7iP</a> <a href="https://t.co/W6qbsktioL">pic.twitter.com/W6qbsktioL</a></p>&mdash; Jon Schwabish (@jschwabish) <a href="https://twitter.com/jschwabish/status/1290323581881266177?ref_src=twsrc%5Etfw">August 3, 2020</a></blockquote> <script async src="https://platform.twitter.com/widgets.js" charset="utf-8"></script> ] --- class: inverse, middle, center # Meta RMarkdown --- .pull-left[ ### Using RMarkdown `parameters` ```yaml --- title: Visualizing the Ocean Floor output: html_document params: state: "hawaii" --- ``` ] -- .pull-right[ You can reference parameters inline, ie `r params$data` which returns `"hawaii"` as the result. Or, can be used in normal chunks: ```r ocean_data %>% filter(state == params$state) %>% autoplot() ``` ] --- .pull-left[ ### Using RMarkdown `parameters` ```yaml --- title: My Document output: html_document params: days: label: "Number of Previous Days" value: 90 input: slider min: 30 max: 360 region: label: "Region:" value: Europe input: select choices: [North America, Europe, Asia, Africa] --- ``` ] -- .pull-right[ Can also create `shiny` "modals" inside RStudio, via `knit with parameters` <img src="https://docs.rstudio.com/connect/1.7.4/user/images/param-rmarkdown/param-widgets.png" width="60%" /> ] --- ### More details on parameters and workflow - [RMarkdown book, parameterized reports](https://bookdown.org/yihui/rmarkdown/parameterized-reports.html) - [RMarkdown Cookbook, Parameterized reports](https://bookdown.org/yihui/rmarkdown-cookbook/parameterized-reports.html) - [Advanced RMarkdown webinar](https://www.youtube.com/watch?v=WkF7nqEYF1E) --- class: center, middle, inverse # Formats --- .pull-left[ ### Many [RMarkdown Formats](https://rmarkdown.rstudio.com/formats.html) <div id="xpekkaieej" style="overflow-x:auto;overflow-y:auto;width:auto;height:auto;"> <style>@import url("https://fonts.googleapis.com/css2?family=Open+Sans:ital,wght@0,100;0,200;0,300;0,400;0,500;0,600;0,700;0,800;0,900;1,100;1,200;1,300;1,400;1,500;1,600;1,700;1,800;1,900&display=swap"); @import url("https://fonts.googleapis.com/css2?family=Fira+Mono:ital,wght@0,100;0,200;0,300;0,400;0,500;0,600;0,700;0,800;0,900;1,100;1,200;1,300;1,400;1,500;1,600;1,700;1,800;1,900&display=swap"); @import url("https://fonts.googleapis.com/css2?family=Source+Sans+Pro:ital,wght@0,100;0,200;0,300;0,400;0,500;0,600;0,700;0,800;0,900;1,100;1,200;1,300;1,400;1,500;1,600;1,700;1,800;1,900&display=swap"); @import url("https://fonts.googleapis.com/css2?family=Libre+Franklin:ital,wght@0,100;0,200;0,300;0,400;0,500;0,600;0,700;0,800;0,900;1,100;1,200;1,300;1,400;1,500;1,600;1,700;1,800;1,900&display=swap"); @import url("https://fonts.googleapis.com/css2?family=Source+Sans+Pro:ital,wght@0,100;0,200;0,300;0,400;0,500;0,600;0,700;0,800;0,900;1,100;1,200;1,300;1,400;1,500;1,600;1,700;1,800;1,900&display=swap"); html { font-family: 'Open Sans', -apple-system, BlinkMacSystemFont, 'Segoe UI', Roboto, Oxygen, Ubuntu, Cantarell, 'Helvetica Neue', 'Fira Sans', 'Droid Sans', Arial, sans-serif; } #xpekkaieej .gt_table { display: table; border-collapse: collapse; margin-left: auto; margin-right: auto; color: #333333; font-size: 16px; font-weight: normal; font-style: none; background-color: #FFFFFF; width: auto; border-top-style: none; border-top-width: 2px; border-top-color: #A8A8A8; border-right-style: none; border-right-width: 2px; border-right-color: #D3D3D3; border-bottom-style: none; border-bottom-width: 2px; border-bottom-color: #A8A8A8; border-left-style: none; border-left-width: 2px; border-left-color: #D3D3D3; } #xpekkaieej .gt_heading { background-color: #FFFFFF; text-align: left; border-bottom-color: #FFFFFF; border-left-style: none; border-left-width: 1px; border-left-color: #D3D3D3; border-right-style: none; border-right-width: 1px; border-right-color: #D3D3D3; } #xpekkaieej .gt_title { color: #333333; font-size: 125%; font-weight: initial; padding-top: 4px; padding-bottom: 4px; padding-left: 5px; padding-right: 5px; border-bottom-color: #FFFFFF; border-bottom-width: 0; } #xpekkaieej .gt_subtitle { color: #333333; font-size: 85%; font-weight: initial; padding-top: 0; padding-bottom: 6px; padding-left: 5px; padding-right: 5px; border-top-color: #FFFFFF; border-top-width: 0; } #xpekkaieej .gt_bottom_border { border-bottom-style: none; border-bottom-width: 2px; border-bottom-color: #D3D3D3; } #xpekkaieej .gt_col_headings { border-top-style: none; border-top-width: 2px; border-top-color: #D3D3D3; border-bottom-style: none; border-bottom-width: 1px; border-bottom-color: #334422; border-left-style: none; border-left-width: 1px; border-left-color: #D3D3D3; border-right-style: none; border-right-width: 1px; border-right-color: #D3D3D3; } #xpekkaieej .gt_col_heading { color: #333333; background-color: #FFFFFF; font-size: 12px; font-weight: normal; text-transform: inherit; border-left-style: none; border-left-width: 1px; border-left-color: #D3D3D3; border-right-style: none; border-right-width: 1px; border-right-color: #D3D3D3; vertical-align: bottom; padding-top: 5px; padding-bottom: 6px; padding-left: 5px; padding-right: 5px; overflow-x: hidden; } #xpekkaieej .gt_column_spanner_outer { color: #333333; background-color: #FFFFFF; font-size: 12px; font-weight: normal; text-transform: inherit; padding-top: 0; padding-bottom: 0; padding-left: 4px; padding-right: 4px; } #xpekkaieej .gt_column_spanner_outer:first-child { padding-left: 0; } #xpekkaieej .gt_column_spanner_outer:last-child { padding-right: 0; } #xpekkaieej .gt_column_spanner { border-bottom-style: none; border-bottom-width: 1px; border-bottom-color: #334422; vertical-align: bottom; padding-top: 5px; padding-bottom: 5px; overflow-x: hidden; display: inline-block; width: 100%; } #xpekkaieej .gt_group_heading { padding-top: 8px; padding-bottom: 8px; padding-left: 5px; padding-right: 5px; color: #333333; background-color: #FFFFFF; font-size: 100%; font-weight: initial; text-transform: inherit; border-top-style: none; border-top-width: 2px; border-top-color: #D3D3D3; border-bottom-style: none; border-bottom-width: 2px; border-bottom-color: #D3D3D3; border-left-style: none; border-left-width: 1px; border-left-color: #D3D3D3; border-right-style: none; border-right-width: 1px; border-right-color: #D3D3D3; vertical-align: middle; } #xpekkaieej .gt_empty_group_heading { padding: 0.5px; color: #333333; background-color: #FFFFFF; font-size: 100%; font-weight: initial; border-top-style: none; border-top-width: 2px; border-top-color: #D3D3D3; border-bottom-style: none; border-bottom-width: 2px; border-bottom-color: #D3D3D3; vertical-align: middle; } #xpekkaieej .gt_from_md > :first-child { margin-top: 0; } #xpekkaieej .gt_from_md > :last-child { margin-bottom: 0; } #xpekkaieej .gt_row { padding-top: 7px; padding-bottom: 7px; padding-left: 5px; padding-right: 5px; margin: 10px; border-top-style: none; border-top-width: 1px; border-top-color: #D3D3D3; border-left-style: none; border-left-width: 1px; border-left-color: #D3D3D3; border-right-style: none; border-right-width: 1px; border-right-color: #D3D3D3; vertical-align: middle; overflow-x: hidden; } #xpekkaieej .gt_stub { color: #333333; background-color: #FFFFFF; font-size: 100%; font-weight: initial; text-transform: inherit; border-right-style: none; border-right-width: 2px; border-right-color: #D3D3D3; padding-left: 5px; padding-right: 5px; } #xpekkaieej .gt_stub_row_group { color: #333333; background-color: #FFFFFF; font-size: 100%; font-weight: initial; text-transform: inherit; border-right-style: none; border-right-width: 2px; border-right-color: #D3D3D3; padding-left: 5px; padding-right: 5px; vertical-align: top; } #xpekkaieej .gt_row_group_first td { border-top-width: 2px; } #xpekkaieej .gt_summary_row { color: #333333; background-color: #FFFFFF; text-transform: inherit; padding-top: 8px; padding-bottom: 8px; padding-left: 5px; padding-right: 5px; } #xpekkaieej .gt_first_summary_row { border-top-style: none; border-top-color: #D3D3D3; } #xpekkaieej .gt_first_summary_row.thick { border-top-width: 2px; } #xpekkaieej .gt_last_summary_row { padding-top: 8px; padding-bottom: 8px; padding-left: 5px; padding-right: 5px; border-bottom-style: none; border-bottom-width: 2px; border-bottom-color: #D3D3D3; } #xpekkaieej .gt_grand_summary_row { color: #333333; background-color: #FFFFFF; text-transform: inherit; padding-top: 8px; padding-bottom: 8px; padding-left: 5px; padding-right: 5px; } #xpekkaieej .gt_first_grand_summary_row { padding-top: 8px; padding-bottom: 8px; padding-left: 5px; padding-right: 5px; border-top-style: none; border-top-width: 6px; border-top-color: #D3D3D3; } #xpekkaieej .gt_striped { background-color: rgba(128, 128, 128, 0.05); } #xpekkaieej .gt_table_body { border-top-style: none; border-top-width: 2px; border-top-color: #D3D3D3; border-bottom-style: none; border-bottom-width: 2px; border-bottom-color: #FFFFFF; } #xpekkaieej .gt_footnotes { color: #333333; background-color: #FFFFFF; border-bottom-style: none; border-bottom-width: 2px; border-bottom-color: #D3D3D3; border-left-style: none; border-left-width: 2px; border-left-color: #D3D3D3; border-right-style: none; border-right-width: 2px; border-right-color: #D3D3D3; } #xpekkaieej .gt_footnote { margin: 0px; font-size: 90%; padding-left: 4px; padding-right: 4px; padding-left: 5px; padding-right: 5px; } #xpekkaieej .gt_sourcenotes { color: #333333; background-color: #FFFFFF; border-bottom-style: none; border-bottom-width: 2px; border-bottom-color: #D3D3D3; border-left-style: none; border-left-width: 2px; border-left-color: #D3D3D3; border-right-style: none; border-right-width: 2px; border-right-color: #D3D3D3; } #xpekkaieej .gt_sourcenote { font-size: 90%; padding-top: 4px; padding-bottom: 4px; padding-left: 5px; padding-right: 5px; } #xpekkaieej .gt_left { text-align: left; } #xpekkaieej .gt_center { text-align: center; } #xpekkaieej .gt_right { text-align: right; font-variant-numeric: tabular-nums; } #xpekkaieej .gt_font_normal { font-weight: normal; } #xpekkaieej .gt_font_bold { font-weight: bold; } #xpekkaieej .gt_font_italic { font-style: italic; } #xpekkaieej .gt_super { font-size: 65%; } #xpekkaieej .gt_two_val_uncert { display: inline-block; line-height: 1em; text-align: right; font-size: 60%; vertical-align: -0.25em; margin-left: 0.1em; } #xpekkaieej .gt_footnote_marks { font-style: italic; font-weight: normal; font-size: 75%; vertical-align: 0.4em; } #xpekkaieej .gt_asterisk { font-size: 100%; vertical-align: 0; } #xpekkaieej .gt_slash_mark { font-size: 0.7em; line-height: 0.7em; vertical-align: 0.15em; } #xpekkaieej .gt_fraction_numerator { font-size: 0.6em; line-height: 0.6em; vertical-align: 0.45em; } #xpekkaieej .gt_fraction_denominator { font-size: 0.6em; line-height: 0.6em; vertical-align: -0.05em; } </style> <table class="gt_table"> <thead class="gt_col_headings"> <tr> <th class="gt_col_heading gt_columns_bottom_border gt_left" rowspan="1" colspan="1"></th> <th class="gt_col_heading gt_columns_bottom_border gt_left" rowspan="1" colspan="1" style="color: #A9A9A9; font-family: 'Source Sans Pro'; text-transform: uppercase;"></th> </tr> </thead> <tbody class="gt_table_body"> <tr class="gt_group_heading_row"> <td colspan="2" class="gt_group_heading" style="border-bottom-width: 3px; border-bottom-style: solid; border-bottom-color: black; color: #000000; font-weight: bold; background-color: #D3D3D3;">Documents</td> </tr> <tr class="gt_row_group_first"><td class="gt_row gt_right gt_stub" style="font-family: 'Fira Mono';"><a href ='https://bookdown.org/yihui/rmarkdown/notebook.html' style='text-decoration:none;' target='_blank'> Notebook</a></td> <td class="gt_row gt_left" style="font-family: 'Source Sans Pro'; font-weight: 400;">Interactive R Notebooks</td></tr> <tr><td class="gt_row gt_right gt_stub" style="font-family: 'Fira Mono';"><a href ='https://bookdown.org/yihui/rmarkdown/html-document.html' style='text-decoration:none;' target='_blank'> HTML</a></td> <td class="gt_row gt_left" style="font-family: 'Source Sans Pro'; font-weight: 400;">HTML document w/ Bootstrap CSS</td></tr> <tr><td class="gt_row gt_right gt_stub" style="font-family: 'Fira Mono';"><a href ='https://bookdown.org/yihui/rmarkdown/pdf-document.html' style='text-decoration:none;' target='_blank'> PDF</a></td> <td class="gt_row gt_left" style="font-family: 'Source Sans Pro'; font-weight: 400;">PDF document (via LaTeX template)</td></tr> <tr><td class="gt_row gt_right gt_stub" style="font-family: 'Fira Mono';"><a href ='https://bookdown.org/yihui/rmarkdown/word-document.html' style='text-decoration:none;' target='_blank'> Word</a></td> <td class="gt_row gt_left" style="font-family: 'Source Sans Pro'; font-weight: 400;">Microsoft Word document (docx)</td></tr> <tr><td class="gt_row gt_right gt_stub" style="font-family: 'Fira Mono';"><a href ='https://bookdown.org/yihui/rmarkdown/opendocument-text-document.html' style='text-decoration:none;' target='_blank'> ODT</a></td> <td class="gt_row gt_left" style="font-family: 'Source Sans Pro'; font-weight: 400;">OpenDocument Text document</td></tr> <tr><td class="gt_row gt_right gt_stub" style="font-family: 'Fira Mono';"><a href ='https://bookdown.org/yihui/rmarkdown/rich-text-format-document.html' style='text-decoration:none;' target='_blank'> RTF</a></td> <td class="gt_row gt_left" style="font-family: 'Source Sans Pro'; font-weight: 400;">Rich Text Format document</td></tr> <tr><td class="gt_row gt_right gt_stub" style="font-family: 'Fira Mono';"><a href ='https://bookdown.org/yihui/rmarkdown/markdown-document.html' style='text-decoration:none;' target='_blank'> Markdown</a></td> <td class="gt_row gt_left" style="font-family: 'Source Sans Pro'; font-weight: 400;">Markdown document (various flavors)</td></tr> <tr class="gt_group_heading_row"> <td colspan="2" class="gt_group_heading" style="border-bottom-width: 3px; border-bottom-style: solid; border-bottom-color: black; color: #000000; font-weight: bold; background-color: #D3D3D3;">Presentations</td> </tr> <tr class="gt_row_group_first"><td class="gt_row gt_right gt_stub" style="font-family: 'Fira Mono';"><a href ='https://bookdown.org/yihui/rmarkdown/ioslides-presentation.html' style='text-decoration:none;' target='_blank'> ioslides</a></td> <td class="gt_row gt_left" style="font-family: 'Source Sans Pro'; font-weight: 400;">HTML presentation with ioslides</td></tr> <tr><td class="gt_row gt_right gt_stub" style="font-family: 'Fira Mono';"><a href ='https://bookdown.org/yihui/rmarkdown/revealjs.html' style='text-decoration:none;' target='_blank'> reveal.js</a></td> <td class="gt_row gt_left" style="font-family: 'Source Sans Pro'; font-weight: 400;">HTML presentation with reveal.js</td></tr> <tr><td class="gt_row gt_right gt_stub" style="font-family: 'Fira Mono';"><a href ='https://bookdown.org/yihui/rmarkdown/slidy-presentation.html' style='text-decoration:none;' target='_blank'> Slidy</a></td> <td class="gt_row gt_left" style="font-family: 'Source Sans Pro'; font-weight: 400;">HTML presentation with W3C Slidy</td></tr> <tr><td class="gt_row gt_right gt_stub" style="font-family: 'Fira Mono';"><a href ='https://bookdown.org/yihui/rmarkdown/beamer-presentation.html' style='text-decoration:none;' target='_blank'> Beamer</a></td> <td class="gt_row gt_left" style="font-family: 'Source Sans Pro'; font-weight: 400;">PDF presentation with LaTeX Beamer</td></tr> <tr><td class="gt_row gt_right gt_stub" style="font-family: 'Fira Mono';"><a href ='https://bookdown.org/yihui/rmarkdown/powerpoint-presentation.html' style='text-decoration:none;' target='_blank'> PowerPoint</a></td> <td class="gt_row gt_left" style="font-family: 'Source Sans Pro'; font-weight: 400;">PowerPoint presentation</td></tr> </tbody> </table> </div> ] -- .pull-right[ <div id="odrmpeyvwi" style="overflow-x:auto;overflow-y:auto;width:auto;height:auto;"> <style>@import url("https://fonts.googleapis.com/css2?family=Open+Sans:ital,wght@0,100;0,200;0,300;0,400;0,500;0,600;0,700;0,800;0,900;1,100;1,200;1,300;1,400;1,500;1,600;1,700;1,800;1,900&display=swap"); @import url("https://fonts.googleapis.com/css2?family=Fira+Mono:ital,wght@0,100;0,200;0,300;0,400;0,500;0,600;0,700;0,800;0,900;1,100;1,200;1,300;1,400;1,500;1,600;1,700;1,800;1,900&display=swap"); @import url("https://fonts.googleapis.com/css2?family=Source+Sans+Pro:ital,wght@0,100;0,200;0,300;0,400;0,500;0,600;0,700;0,800;0,900;1,100;1,200;1,300;1,400;1,500;1,600;1,700;1,800;1,900&display=swap"); @import url("https://fonts.googleapis.com/css2?family=Libre+Franklin:ital,wght@0,100;0,200;0,300;0,400;0,500;0,600;0,700;0,800;0,900;1,100;1,200;1,300;1,400;1,500;1,600;1,700;1,800;1,900&display=swap"); @import url("https://fonts.googleapis.com/css2?family=Source+Sans+Pro:ital,wght@0,100;0,200;0,300;0,400;0,500;0,600;0,700;0,800;0,900;1,100;1,200;1,300;1,400;1,500;1,600;1,700;1,800;1,900&display=swap"); html { font-family: 'Open Sans', -apple-system, BlinkMacSystemFont, 'Segoe UI', Roboto, Oxygen, Ubuntu, Cantarell, 'Helvetica Neue', 'Fira Sans', 'Droid Sans', Arial, sans-serif; } #odrmpeyvwi .gt_table { display: table; border-collapse: collapse; margin-left: auto; margin-right: auto; color: #333333; font-size: 16px; font-weight: normal; font-style: none; background-color: #FFFFFF; width: auto; border-top-style: none; border-top-width: 2px; border-top-color: #A8A8A8; border-right-style: none; border-right-width: 2px; border-right-color: #D3D3D3; border-bottom-style: none; border-bottom-width: 2px; border-bottom-color: #A8A8A8; border-left-style: none; border-left-width: 2px; border-left-color: #D3D3D3; } #odrmpeyvwi .gt_heading { background-color: #FFFFFF; text-align: left; border-bottom-color: #FFFFFF; border-left-style: none; border-left-width: 1px; border-left-color: #D3D3D3; border-right-style: none; border-right-width: 1px; border-right-color: #D3D3D3; } #odrmpeyvwi .gt_title { color: #333333; font-size: 125%; font-weight: initial; padding-top: 4px; padding-bottom: 4px; padding-left: 5px; padding-right: 5px; border-bottom-color: #FFFFFF; border-bottom-width: 0; } #odrmpeyvwi .gt_subtitle { color: #333333; font-size: 85%; font-weight: initial; padding-top: 0; padding-bottom: 6px; padding-left: 5px; padding-right: 5px; border-top-color: #FFFFFF; border-top-width: 0; } #odrmpeyvwi .gt_bottom_border { border-bottom-style: none; border-bottom-width: 2px; border-bottom-color: #D3D3D3; } #odrmpeyvwi .gt_col_headings { border-top-style: none; border-top-width: 2px; border-top-color: #D3D3D3; border-bottom-style: none; border-bottom-width: 1px; border-bottom-color: #334422; border-left-style: none; border-left-width: 1px; border-left-color: #D3D3D3; border-right-style: none; border-right-width: 1px; border-right-color: #D3D3D3; } #odrmpeyvwi .gt_col_heading { color: #333333; background-color: #FFFFFF; font-size: 12px; font-weight: normal; text-transform: inherit; border-left-style: none; border-left-width: 1px; border-left-color: #D3D3D3; border-right-style: none; border-right-width: 1px; border-right-color: #D3D3D3; vertical-align: bottom; padding-top: 5px; padding-bottom: 6px; padding-left: 5px; padding-right: 5px; overflow-x: hidden; } #odrmpeyvwi .gt_column_spanner_outer { color: #333333; background-color: #FFFFFF; font-size: 12px; font-weight: normal; text-transform: inherit; padding-top: 0; padding-bottom: 0; padding-left: 4px; padding-right: 4px; } #odrmpeyvwi .gt_column_spanner_outer:first-child { padding-left: 0; } #odrmpeyvwi .gt_column_spanner_outer:last-child { padding-right: 0; } #odrmpeyvwi .gt_column_spanner { border-bottom-style: none; border-bottom-width: 1px; border-bottom-color: #334422; vertical-align: bottom; padding-top: 5px; padding-bottom: 5px; overflow-x: hidden; display: inline-block; width: 100%; } #odrmpeyvwi .gt_group_heading { padding-top: 8px; padding-bottom: 8px; padding-left: 5px; padding-right: 5px; color: #333333; background-color: #FFFFFF; font-size: 100%; font-weight: initial; text-transform: inherit; border-top-style: none; border-top-width: 2px; border-top-color: #D3D3D3; border-bottom-style: none; border-bottom-width: 2px; border-bottom-color: #D3D3D3; border-left-style: none; border-left-width: 1px; border-left-color: #D3D3D3; border-right-style: none; border-right-width: 1px; border-right-color: #D3D3D3; vertical-align: middle; } #odrmpeyvwi .gt_empty_group_heading { padding: 0.5px; color: #333333; background-color: #FFFFFF; font-size: 100%; font-weight: initial; border-top-style: none; border-top-width: 2px; border-top-color: #D3D3D3; border-bottom-style: none; border-bottom-width: 2px; border-bottom-color: #D3D3D3; vertical-align: middle; } #odrmpeyvwi .gt_from_md > :first-child { margin-top: 0; } #odrmpeyvwi .gt_from_md > :last-child { margin-bottom: 0; } #odrmpeyvwi .gt_row { padding-top: 7px; padding-bottom: 7px; padding-left: 5px; padding-right: 5px; margin: 10px; border-top-style: none; border-top-width: 1px; border-top-color: #D3D3D3; border-left-style: none; border-left-width: 1px; border-left-color: #D3D3D3; border-right-style: none; border-right-width: 1px; border-right-color: #D3D3D3; vertical-align: middle; overflow-x: hidden; } #odrmpeyvwi .gt_stub { color: #333333; background-color: #FFFFFF; font-size: 100%; font-weight: initial; text-transform: inherit; border-right-style: none; border-right-width: 2px; border-right-color: #D3D3D3; padding-left: 5px; padding-right: 5px; } #odrmpeyvwi .gt_stub_row_group { color: #333333; background-color: #FFFFFF; font-size: 100%; font-weight: initial; text-transform: inherit; border-right-style: none; border-right-width: 2px; border-right-color: #D3D3D3; padding-left: 5px; padding-right: 5px; vertical-align: top; } #odrmpeyvwi .gt_row_group_first td { border-top-width: 2px; } #odrmpeyvwi .gt_summary_row { color: #333333; background-color: #FFFFFF; text-transform: inherit; padding-top: 8px; padding-bottom: 8px; padding-left: 5px; padding-right: 5px; } #odrmpeyvwi .gt_first_summary_row { border-top-style: none; border-top-color: #D3D3D3; } #odrmpeyvwi .gt_first_summary_row.thick { border-top-width: 2px; } #odrmpeyvwi .gt_last_summary_row { padding-top: 8px; padding-bottom: 8px; padding-left: 5px; padding-right: 5px; border-bottom-style: none; border-bottom-width: 2px; border-bottom-color: #D3D3D3; } #odrmpeyvwi .gt_grand_summary_row { color: #333333; background-color: #FFFFFF; text-transform: inherit; padding-top: 8px; padding-bottom: 8px; padding-left: 5px; padding-right: 5px; } #odrmpeyvwi .gt_first_grand_summary_row { padding-top: 8px; padding-bottom: 8px; padding-left: 5px; padding-right: 5px; border-top-style: none; border-top-width: 6px; border-top-color: #D3D3D3; } #odrmpeyvwi .gt_striped { background-color: rgba(128, 128, 128, 0.05); } #odrmpeyvwi .gt_table_body { border-top-style: none; border-top-width: 2px; border-top-color: #D3D3D3; border-bottom-style: none; border-bottom-width: 2px; border-bottom-color: #FFFFFF; } #odrmpeyvwi .gt_footnotes { color: #333333; background-color: #FFFFFF; border-bottom-style: none; border-bottom-width: 2px; border-bottom-color: #D3D3D3; border-left-style: none; border-left-width: 2px; border-left-color: #D3D3D3; border-right-style: none; border-right-width: 2px; border-right-color: #D3D3D3; } #odrmpeyvwi .gt_footnote { margin: 0px; font-size: 90%; padding-left: 4px; padding-right: 4px; padding-left: 5px; padding-right: 5px; } #odrmpeyvwi .gt_sourcenotes { color: #333333; background-color: #FFFFFF; border-bottom-style: none; border-bottom-width: 2px; border-bottom-color: #D3D3D3; border-left-style: none; border-left-width: 2px; border-left-color: #D3D3D3; border-right-style: none; border-right-width: 2px; border-right-color: #D3D3D3; } #odrmpeyvwi .gt_sourcenote { font-size: 90%; padding-top: 4px; padding-bottom: 4px; padding-left: 5px; padding-right: 5px; } #odrmpeyvwi .gt_left { text-align: left; } #odrmpeyvwi .gt_center { text-align: center; } #odrmpeyvwi .gt_right { text-align: right; font-variant-numeric: tabular-nums; } #odrmpeyvwi .gt_font_normal { font-weight: normal; } #odrmpeyvwi .gt_font_bold { font-weight: bold; } #odrmpeyvwi .gt_font_italic { font-style: italic; } #odrmpeyvwi .gt_super { font-size: 65%; } #odrmpeyvwi .gt_two_val_uncert { display: inline-block; line-height: 1em; text-align: right; font-size: 60%; vertical-align: -0.25em; margin-left: 0.1em; } #odrmpeyvwi .gt_footnote_marks { font-style: italic; font-weight: normal; font-size: 75%; vertical-align: 0.4em; } #odrmpeyvwi .gt_asterisk { font-size: 100%; vertical-align: 0; } #odrmpeyvwi .gt_slash_mark { font-size: 0.7em; line-height: 0.7em; vertical-align: 0.15em; } #odrmpeyvwi .gt_fraction_numerator { font-size: 0.6em; line-height: 0.6em; vertical-align: 0.45em; } #odrmpeyvwi .gt_fraction_denominator { font-size: 0.6em; line-height: 0.6em; vertical-align: -0.05em; } </style> <table class="gt_table"> <thead class="gt_col_headings"> <tr> <th class="gt_col_heading gt_columns_bottom_border gt_left" rowspan="1" colspan="1"></th> <th class="gt_col_heading gt_columns_bottom_border gt_left" rowspan="1" colspan="1" style="color: #A9A9A9; font-family: 'Source Sans Pro'; text-transform: uppercase;"></th> </tr> </thead> <tbody class="gt_table_body"> <tr class="gt_group_heading_row"> <td colspan="2" class="gt_group_heading" style="border-bottom-width: 3px; border-bottom-style: solid; border-bottom-color: black; color: #000000; font-weight: bold; background-color: #D3D3D3;">Journals</td> </tr> <tr class="gt_row_group_first"><td class="gt_row gt_right gt_stub" style="font-family: 'Fira Mono';"><a href ='https://rstudio.github.io/distill/' style='text-decoration:none;' target='_blank'> distill</a></td> <td class="gt_row gt_left" style="font-family: 'Source Sans Pro'; font-weight: 400;">Scientific and technical writing for the web</td></tr> <tr><td class="gt_row gt_right gt_stub" style="font-family: 'Fira Mono';"><a href ='https://github.com/rstudio/rticles' style='text-decoration:none;' target='_blank'> jss_article</a></td> <td class="gt_row gt_left" style="font-family: 'Source Sans Pro'; font-weight: 400;">Journal of Statistical Software (JSS)</td></tr> <tr><td class="gt_row gt_right gt_stub" style="font-family: 'Fira Mono';"><a href ='https://github.com/rstudio/rticles' style='text-decoration:none;' target='_blank'> acm_article</a></td> <td class="gt_row gt_left" style="font-family: 'Source Sans Pro'; font-weight: 400;">Association for Computing Machinery (ACM)</td></tr> <tr><td class="gt_row gt_right gt_stub" style="font-family: 'Fira Mono';"><a href ='https://github.com/rstudio/rticles' style='text-decoration:none;' target='_blank'> acs_article</a></td> <td class="gt_row gt_left" style="font-family: 'Source Sans Pro'; font-weight: 400;">American Chemical Society (ACS) Journal</td></tr> <tr><td class="gt_row gt_right gt_stub" style="font-family: 'Fira Mono';"><a href ='https://github.com/rstudio/rticles' style='text-decoration:none;' target='_blank'> ctex</a></td> <td class="gt_row gt_left" style="font-family: 'Source Sans Pro'; font-weight: 400;">Documents based on the LaTeX package ctex</td></tr> <tr><td class="gt_row gt_right gt_stub" style="font-family: 'Fira Mono';"><a href ='https://github.com/rstudio/rticles' style='text-decoration:none;' target='_blank'> elsevier_article</a></td> <td class="gt_row gt_left" style="font-family: 'Source Sans Pro'; font-weight: 400;">Submissions to Elsevier journals</td></tr> <tr class="gt_group_heading_row"> <td colspan="2" class="gt_group_heading" style="border-bottom-width: 3px; border-bottom-style: solid; border-bottom-color: black; color: #000000; font-weight: bold; background-color: #D3D3D3;">More</td> </tr> <tr class="gt_row_group_first"><td class="gt_row gt_right gt_stub" style="font-family: 'Fira Mono';"><a href ='flexdashboard/index.html' style='text-decoration:none;' target='_blank'> flexdashboard</a></td> <td class="gt_row gt_left" style="font-family: 'Source Sans Pro'; font-weight: 400;">Interactive dashboards</td></tr> <tr><td class="gt_row gt_right gt_stub" style="font-family: 'Fira Mono';"><a href ='https://bookdown.org' style='text-decoration:none;' target='_blank'> bookdown</a></td> <td class="gt_row gt_left" style="font-family: 'Source Sans Pro'; font-weight: 400;">HTML, PDF, ePub, and Kindle books</td></tr> <tr><td class="gt_row gt_right gt_stub" style="font-family: 'Fira Mono';"><a href ='https://bookdown.org/yihui/rmarkdown/rmarkdown-site.html' style='text-decoration:none;' target='_blank'> Websites</a></td> <td class="gt_row gt_left" style="font-family: 'Source Sans Pro'; font-weight: 400;">Multi-page websites</td></tr> <tr><td class="gt_row gt_right gt_stub" style="font-family: 'Fira Mono';"><a href ='https://bookdown.org/yihui/blogdown/' style='text-decoration:none;' target='_blank'> blogdown</a></td> <td class="gt_row gt_left" style="font-family: 'Source Sans Pro'; font-weight: 400;">Customizable websites and blogs</td></tr> <tr><td class="gt_row gt_right gt_stub" style="font-family: 'Fira Mono';"><a href ='https://pkgdown.r-lib.org/' style='text-decoration:none;' target='_blank'> pkgdown</a></td> <td class="gt_row gt_left" style="font-family: 'Source Sans Pro'; font-weight: 400;">Package documentation websites</td></tr> <tr><td class="gt_row gt_right gt_stub" style="font-family: 'Fira Mono';"><a href ='https://bookdown.org/yihui/rmarkdown/tufte-handouts.html' style='text-decoration:none;' target='_blank'> Tufte Handout</a></td> <td class="gt_row gt_left" style="font-family: 'Source Sans Pro'; font-weight: 400;">Handouts in the style of Edward Tufte</td></tr> <tr><td class="gt_row gt_right gt_stub" style="font-family: 'Fira Mono';"><a href ='https://bookdown.org/yihui/rmarkdown/r-package-vignette.html' style='text-decoration:none;' target='_blank'> Package Vignette</a></td> <td class="gt_row gt_left" style="font-family: 'Source Sans Pro'; font-weight: 400;">R package vignette (HTML)</td></tr> <tr><td class="gt_row gt_right gt_stub" style="font-family: 'Fira Mono';"><a href ='github_document_format.html' style='text-decoration:none;' target='_blank'> Github Document</a></td> <td class="gt_row gt_left" style="font-family: 'Source Sans Pro'; font-weight: 400;">GitHub Flavored Markdown document.</td></tr> </tbody> </table> </div> ] --- ### Remember, it's all just code! The different outputs are used for their specific purposes, but remember that the _way_ of writing, adding code, etc is shared across them all! -- Learn RMarkdown and R, and you can use your code to generate: - Plots - Tables - Text - Reports - Presentations - Websites - Books - Whatever you can think of! --- ### `html_document` The "workhorse" of RMarkdown, this is the default format. Amazing amount of power in HTML and has the richest feature set. [RMarkdown - html_document](https://bookdown.org/yihui/rmarkdown/html-document.html) -- ### `pdf_document` Useful when you prefer LaTeX instead of HTML, or if you need PDF as an output. [RMarkdown - pdf_document](https://bookdown.org/yihui/rmarkdown/html-document.html) --- ## Office compliance The Office standards, but created programatically with R and RMarkdown! -- ### `word_document` [RMarkdown word_document](https://bookdown.org/yihui/rmarkdown/word-document.html) ### `powerpoint` [RMarkdown powerpoint](https://bookdown.org/yihui/rmarkdown/powerpoint-presentation.html) --- ### `xaringan` Exceptionally powerful/beautiful presentations created with RMarkdown. [RMarkdown xaringan](https://bookdown.org/yihui/rmarkdown/xaringan.html) --- ### `distill` My personal favorite format, scientific writing native to the web! > Distill for R Markdown is a web publishing format optimized for scientific and technical communication. Distill articles include: - Reader-friendly typography that adapts well to mobile devices. - Features essential to technical writing like LaTeX math, citations, and footnotes. - Flexible figure layout options (e.g. displaying figures at a larger width than the article text). - Attractively rendered tables with optional support for pagination. - Support for a wide variety of diagramming tools for illustrating concepts. - The ability to incorporate JavaScript and D3-based interactive visualizations. - A variety of ways to publish articles, including support for publishing sets of articles as a Distill website or as a Distill blog. [Distill for RMarkdown](https://rstudio.github.io/distill/) --- ### `bookdown` Write entire _books_ in RMarkdown! The RMarkdown book itself was written this way. [RMarkdown bookdown](https://bookdown.org/yihui/rmarkdown/books.html) --- ### Resources - [RMarkdown Homepage](https://rmarkdown.rstudio.com/) - [RMarkdown package docs](https://rmarkdown.rstudio.com/docs/) - [RMarkdown learning track](https://rmarkdown.rstudio.com/lesson-1.html) - [RMarkdown: The Definitive Guide](https://bookdown.org/yihui/rmarkdown/) - [The RMarkdown Cookbook](https://bookdown.org/yihui/rmarkdown-cookbook/) - [Visual RMarkdown Guide](https://rstudio.github.io/visual-markdown-editing/) - [R4DS Rmarkdown - Communicate](https://r4ds.had.co.nz/r-markdown.html) - [RMarkdown Driven Development](https://www.rstudio.com/resources/rstudioconf-2020/rmarkdown-driven-development/) - [RMarkdown for Scientists](https://rmd4sci.njtierney.com/)