Data Analysis in R

Common Errors in Descriptive Analysis

Code Example 1

30-45 minutes Applied Step 7 of 8

Code

Code Example 1

7 / 8

Code

Code Example 1

n_before_join <- nrow(enrollment_prepared)

joined_data <- enrollment_prepared |>
  left_join(lab_data, by = "participant_id")

n_after_join <- nrow(joined_data)

tibble(
  step = "Join enrollment to laboratory data",
  rows_before = n_before_join,
  rows_after = n_after_join,
  row_difference = n_after_join - n_before_join
)