x = import_db_data("C:/data/crashes_duck.duckdb", db_type = "vehicle", years = c("17"), columns = c("SEQEVT", "DRUGTY"))
y =  import_db_data(
    # db_dir,
    db_type = "crash",
    years = c("15", "16", "17"),
    columns = c("INJSVR", "CRSHTYPE", "CRSHMTH","TOTINJ", "TOTFATL", "MUNINAME", "MUNICODE" ,"MUNITYPE"),
    filter_by = "county:St. Croix"
  )

unique(y$CNTYCODE)
unique(y$countyname)
y |> county_rename(combine_with_old = TRUE) |> dplyr::select(countyname)
x


jacciz/wisdotcrashdatabase documentation built on June 3, 2023, 2:26 a.m.