Fixed a bad URL in ex04_import-csvs.R

UCANR-IGIS · Jul 30, 2024 · b7e2ed1 · b7e2ed1
1 parent 0551700
commit b7e2ed1
Show file tree

Hide file tree

Showing 2 changed files with 10 additions and 5 deletions.
diff --git a/exercises/ex03_packages-functions-piping.R b/exercises/ex03_packages-functions-piping.R
@@ -1,5 +1,5 @@
 ##############################################################
-## EXERCISE 4: Install a package, functions, piping syntax
+## EXERCISE 3: Install a package, functions, piping syntax
 #############################################################
 
 ## 1. View the `archbold.apple`  data frame from the agridat package
@@ -17,6 +17,11 @@ head(archbold.apple)
 # head(archbold.apple)
 # View(archbold.apple)
 
+## Read about this dataset
+
+# ?archbold.apple
+# help("archbold.apple")
+
 #################################################
 ## Function Practice
 #################################################
@@ -46,9 +51,9 @@ head(archbold.apple)
 
 # Rewrite the following as a piped expression
 
-x1 <- seq(from = 1, to = 7, length.out = 500)
-x2 <- round(x1, digits = 2) 
-x3 <- sum(x2)
+x1 = seq(from = 1, to = 7, length.out = 500)
+x2 = round(x1, digits = 2) 
+x3 = sum(x2)
 
 ## CHALLENGE: 
 

diff --git a/exercises/ex04_import-csvs.R b/exercises/ex04_import-csvs.R
@@ -41,7 +41,7 @@ plot(cars_df$speed, cars_df$breaking_dist, pch = 16)
 ## IMPORT ANOTHER CSV FROM A URL
 ####################################################
 
-animals_df <- read.csv("https://raw.githubusercontent.com/ucanr-igis/intror_oct23/main/data/animals.csv")
+animals_df <- read.csv("https://raw.githubusercontent.com/ucanr-igis/intror_oct23/main/exercises/data/animals.csv")
 
 ## Preview the data frame in a View window