Skip to content

Commit

Permalink
docs(sessions): remove all delims
Browse files Browse the repository at this point in the history
  • Loading branch information
lwjohnst86 committed May 7, 2024
1 parent 50c1f3a commit e472f89
Show file tree
Hide file tree
Showing 3 changed files with 16 additions and 28 deletions.
30 changes: 10 additions & 20 deletions sessions/functions.qmd
Original file line number Diff line number Diff line change
Expand Up @@ -275,8 +275,7 @@ import_user_info <- function() {
gender = col_character(),
weight = col_double(),
height = col_double(),
age = col_double(),
.delim = ","
age = col_double()
),
name_repair = snakecase::to_snake_case
)
Expand All @@ -298,8 +297,7 @@ import_user_info <- function(file_path) {
gender = col_character(),
weight = col_double(),
height = col_double(),
age = col_double(),
.delim = ","
age = col_double()
),
name_repair = snakecase::to_snake_case
)
Expand All @@ -321,8 +319,7 @@ import_user_info <- function(file_path) {
gender = col_character(),
weight = col_double(),
height = col_double(),
age = col_double(),
.delim = ","
age = col_double()
),
name_repair = snakecase::to_snake_case
)
Expand Down Expand Up @@ -357,8 +354,7 @@ import_user_info <- function(file_path) {
gender = col_character(),
weight = col_double(),
height = col_double(),
age = col_double(),
.delim = ","
age = col_double()
),
name_repair = snakecase::to_snake_case
)
Expand Down Expand Up @@ -456,8 +452,7 @@ import_saliva <- function(file_path) {
col_types = cols(
samples = col_character(),
cortisol_norm = col_double(),
melatonin_norm = col_double(),
.delim = ","
melatonin_norm = col_double()
),
name_repair = snakecase::to_snake_case
)
Expand Down Expand Up @@ -714,8 +709,7 @@ import_user_info <- function(file_path) {
gender = readr::col_character(),
weight = readr::col_double(),
height = readr::col_double(),
age = readr::col_double(),
.delim = ","
age = readr::col_double()
),
name_repair = snakecase::to_snake_case
)
Expand Down Expand Up @@ -781,8 +775,7 @@ ___ <- function(___) {
___,
col_select = ___,
col_types = ___::cols(
___,
.delim = ","
___
),
name_repair = snakecase::to_snake_case
)
Expand All @@ -808,8 +801,7 @@ import_saliva <- function(file_path) {
col_types = readr::cols(
samples = readr::col_character(),
cortisol_norm = readr::col_double(),
melatonin_norm = readr::col_double(),
.delim = ","
melatonin_norm = readr::col_double()
),
name_repair = snakecase::to_snake_case
)
Expand All @@ -830,8 +822,7 @@ import_rr <- function(file_path) {
ibi_s = readr::col_double(),
day = readr::col_double(),
# Converts to seconds
time = readr::col_time(format = ""),
.delim = ","
time = readr::col_time(format = "")
),
name_repair = snakecase::to_snake_case
)
Expand Down Expand Up @@ -860,8 +851,7 @@ import_actigraph <- function(file_path) {
inclinometer_lying = readr::col_double(),
vector_magnitude = readr::col_double(),
day = readr::col_double(),
time = readr::col_time(format = ""),
.delim = ","
time = readr::col_time(format = "")
),
name_repair = snakecase::to_snake_case
)
Expand Down
11 changes: 5 additions & 6 deletions sessions/hands-on-work.qmd
Original file line number Diff line number Diff line change
Expand Up @@ -104,8 +104,7 @@ import_activity <- function(file_path) {
activity = readr::col_double(),
start = readr::col_time(format = ""),
end = readr::col_time(format = ""),
day = readr::col_double(),
.delim = ","
day = readr::col_double()
),
name_repair = snakecase::to_snake_case
)
Expand All @@ -131,10 +130,10 @@ tasks to clean the data up more.
fix within the `data-raw/mmash.R` cleaning script.

```{r}
#| filename: "data-raw/mmash.R"
#| eval: false
mmash |>
filter(user_id == "user_21")
#| filename: "data-raw/mmash.R"
#| eval: false
mmash |>
filter(user_id == "user_21")
```
- **Hint**: Look into user 21's folder at their `.csv` files they
Expand Down
3 changes: 1 addition & 2 deletions sessions/importing.qmd
Original file line number Diff line number Diff line change
Expand Up @@ -305,8 +305,7 @@ user_1_info_data <- read_csv(
gender = col_character(),
weight = col_double(),
height = col_double(),
age = col_double(),
.delim = ","
age = col_double()
),
name_repair = snakecase::to_snake_case
)
Expand Down

0 comments on commit e472f89

Please sign in to comment.