Instructions

Generate a reproducible example using reprex and the datapasta packages introduced in the asynchronous lecture. Only use the first five rows of the data when generating your example. Please post the reproducible example as a direct message to Professor Dunford in Slack.

Data

We’ll use the iris dataset (which is a built in dataset in R). See ?iris for more details.

dat <- iris
summary(dat)

##   Sepal.Length    Sepal.Width     Petal.Length    Petal.Width   
##  Min.   :4.300   Min.   :2.000   Min.   :1.000   Min.   :0.100  
##  1st Qu.:5.100   1st Qu.:2.800   1st Qu.:1.600   1st Qu.:0.300  
##  Median :5.800   Median :3.000   Median :4.350   Median :1.300  
##  Mean   :5.843   Mean   :3.057   Mean   :3.758   Mean   :1.199  
##  3rd Qu.:6.400   3rd Qu.:3.300   3rd Qu.:5.100   3rd Qu.:1.800  
##  Max.   :7.900   Max.   :4.400   Max.   :6.900   Max.   :2.500  
##        Species  
##  setosa    :50  
##  versicolor:50  
##  virginica :50  
##                 
##                 
##

Code

Please generate a reproducible example of the following code.

new_dat <- 
  data.frame(
    ave_sepal_length = mean(dat$Sepal.Length),
    ave_sepal_width = mean(dat$Sepal.Width),
    ave_petal_length = mean(dat$Petal.Length),
    ave_petal_width = mean(dat$Petal.Width),
    n_species = length(unique(dat$Species))
  )
new_dat

##   ave_sepal_length ave_sepal_width ave_petal_length ave_petal_width n_species
## 1         5.843333        3.057333            3.758        1.199333         3

Week 3 | Breakout 2 | Generate a Reproducible Example

Instructions

Data

Code