- html - 出于某种原因,IE8 对我的 Sass 文件中继承的 html5 CSS 不友好?
- JMeter 在响应断言中使用 span 标签的问题
- html - 在 :hover and :active? 上具有不同效果的 CSS 动画
- html - 相对于居中的 html 内容固定的 CSS 重复背景?
我正在尝试使用通过 FIPS 代码连接的两个数据集创建美国县的等值线图。我正在使用 maps
包county
和 county.fips
数据,像这样组合成一个 data.table(可能不是集成 FIPS 数据的最优雅的方式):
library(ggplot2)
library(maps)
library(data.table)
county <- map_data("county")
data(county.fips)
county.fips <- as.data.table(county.fips)
county.fips$polyname <- as.character(county.fips$polyname)
county.fips[, paste0("type", 1:2) := tstrsplit(polyname, ",")]
names(county.fips) <- c("FIPS","polyname","region","subregion")
county <- merge(county, county.fips, by=c("region", "subregion"), all=T)
county <- county[,1:7]
county <- as.data.table(county)
county <- na.omit(county)
setkey(county, order)
county[region=="washington" & subregion=="san juan", FIPS := 53055]
county[region=="washington" & subregion=="pierce", FIPS := 53053]
county[region=="florida" & subregion=="okaloosa", FIPS := 12091]
county[region=="louisiana" & subregion=="st martin", FIPS := 22099]
county[region=="north carolina" & subregion=="currituck", FIPS := 37053]
county[region=="texas" & subregion=="galveston", FIPS := 48167]
county[region=="virginia" & subregion=="accomack", FIPS := 51001]
county
dataset 在这里制作 map ,并使用具有相应 FIPS 列的不同数据集来填写各个县。使用
geom_map
时出现问题特别是
map_id
争论。
Error in unit(x, default.units) : 'x' and 'units' must have length > 0
当我使用
map_id=FIPS
运行它时
ggplot() +
geom_map(data=county, map=county,
aes(x=long, y=lat, map_id=FIPS))
map_id=region
运行它返回一个法线贴图并使用
map_id=subregion
运行它返回一张 map ,其中缺少大约 3 个州中的 2 个。我找到的最接近的答案是
this ,暗示
map_id
需要设置为
region
或
id
,但更改
FIPS
列名没有帮助。
map_id
只需要作为另一个
df$column
的 key ;我不正确吗?理想情况下,我希望能够通过
FIPS
绑定(bind)我的第二个数据集。列,像这样:
ggplot() +
geom_map(data=county, map=county,
aes(x=long, y=lat, map_id=FIPS)) +
geom_map(data=DT2, map=county,
aes(fill=Revenue, map_id=FIPS))
最佳答案
这里发生了几件事。首先,我注意到在上面的示例中,它切断了一些 FIPS 代码的前导零。所有 FIPS 都必须是五位数。您可以通过将此行添加到数据准备的末尾来添加前导零。
county$FIPS <- formatC(county$FIPS, width = 5, format = "d", flag = "0")
group=group
在你的 aes() 中。很难重现,因为我不确定您使用的是什么来填充等值线,但以下应该可以工作:
ggplot(county, aes(long, lat, group = group)) +
geom_polygon(aes(fill = YOUR_FILL_DATA), colour = alpha("white", 1/2), size = 0.2)
county$new.row <- sample(100, size = nrow(county), replace = TRUE)
关于r - geom_map "map_id"引用问题,我们在Stack Overflow上找到一个类似的问题: https://stackoverflow.com/questions/37819187/
既然 ggplot2 具有 geom_map,我正试图从旧的映射数据的方法转移到等值线图。第 10-11 页 (HERE) 中有一个示例。 我正在尝试使用我过去创建的等值线的数据集来执行此操作,而不是
我正在制作一个在 ggplot 中添加点的等值线图。所以,按照 geom_map help docs 的最后一个例子 我想到了这个: require(ggplot2) require(maps) se
这来自 ggplot2 文档: # Better example crimes <- data.frame(state = tolower(rownames(USArrests)), USArrest
我正在尝试使用通过 FIPS 代码连接的两个数据集创建美国县的等值线图。我正在使用 maps包county和 county.fips数据,像这样组合成一个 data.table(可能不是集成 FIPS
我有一张美国分散地区的 map 。这是在以下问题中(包含数据链接): mapping by ggplot2 geom_polygon goes crazy after merging data 得到了
我在 this question 中遇到与 @Mike 类似的问题.问题是如何设置 map 中区域的轮廓颜色。 建议的解决方案是添加一个 geom_polygon绘制边界。只要绘制了整个区域,这就会起
我刚刚开始使用 ggplot2 中的 geom_map 函数。阅读完我在 geom_map 上找到的 29 篇文章后,我仍然遇到同样的问题。 我的数据框大得离谱,包含 2000 多行。它基本上是由世界
我正在制作一张世界地图,用不同变量值的灰色阴影填充国家/地区。对于具有 NA 值的国家/地区,我想用之字形、斜线或影线填充它们。最终 map 将是黑白的,因此过多的灰色或彩色阴影不会产生可区分的结果。
我正在制作一张世界地图,用不同变量值的灰色阴影填充国家/地区。对于具有 NA 值的国家/地区,我想用之字形、斜线或影线填充它们。最终 map 将是黑白的,因此过多的灰色或彩色阴影不会产生可区分的结果。
我正在开发一个原始的 Shiny 应用程序,它将映射来自 Open Data for Scotland 的一些数据项目。我制定了 SPARQL 查询,该查询制造类似于下面提供的提取物的数据框 dz_l
我正在尝试展示纽约州 COVID 病例的增长情况 这段代码得到了我想要的情节,但没有动画或时间方面。 完整错误: Error in insert_points(polygon$x, polygon$y
我是一名优秀的程序员,十分优秀!