library(tidyverse)

main_csv <- "~/analysis_data/102125_constituent_dfs/110525_olmo_batched_categorized.csv"
main_df <- read.csv(main_csv, header = TRUE) 

c3_df <- main_df |>
  filter(source=="c3")