小编use*_*073的帖子

所以我在R中有一个名为obesity_map的数据框,它基本上给我了每个县的州,县和肥胖率.它看起来或多或少像这样:

obesity_map = data.frame(state, county, obesity_rate)

我试图通过显示整个美国各县的各种肥胖率来在地图上想象这个:

us.state.map <- map_data('state')
head(us.state.map)
states <- levels(as.factor(us.state.map$region))
df <- data.frame(region = states, value = runif(length(states), min=0, max=100),stringsAsFactors = FALSE)

map.data <- merge(us.state.map, df, by='region', all=T)
map.data <- map.data[order(map.data$order),]
head(map.data)

map.county <- map_data('county')
county.obesity <- data.frame(region = obesity_map$state, subregion = obesity_map$county, value = obesity_map$obesity_rate)
map.county <- merge(county.obesity, map.county, all=TRUE)
ggplot(map.county, aes(x = long, y = lat, group=group, fill=as.factor(value))) + geom_polygon(colour = "white", size = 0.1)

它基本上创建了一个如下所示的图像:

正如你所看到的,美国被划分为奇怪的形状,颜色不是一致的颜色,在不同的渐变中,你不能从中获得很多.但我真正想要的是下面的内容,但每个县都填写:

我对此很新,所以我很感激所有的帮助!

编辑:

这是dput的输出:

dput(obesity_map)

结构(列表(X = 1:3141,FIPS …