0

我正在尝试使用geom_scatterpiescatterpie 包生成 scatterpies。我正在使用来自scatterpie 小插图的示例数据

set.seed(123)
long <- rnorm(50, sd=100)
lat <- rnorm(50, sd=50)
d <- data.frame(long=long, lat=lat)
d <- with(d, d[abs(long) < 150 & abs(lat) < 70,])
n <- nrow(d)
d$region <- factor(1:n)
d$A <- abs(rnorm(n, sd=1))
d$B <- abs(rnorm(n, sd=2))
d$C <- abs(rnorm(n, sd=3))
d$D <- abs(rnorm(n, sd=4))
d[1, 4:7] <- d[1, 4:7] * 3
head(d)

这会产生以下df。

> head(d)
         long        lat region          A        B        C        D
1  -56.047565  12.665926      1 2.13121969 8.663359 3.928711 8.676792
2  -23.017749  -1.427338      2 0.25688371 1.403569 1.375096 4.945092
4    7.050839  68.430114      3 0.24669188 0.524395 3.189978 5.138863
5   12.928774 -11.288549      4 0.34754260 3.144288 3.789556 2.295894
8 -126.506123  29.230687      5 0.95161857 3.029335 1.048951 2.471943
9  -68.685285   6.192712      6 0.04502772 3.203072 2.596539 4.439393

运行与小插图中相同的代码时

ggplot() + geom_scatterpie(aes(x=long, y=lat, group=region), data=d,
                           cols=LETTERS[1:4]) + coord_equal()

我收到以下神秘的错误消息

Error in (function (x, strict = TRUE)  :
  the argument has already been evaluated

这是ggplotandgeom_scatterpie或ggforceand之间的不兼容geom_scatterpie吗？有人可以指出我正确的方向吗？

我正在使用 R 版本 3.4.3、ggplot 版本 2.2.1、ggforce 版本 0.1.1 和 scatterpie 版本 0.1.0。

4

0 回答 0