uc2 dplyr17 2

darwinanddavis · Aug 25, 2024 · e9c65db · e9c65db
1 parent 55d6e69
commit e9c65db
Show file tree

Hide file tree

Showing 2 changed files with 23 additions and 19 deletions.
diff --git a/UsefulCode2.Rmd b/UsefulCode2.Rmd
@@ -807,7 +807,9 @@ Separate/split df into individual dfs based on repeating value in a column
 df %>% 
   mutate(trips = cumsum(IDS == 0)) %>% # create new helper col between every instance of 0 in IDS
   group_by(trips) %>% # group by this helper col 
-  group_split() # spit into individual dfs 
+  group_split() %>% # spit into individual dfs 
+  set_names(LETTERS[1:length(.)]) %>%  # create new names for each df
+  imap(~write_csv(.x, paste0(.y, ".csv"))) # save each object '.x' as '.y' to dir as csv based on their list names   
 ```
 
 

diff --git a/UsefulCode2.html b/UsefulCode2.html