Nothing
knitr::opts_chunk$set( collapse = TRUE, comment = "#>", eval = FALSE )
These tests are designed to step through and manually check different features of the application. For each test within the app you will create and modify geometry and attributes. Then using mapview
check that the outputs are as expected.
library(mapedit) sf1 <- editAttributes(zoomto = 'Montana') mapview::mapview(sf1)
data.frame
data.frame
data <- data.frame( name = c('SiteA', 'SiteB'), type = factor(c('park', 'zoo'), levels = c('park', 'factory', 'zoo', 'warehouse')), size = c(35, 45), stringsAsFactors = FALSE ) sf2 <- editAttributes(data, zoomto = 'Montana') mapview::mapview(sf2)
sf
objectsf
objectsf3 <- editAttributes(sf2) mapview::mapview(sf3)
New Row
buttonUse this option when features don't share any attributes
sf
objectRow
buttonsf4 <- editAttributes(sf2) mapview::mapview(sf4)
sf
objectsf5 <- editAttributes(sf2) mapview::mapview(sf5)
Row
buttonsf6 <- editAttributes(zoomto = 'Montana') mapview::mapview(sf6)
Editing existing features from a multi-geometry input does not work with lines or points.
sf7 <- editAttributes(sf6) mapview::mapview(sf7)
sf8 <- editAttributes(sf7, col_add = FALSE) mapview::mapview(sf8)
Use this option when creating features that have common attributes
sf9 <- editAttributes(sf8, reset = FALSE) mapview::mapview(sf9)
Any scripts or data that you put into this service are public.
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.