diff --git a/modules/RStudio/lab/RStudio_Lab_Key.Rmd b/modules/RStudio/lab/RStudio_Lab_Key.Rmd index 2588ca35..90b3cb6a 100644 --- a/modules/RStudio/lab/RStudio_Lab_Key.Rmd +++ b/modules/RStudio/lab/RStudio_Lab_Key.Rmd @@ -5,71 +5,32 @@ editor_options: chunk_output_type: console --- -## R Markdown +# R Markdown -Please read through everything and then try the exercises. +Please read through everything and then try the exercises. This is an R Markdown document. Markdown is a simple formatting syntax for authoring HTML, PDF, and MS Word documents. For more details on using R Markdown see . The way you can create a file like this in RStudio is: File → New File → R Markdown and then using the default or using a template. -This is an R Markdown document. Markdown is a simple formatting syntax for authoring HTML, PDF, and MS Word documents. For more details on using R Markdown see . +### The Code -The way you can create a file like this in RStudio is: File → New File → R Markdown and then using the default or using a template. - -Now we will install some packages! Note it may take ~5-10 minutes to run all these steps. **You need to run these steps in the order listed.** - -### 0.1 - -First copy and paste the following code into the console (the lower left panel/pane): -install.packages("remotes") - -This code will install a package from CRAN called "remotes".
-You may be asked a question in the console when you do this. If so, answer by typing Yes into the console. - -### 0.2 - -Next copy and paste the following code again into the console (the lower left panel/pane): -library(remotes) - -This code loads the remotes package into memory- in other words we can use the functions within the package.
-You may be asked a question in the console when you do this. If so, answer by typing Yes into the console. - -### 0.3 - -Now install a package that the instructors made that is not on CRAN but on GitHub, by copy and pasting the code into the console: - -install_github("fhdsl/dasehr") - -You may be asked a question in the console when you do this. If so, answer by typing Yes into the console. - -### 0.4 - -The gray area below is a code chunk that will set up our packages and data (this will not show up in the rendered report when we press knit). You can also run the code within the editor area by pressing the green play button. Don't worry right now about what the code is doing, we will cover this later. We just want you to get used to RStudio and RMarkdowns. +The gray area below is a code chunk that will set up our packages and data. You can also run the code within the editor area by pressing the green play button. Don't worry right now about what the code is doing, we will cover this later. We just want you to get used to RStudio and RMarkdowns. This dataset is one we'll be working with quite a lot in the lectures. It contains county-level data about ER visits for heat-related illnesses in Colorado for the years 2011-2022. ```{r setup, message=FALSE} -knitr::opts_chunk$set(echo = TRUE) -library(dasehr) -library(ggplot2) -library(dplyr) +library(tidyverse) -ER <- CO_heat_ER_bygender +er <- read_csv(file = "https://daseh.org/data/CO_ER_heat_visits.csv") # keep non-missing data -ER_2 <- ER %>% +er_2 <- er %>% filter(!is.na(rate)) ``` -When you click the **Knit** button (at the top of RStudio), a document will be generated that includes both content as well as the output of any embedded R code chunks within the document. -Next we will show you some code - no worries about understanding it yet, we just want to get you familiar with where code goes. - -When code is in an RMarkdown file chunk, it is saved to a file. When it is in the console, it is not saved. +When you click the **Knit** button (at the top of RStudio), a document will be generated that includes both content as well as the output of any embedded R code chunks within the document. Next we will show you some code - no worries about understanding it yet, we just want to get you familiar with where code goes. When code is in an RMarkdown file chunk, it is saved to a file. When it is in the console, it is not saved. The console is useful for installing packages like we just did, this is because we only need to do it once, so we don't usually need to save the code. -The console is useful for installing packages like we just did, this is because we only need to do it once, so we don't usually need to save the code. +### Plotting some data -## Plotting some data - -Here is code that will make a plot of some data. -You can embed an R code chunk like this: Try pressing the green play button to see what happens. Make sure you have run the previous code chunk first by pressing the green play button in that chunk. +Here is code that will make a plot of some data.You can embed an R code chunk like this: Try pressing the green play button to see what happens. Make sure you have run the previous code chunk first by pressing the green play button in that chunk. ```{r plot, out.width = "100%"} # keep only some counties -ER_3 <- ER_2 %>% +er_3 <- er_2 %>% filter(county %in% c("Arapahoe", "Denver", "Jefferson", "Larimer")) palette <- c( @@ -79,15 +40,14 @@ palette <- c( Larimer = "purple" ) -ggplot(aes(x = year, y = rate, colour = county, group = county), data = ER_3) + +ggplot(aes(x = year, y = rate, colour = county, group = county), data = er_3) + geom_line() + - facet_wrap(~gender) + scale_colour_manual(values = palette) ``` ```{r out.width = "100%", label = '0response'} # keep only some counties -ER_3 <- ER_2 %>% +er_3 <- er_2 %>% filter(county %in% c("Arapahoe", "Denver", "Jefferson", "Larimer")) palette <- c( @@ -97,32 +57,30 @@ palette <- c( Larimer = "salmon" ) -ggplot(aes(x = year, y = rate, colour = county, group = county), data = ER_3) + +ggplot(aes(x = year, y = rate, colour = county, group = county), data = er_3) + geom_line() + - facet_wrap(~gender) + scale_colour_manual(values = palette) ``` -## Exercise +# Exercise Here are a few changes that will show you how to change small things in `R` code and the output it makes. After each change, hit the **Knit** button again. - - ### 1.1 Go through the code for the plot above and change the colors in `palette` to something other than what they originally were. See http://www.stat.columbia.edu/~tzheng/files/Rcolor.pdf for a large list of colors. For example, you could replace blue with red. ### 1.2 -Add a new R chunk below the following chunk. You can use the insert chunk button or copy paste an existing code chunk. Include a lowercase x inside the chunk as the code. Make sure you press the knit button after this to see what the new chunk looks like. - +Add a new R chunk after ``. You can use the insert chunk button or copy paste an existing code chunk. Include a lowercase x inside the chunk as the code. Make sure you press the knit button after this to see what the new chunk looks like. ```{r} x <- c(1, 2, 3) ``` + + # Practice on Your Own! ### P.1 @@ -132,6 +90,3 @@ Update the options of the R chunk you just made (with the lowercase x in it) so ### P.2 Create another R Markdown Document from RStudio dropdowns: File → New File → R Markdown. - - -