R- ошибка в листовке «Ошибка в cut.default (x, binsToUse, label = FALSE, include.lowest = TRUE,: 'breaks' не являются уникальными") - PullRequest
Новая
       17

R- ошибка в листовке «Ошибка в cut.default (x, binsToUse, label = FALSE, include.lowest = TRUE,: 'breaks' не являются уникальными")

0 голосов
/ 27 сентября 2018

Я использую код, который я нашел на Rstudio.github, и код следующий 

library(rgdal)

# From https://www.census.gov/geo/maps-data/data/cbf/cbf_state.html
states <- readOGR("shp/cb_2013_us_state_20m.shp",
  layer = "cb_2013_us_state_20m", GDAL1_integer64_policy = TRUE)
neStates <- subset(states, states$STUSPS %in% c(
  "CT","ME","MA","NH","RI","VT","NY","NJ","PA"
))

leaflet(neStates) %>%
  addPolygons(color = "#444444", weight = 1, smoothFactor = 0.5,
    opacity = 1.0, fillOpacity = 0.5,
    fillColor = ~colorQuantile("YlOrRd", ALAND)(ALAND),
    highlightOptions = highlightOptions(color = "white", weight = 2,
      bringToFront = TRUE))

Это прекрасно работает.Однако, когда я использую следующие, которые выбирают только один штат, чтобы добавить слой многоугольника, например, Калифорния.Я получил эту ошибку «Ошибка в cut.default (x, binsToUse, label = FALSE, include.lowest = TRUE,: 'breaks' не уникальны"

Код: 

states <- readOGR("shp/cb_2013_us_state_20m.shp",
  layer = "cb_2013_us_state_20m", GDAL1_integer64_policy = TRUE)
neStates <- subset(states, states$STUSPS %in% c("CA"))

leaflet(neStates) %>%
  addPolygons(color = "#444444", weight = 1, smoothFactor = 0.5,
    opacity = 1.0, fillOpacity = 0.5,
    fillColor = ~colorQuantile("YlOrRd", ALAND)(ALAND),
    highlightOptions = highlightOptions(color = "white", weight = 2,
      bringToFront = TRUE))

Любая идея, почему и как это исправить? Спасибо, и я очень ценю любое предложение!

...