search

jmsigner / amt

37 stars 13 forks source link

CRS for `hr_akde` #41

Closed jmsigner closed 2 years ago

jmsigner commented 3 years ago 
dat %>% nest(data = -id) %>%
  mutate(akde = map(data,~ hr_akde(., fit_ctmm(., "ou")))) %>% hr_to_sf(akde, id) %>%
  st_write("akde.shp")

The CRS is lost.