├── Intro-to-flexdashboard-with-penguins.pdf ├── LICENSE ├── README.md ├── culmen_depth.png ├── intro-to-flexdashboard.Rproj ├── penguins.Rmd └── penguins.png /Intro-to-flexdashboard-with-penguins.pdf: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/SamanthaToet/intro-to-flexdashboard/34a3a790e5b7a2941436c2df19d825cfd46ef593/Intro-to-flexdashboard-with-penguins.pdf -------------------------------------------------------------------------------- /LICENSE: -------------------------------------------------------------------------------- 1 | Creative Commons Legal Code 2 | 3 | CC0 1.0 Universal 4 | 5 | CREATIVE COMMONS CORPORATION IS NOT A LAW FIRM AND DOES NOT PROVIDE 6 | LEGAL SERVICES. DISTRIBUTION OF THIS DOCUMENT DOES NOT CREATE AN 7 | ATTORNEY-CLIENT RELATIONSHIP. CREATIVE COMMONS PROVIDES THIS 8 | INFORMATION ON AN "AS-IS" BASIS. CREATIVE COMMONS MAKES NO WARRANTIES 9 | REGARDING THE USE OF THIS DOCUMENT OR THE INFORMATION OR WORKS 10 | PROVIDED HEREUNDER, AND DISCLAIMS LIABILITY FOR DAMAGES RESULTING FROM 11 | THE USE OF THIS DOCUMENT OR THE INFORMATION OR WORKS PROVIDED 12 | HEREUNDER. 13 | 14 | Statement of Purpose 15 | 16 | The laws of most jurisdictions throughout the world automatically confer 17 | exclusive Copyright and Related Rights (defined below) upon the creator 18 | and subsequent owner(s) (each and all, an "owner") of an original work of 19 | authorship and/or a database (each, a "Work"). 20 | 21 | Certain owners wish to permanently relinquish those rights to a Work for 22 | the purpose of contributing to a commons of creative, cultural and 23 | scientific works ("Commons") that the public can reliably and without fear 24 | of later claims of infringement build upon, modify, incorporate in other 25 | works, reuse and redistribute as freely as possible in any form whatsoever 26 | and for any purposes, including without limitation commercial purposes. 27 | These owners may contribute to the Commons to promote the ideal of a free 28 | culture and the further production of creative, cultural and scientific 29 | works, or to gain reputation or greater distribution for their Work in 30 | part through the use and efforts of others. 31 | 32 | For these and/or other purposes and motivations, and without any 33 | expectation of additional consideration or compensation, the person 34 | associating CC0 with a Work (the "Affirmer"), to the extent that he or she 35 | is an owner of Copyright and Related Rights in the Work, voluntarily 36 | elects to apply CC0 to the Work and publicly distribute the Work under its 37 | terms, with knowledge of his or her Copyright and Related Rights in the 38 | Work and the meaning and intended legal effect of CC0 on those rights. 39 | 40 | 1. Copyright and Related Rights. A Work made available under CC0 may be 41 | protected by copyright and related or neighboring rights ("Copyright and 42 | Related Rights"). Copyright and Related Rights include, but are not 43 | limited to, the following: 44 | 45 | i. the right to reproduce, adapt, distribute, perform, display, 46 | communicate, and translate a Work; 47 | ii. moral rights retained by the original author(s) and/or performer(s); 48 | iii. publicity and privacy rights pertaining to a person's image or 49 | likeness depicted in a Work; 50 | iv. rights protecting against unfair competition in regards to a Work, 51 | subject to the limitations in paragraph 4(a), below; 52 | v. rights protecting the extraction, dissemination, use and reuse of data 53 | in a Work; 54 | vi. database rights (such as those arising under Directive 96/9/EC of the 55 | European Parliament and of the Council of 11 March 1996 on the legal 56 | protection of databases, and under any national implementation 57 | thereof, including any amended or successor version of such 58 | directive); and 59 | vii. other similar, equivalent or corresponding rights throughout the 60 | world based on applicable law or treaty, and any national 61 | implementations thereof. 62 | 63 | 2. Waiver. To the greatest extent permitted by, but not in contravention 64 | of, applicable law, Affirmer hereby overtly, fully, permanently, 65 | irrevocably and unconditionally waives, abandons, and surrenders all of 66 | Affirmer's Copyright and Related Rights and associated claims and causes 67 | of action, whether now known or unknown (including existing as well as 68 | future claims and causes of action), in the Work (i) in all territories 69 | worldwide, (ii) for the maximum duration provided by applicable law or 70 | treaty (including future time extensions), (iii) in any current or future 71 | medium and for any number of copies, and (iv) for any purpose whatsoever, 72 | including without limitation commercial, advertising or promotional 73 | purposes (the "Waiver"). Affirmer makes the Waiver for the benefit of each 74 | member of the public at large and to the detriment of Affirmer's heirs and 75 | successors, fully intending that such Waiver shall not be subject to 76 | revocation, rescission, cancellation, termination, or any other legal or 77 | equitable action to disrupt the quiet enjoyment of the Work by the public 78 | as contemplated by Affirmer's express Statement of Purpose. 79 | 80 | 3. Public License Fallback. Should any part of the Waiver for any reason 81 | be judged legally invalid or ineffective under applicable law, then the 82 | Waiver shall be preserved to the maximum extent permitted taking into 83 | account Affirmer's express Statement of Purpose. In addition, to the 84 | extent the Waiver is so judged Affirmer hereby grants to each affected 85 | person a royalty-free, non transferable, non sublicensable, non exclusive, 86 | irrevocable and unconditional license to exercise Affirmer's Copyright and 87 | Related Rights in the Work (i) in all territories worldwide, (ii) for the 88 | maximum duration provided by applicable law or treaty (including future 89 | time extensions), (iii) in any current or future medium and for any number 90 | of copies, and (iv) for any purpose whatsoever, including without 91 | limitation commercial, advertising or promotional purposes (the 92 | "License"). The License shall be deemed effective as of the date CC0 was 93 | applied by Affirmer to the Work. Should any part of the License for any 94 | reason be judged legally invalid or ineffective under applicable law, such 95 | partial invalidity or ineffectiveness shall not invalidate the remainder 96 | of the License, and in such case Affirmer hereby affirms that he or she 97 | will not (i) exercise any of his or her remaining Copyright and Related 98 | Rights in the Work or (ii) assert any associated claims and causes of 99 | action with respect to the Work, in either case contrary to Affirmer's 100 | express Statement of Purpose. 101 | 102 | 4. Limitations and Disclaimers. 103 | 104 | a. No trademark or patent rights held by Affirmer are waived, abandoned, 105 | surrendered, licensed or otherwise affected by this document. 106 | b. Affirmer offers the Work as-is and makes no representations or 107 | warranties of any kind concerning the Work, express, implied, 108 | statutory or otherwise, including without limitation warranties of 109 | title, merchantability, fitness for a particular purpose, non 110 | infringement, or the absence of latent or other defects, accuracy, or 111 | the present or absence of errors, whether or not discoverable, all to 112 | the greatest extent permissible under applicable law. 113 | c. Affirmer disclaims responsibility for clearing rights of other persons 114 | that may apply to the Work or any use thereof, including without 115 | limitation any person's Copyright and Related Rights in the Work. 116 | Further, Affirmer disclaims responsibility for obtaining any necessary 117 | consents, permissions or other rights required for any use of the 118 | Work. 119 | d. Affirmer understands and acknowledges that Creative Commons is not a 120 | party to this document and has no duty or obligation with respect to 121 | this CC0 or use of the Work. 122 | -------------------------------------------------------------------------------- /README.md: -------------------------------------------------------------------------------- 1 | # intro-to-flexdashboard 2 | Slides and sample dashboard for RLadies Cville Meetup 3 | -------------------------------------------------------------------------------- /culmen_depth.png: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/SamanthaToet/intro-to-flexdashboard/34a3a790e5b7a2941436c2df19d825cfd46ef593/culmen_depth.png -------------------------------------------------------------------------------- /intro-to-flexdashboard.Rproj: -------------------------------------------------------------------------------- 1 | Version: 1.0 2 | 3 | RestoreWorkspace: Default 4 | SaveWorkspace: Default 5 | AlwaysSaveHistory: Default 6 | 7 | EnableCodeIndexing: Yes 8 | UseSpacesForTab: Yes 9 | NumSpacesForTab: 2 10 | Encoding: UTF-8 11 | 12 | RnwWeave: Sweave 13 | LaTeX: pdfLaTeX 14 | -------------------------------------------------------------------------------- /penguins.Rmd: -------------------------------------------------------------------------------- 1 | --- 2 | title: "Penguins" 3 | output: 4 | flexdashboard::flex_dashboard: 5 | orientation: rows 6 | social: [ "twitter"] 7 | source_code: https://github.com/SamanthaToet/intro-to-flexdashboard 8 | date: "`r Sys.Date()`" 9 | runtime: shiny 10 | --- 11 | 12 | 38 | 39 | ```{r setup, include=FALSE} 40 | library(flexdashboard) 41 | library(knitr) 42 | library(palmerpenguins) 43 | library(shiny) 44 | library(tidyverse) 45 | 46 | penguins <- palmerpenguins::penguins 47 | 48 | ``` 49 | 50 | Analysis 51 | ===================================== 52 | 53 | Row 54 | ------------------------------------- 55 | 56 | ### Penguins measured 57 | 58 | ```{r n_penguins} 59 | n_penguins <- nrow(penguins) 60 | valueBox(n_penguins, icon = "fa-pencil", color = "#fa7404") 61 | ``` 62 | 63 | ### Average culmen length 64 | 65 | ```{r cul_length} 66 | cul_length <- paste0(round(mean(penguins$bill_length_mm, 67 | na.rm = TRUE)), " mm") 68 | valueBox(cul_length, 69 | icon = "fa-ruler", color = "#fa7404") 70 | ``` 71 | 72 | ### Average body mass 73 | 74 | ```{r mass} 75 | mass <- round(mean(penguins$body_mass_g, na.rm = TRUE)) 76 | 77 | gauge(mass, min = min(penguins$body_mass_g, na.rm = TRUE), 78 | max = max(penguins$body_mass_g, na.rm = TRUE), 79 | symbol = 'g', 80 | gaugeSectors( 81 | success = c(6000, 6300), 82 | warning = c(3000, 5999), 83 | danger = c(2700, 2999)), 84 | abbreviate = FALSE 85 | ) 86 | ``` 87 | 88 | Row 89 | ------------------------------------- 90 | 91 | ### Culmen Length vs. Body Mass 92 | 93 | ```{r plot, echo = FALSE} 94 | 95 | ggplot(penguins, aes(bill_length_mm, body_mass_g)) + 96 | geom_point(aes(color = species), size = 3, alpha = 0.8) + 97 | theme_minimal() + 98 | scale_color_manual(values = c("darkorange","purple","cyan4")) + 99 | labs(x = "Culmen length (mm)", 100 | y = "Body mass (g)", 101 | color = "Penguin species") 102 | 103 | ``` 104 | 105 | ### What are we measuring? 106 | 107 | ```{r image} 108 | knitr::include_graphics("culmen_depth.png") 109 | ``` 110 | 111 | Raw Data 112 | ===================================== 113 | 114 | Row 115 | ------------------------------------- 116 | 117 | ### Data Table of Raw Data 118 | 119 | ```{r table} 120 | DT::datatable(penguins, options = list( 121 | pageLength = 25, 122 | height = "600px" 123 | )) 124 | ``` 125 | 126 | Row {data-height=100} 127 | ------------------------------------- 128 | 129 | ```{r download} 130 | fluidRow( 131 | downloadHandler(filename = function() { 132 | return("penguins.csv") 133 | 134 | }, content = function(file) { 135 | write.csv(penguins, file) 136 | }) 137 | ) 138 | ``` 139 | -------------------------------------------------------------------------------- /penguins.png: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/SamanthaToet/intro-to-flexdashboard/34a3a790e5b7a2941436c2df19d825cfd46ef593/penguins.png --------------------------------------------------------------------------------