In PublicMapping/dbclient:

names(contestPlans.tb)

unassigned.tb<-contestPlans.tb %>% rowwise() %>% transmute(head= map %>% as.data.frame() %>% slice_head(n=1)) %>%unpack(head)

unassigned_scores.tb <- unassigned.tb %>% rowwise() %>% transmute(
  unassigned_geography=(length(geometry[[1]])>0),
  unassigned_population= sum(c_across(starts_with("properties.demographics")),na.rm=TRUE)>0
           )

contestPlans.tb %<>% bind_cols(unassigned_scores.tb)  %>% relocate(plan_name,url,unassigned_geography,unassigned_population)

PublicMapping/dbclient documentation built on Aug. 27, 2022, 9:55 a.m.