R:在 map 上绘制圆形直方图/玫瑰图

Question

我试图在 map 上的特定坐标上绘制玫瑰图/圆形直方图，类似于在 map 上绘制饼图，如包 mapplots .

下面是一个用 mapplots 生成的例子(代码见下文)，我想用玫瑰图替换饼图



包裹circular让我绘制玫瑰图，但我无法将其与 mapplots 集成包裹。任何关于替代包或代码的建议来实现这一目标？

响应代码制作 map 的问题。这一切都基于mapplots包裹。我下载了 map 的 shapefile(我认为来自 http://www.freegisdata.org/)

library(mapplots)
library(shapefiles)

xlim = c(-180, 180)
ylim = c(-90, 90)

#load shapefile
wmap = read.shapefile ("xxx")

# define x,y,z for pies
x <- c(-100, 100)
y <- c(50, -50)
z1 <- c(0.25, 0.25, 0.5)
z2 <- c(0.5, 0.2, 0.3)
z <- rbind(z1,z2)
# define radii of the pies
r <- c(5, 10)

# it's easier to have all data in a single df

plot(NA, xlim = xlim, ylim = ylim, cex = 0.75, xlab = NA, ylab = NA)
draw.shape(wmap, col = "grey", border = "NA")
draw.pie(x,y,z,radius = r, col=c("blue", "yellow", "red"))
legend.pie (x = -160, y = -70, labels = c("0", "1", "2"), radius = 5,
bty = "n", cex = 0.5, label.dist=1.5, col = c("blue", "yellow", "red"))

然后可以使用legend.bubble添加饼图大小的图例

Answer 1

看看this example ，您可以使用 map 作为背景，并使用 Plotrix 绘制您的玫瑰图或 ggplot2 .在任何一种情况下，您都希望在 map 上叠加多个这些图表，这在 ggplot 中很容易完成，只需查看示例即可。