Publications by SheaClark7

Document

02.04.2024

Introduction String Basics chac_data <- "Im 'very' hungry." stringr::str_length("I am hungry.") ## [1] 12 stringr::str_c(c("I", " am"), collapse = "") ## [1] "I am" stringr::str_c("I", " am", sep = " ;") ## [1] "I ; am" str_sort(c("John", "Mary", "Aaron")) ## [1] "Aaron" "John" "Mary" Matching Patterns flights %>% glimpse() ## Rows: 336,776 #...

339 sym

Document

29.03.2024

1. Import your data Import two related datasets from TidyTuesday Project. episodes <- readr::read_csv('https://raw.githubusercontent.com/rfordatascience/tidytuesday/master/data/2023/2023-08-08/episodes.csv') ## Rows: 300 Columns: 8 ## ── Column specification ────────────────────────────�...

1531 sym

Document

26.03.2024

Introduction nycflights13 Keys Mutating Joins Inner Join x <- tribble( ~key, ~val_x, 1, "x1", 2, "x2", 3, "x3" ) y <- tribble( ~key, ~val_y, 1, "y1", 2, "y2", 4, "y3" ) inner_join(x, y) ## Joining with `by = join_by(key)` ## # A tibble: 2 × 3 ## key val_x val_y ## <dbl> <chr> <chr> ## 1 ...

200 sym Python (5404 sym/43 pcs)

Document

22.03.2024

Import your data fishing <- read_csv("../00_data/fishing.csv") ## Rows: 65706 Columns: 7 ## ── Column specification ──────────────────────────────────────────────────────── ## Delimiter: "," ## chr (4): lake, species, comments, reg...

166 sym Python (4992 sym/12 pcs)

Document

19.03.2024

Tidy Data Pivoting long to wide form table4a_long <- table4a %>% pivot_longer(cols = c( '1999', '2000'), names_to = "year", values_to = "cases") wide to long form table4a_long %>% pivot_wider(names_from = year, values_from = cases) ## # A tibble: 3 × 3 ## country `1999` `20...

180 sym Python (2634 sym/16 pcs)

Document

07.03.2024

Import Data # excel file data <- read_excel("../00_data/Data3.xlsx") data ## # A tibble: 8,474 × 9 ## player_id first_name last_name birth_date birth_city birth_country ## <dbl> <chr> <chr> <dttm> <chr> <chr> ## 1 8467867 Bryan Adams 1977-03-20 00:00:00 Fort St. … CAN ...

405 sym R (3355 sym/12 pcs) 8 img

Document

06.03.2024

Introduction Question 2 Variation Visualizing Distributions diamonds %>% ggplot(aes(x = cut)) + geom_bar() diamonds %>% ggplot(mapping = aes(x = carat)) + geom_histogram(binwidth = 0.5) diamonds %>% filter(carat < 3) %>% ggplot(aes(x = carat)) + geom_histogram(binwidth = 0.5) diamonds %>% ggplot(aes(x...

260 sym R (1869 sym/20 pcs) 15 img

Publish Document

29.02.2024

Import data # excel file data <- read_excel("../00_data/Data3.xlsx") data ## # A tibble: 8,474 × 9 ## player_id first_name last_name birth_date birth_city birth_country ## <dbl> <chr> <chr> <dttm> <chr> <chr> ## 1 8467867 Bryan Adams 1977-03-20 00:00:00 Fort St. … CAN ...

163 sym Python (4368 sym/10 pcs)

Document

28.02.2024

Import data flights ## # A tibble: 336,776 × 19 ## year month day dep_time sched_dep_time dep_delay arr_time sched_arr_time ## <int> <int> <int> <int> <int> <dbl> <int> <int> ## 1 2013 1 1 517 515 2 830 819 ## 2 2013 1 1 533 529 ...

398 sym Python (20184 sym/51 pcs) 1 img

Document

27.02.2024

Import data # excel file data <- read_excel("../00_data/Data3.xlsx") data ## # A tibble: 8,474 × 9 ## player_id first_name last_name birth_date birth_city birth_country ## <dbl> <chr> <chr> <dttm> <chr> <chr> ## 1 8467867 Bryan Adams 1977-03-20 00:00:00 Fort St. … CAN ...

269 sym 1 img