Я создал листовую карту урожая кукурузы в Канзасе, используя данные USDA NASS.Проблема, с которой я сталкиваюсь, заключается в экспорте листовки в html-файл с помощью команды:
htmlwidgets::saveWidget(my_interactive_map, "kansas_corn2.html")
, но я получаю эту ошибку:
Error in system.file(config, package = package) : 'package' must be of length 1
Однако я могу создать htmlфайл с помощью Экспорт> Сохранить как веб-страницу .. из панели просмотра.
Как получить тот же результат экспорта с помощью командной строки?Мой код для создания карты:
my_interactive_map <- tm_shape(STATE) +
tm_polygons("Value", textNA = "Not Reported",
title = unit_desc, palette=c('#8290af','#512888','#190019'),
auto.palette.mapping=FALSE, n = 6, style = "quantile", contrast = 0.9, colorNA = "#C0C0C0",
border.col = "#E8E8E8", showNA = FALSE, legend.is.portrait = FALSE,
legend.hist = FALSE, popup.vars = c("County: " = "COUNTY_NAME", "Value: " = "Value")) +
tm_credits("U.S. Department of Agriculture, National Agriculture Statistics Service") +
tm_format_World(title = paste(year_filt, prodn_practice_desc, commodity_desc, statisticcat_desc, "by",
agg_level_desc, "for", state, sep = " "))
my_interactive_map