View source: R/odkc_tracks_as_wastd_tne.R
| odkc_tracks_as_wastd_tne | R Documentation |
Transform odkc_data$tracks into WAStD TurtleNestEncounters.
odkc_tracks_as_wastd_tne(data, user_mapping)
data |
A tibble of parsed ODKC Track or Nests,
e.g. |
user_mapping |
. |
A tibble suitable to
wastd_POST("turtle-nest-encounters")
## Not run:
data("odkc_data", package = "wastdr")
user_mapping <- NULL # see odkc_plan for actual user mapping
odkc_data$tracks %>%
odkc_tracks_as_wastd_tne(user_mapping) %>%
head(1) %>%
jsonlite::toJSON()
tne <- odkc_data$tracks %>%
odkc_tracks_as_wastd_tne(user_mapping) %>%
dplyr::mutate(reporter_id = 4, observer_id = 4) %>% # missing users in local dev
head()
tne_update <- dplyr::anti_join(x, tsc_data$enc, by = "source_id")
tne_create <- dplyr::anti_join(tsc_data$enc, x, by = "source_id")
tne_create %>%
wastd_POST("turtle-nest-encounters",
api_url = Sys.getenv("WASTDR_API_DEV_URL"),
api_token = Sys.getenv("WASTDR_API_DEV_TOKEN")
)
## End(Not run)
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.