Edit note about Sample column

Author: EllaKaye

src/library/datasets/data-raw/penguins.R

@@ -29,4 +29,4 @@ save(penguins, file = "./src/library/datasets/data/penguins.rda")
 # Check identical with version palmerpenguins package
 # rm(penguins)
 # load("./src/library/datasets/data/penguins.rda")
-# identical(penguins, palmerpenguins:::penguins_df) # without sample TRUE
+# identical(penguins, palmerpenguins:::penguins_df)

src/library/datasets/data-raw/penguins_raw.R

@@ -101,6 +101,6 @@ save(penguins_raw, file = "./src/library/datasets/data/penguins_raw.rda")
 # load("./src/library/datasets/data/penguins_raw.rda")
 # pp_penguins_raw <- palmerpenguins:::penguins_raw_df
 # attr(pp_penguins_raw, "spec") <- NULL
-# identical(penguins_raw[, 1:17], pp_penguins_raw) # without sample TRUE
+# identical(penguins_raw[, 1:17], pp_penguins_raw) # TRUE without Sample col
 # all.equal(tibble::as_tibble(penguins_raw[, 1:17]), palmerpenguins::penguins_raw, check.attributes = FALSE) # without sample TRUE