sf objects

[SymbolixAU]

Polygons ((MULTI)POLYGONS), paths ((MULTI)LINESTRINGS) and scatterplots ((MULTI)POINT) will work on a sfc column

Arcs and Lines will work on 2 sfc columns, one for origin and one for destination

Progress

• POINT - add_scatterplot()
• POINT - add_arc()
• POINT - add_line()
• POINT - add_grid()
• POINT - add_pointcloud()
• POINT - add_screengrid()
• POINT - add_hexagon()
• POINT - add_text()

---

• MULTIPOINT - add_scatterplot()
• MULTIPOINT - add_grid()
• MULTIPOINT - add_pointcloud()
• MULTIPOINT - add_screengrid()
• MULTIPOINT - add_hexagon()
• MULTIPOINT - add_text()

---

• LINESTRING - add_path()
• MULTILINESTRING - add_path()

---

• POLYGON - add_polygon()
• MULTIPOLYGON - add_polygon()

---

Error / Warning / Message on

• MULTIPOINT - add_arc() - point-to-point, so multipoint doesn't make sense
• MULTIPOINT - add_line() - point-to-point, so multipoint doesn't make sense

TODO - docs
document each function saying which sf object and geometries they accept (now in #77 )

[SymbolixAU]

reopening since spatialwidget dependency

[SymbolixAU]

reopening to add docs

[baoyingbaobao]

when using add_polygon, always reports error " Error in googlePolylines::geometryRow(data, geom, multi) :
unused argument (multi)"

[SymbolixAU]

@baoyingbaobao can you post a reproducible example please?

[baoyingbaobao]

@baoyingbaobao can you post a reproducible example please?

Hi I am just using the example code like this:

library(sf)
library(geojsonsf)
set_token(token = "mytoken")
df <- melbourne
df$elevation <- sample(100:5000, size = nrow(df))
df$info <- paste0("SA2 -
",df$SA2_NAME)

library(sf)
library(geojsonsf)

sf <- geojson_sf("https://symbolixau.github.io/data/geojson/SA2_2016_VIC.json")

mapdeck(
style = 'mapbox://styles/mapbox/dark-v9',
pitch = 90, location = c(144.348705, -38.149780),
zoom = 12
) %>%
add_polygon(
data = sf,
layer = "polygon_layer",
fill_colour = "n"
)

For some reason, it keeps giving me this error:
Error in googlePolylines::geometryRow(data, geom, multi) :
unused argument (multi)

[SymbolixAU]

@baoyingbaobao I don't receive that error

Can you try force installing the dev pacakges?

devtools::install_github("SymbolixAU/googlePolylines", force = TRUE)
devtools::install_github("SybolixAU/mapdeck", force = TRUE)

[baoyingbaobao]

devtools::install_github("SymbolixAU/googlePolylines", force = TRUE) devtools::install_github("SybolixAU/mapdeck", force = TRUE)

it works now. Thank you a bunch!