Convert Simulation results back to data format

back_convert_simulation(data)

Examples

#> Source Code:
back_convert_simulation
#> function (data) 
#> {
#>     data_date_crs <- data %>% st_transform(crs = bic_proj) %>% 
#>         mutate(t = lubridate::as_datetime(t))
#>     crds <- data_date_crs %>% st_coordinates() %>% as_tibble()
#>     data_date_crs %>% mutate(individual.local.identifier = id, 
#>         Z = crds$X + (0+1i) * crds$Y, timestamp2 = t %>% lubridate::with_tz("EST") %>% 
#>             lubridate::round_date("4 minute"))
#> }
#> <bytecode: 0x55a2e81ffe38>
#> <environment: namespace:fftidy>