Edit for parallelism

jennybc · Apr 11, 2018 · 45b31ee · 45b31ee
1 parent 69b584c
commit 45b31ee
Show file tree

Hide file tree

Showing 2 changed files with 7 additions and 7 deletions.
diff --git a/ex07_group-by-summarise.R b/ex07_group-by-summarise.R
@@ -29,7 +29,7 @@ library(tidyverse)
 
 iris %>%
   group_by(Species) %>%
-  summarise(pl_avg = mean(Petal.Length), pw = mean(Petal.Width))
+  summarise(pl_avg = mean(Petal.Length), pw_avg = mean(Petal.Width))
 
 #' What if you want to return summaries that are not just a single number?
 #'

diff --git a/ex07_group-by-summarise.md b/ex07_group-by-summarise.md
@@ -17,13 +17,13 @@ library(tidyverse)
 
 iris %>%
   group_by(Species) %>%
-  summarise(pl_avg = mean(Petal.Length), pw = mean(Petal.Width))
+  summarise(pl_avg = mean(Petal.Length), pw_avg = mean(Petal.Width))
 #> # A tibble: 3 x 3
-#>   Species    pl_avg    pw
-#>   <fct>       <dbl> <dbl>
-#> 1 setosa       1.46 0.246
-#> 2 versicolor   4.26 1.33 
-#> 3 virginica    5.55 2.03
+#>   Species    pl_avg pw_avg
+#>   <fct>       <dbl>  <dbl>
+#> 1 setosa       1.46  0.246
+#> 2 versicolor   4.26  1.33 
+#> 3 virginica    5.55  2.03
 ```
 
 What if you want to return summaries that are not just a single number?