我正在尝试使用scatterpie包中的flist <- list.files(pattern=".txt")
WrongResult <- list()
interesting <- c("ic1", "ic2", "ic3")
for (v in 1:length(flist)) {
dtf <- read.delim(flist[v], header=TRUE, sep="\t", stringsAsFactors=FALSE)
WrongResult[[v]] <- dtf[dtf$coi %in% interesting, "coi"]
}
WrongResult
setwd(owd)
生成散点图。我正在使用the scatterpie vignette
geom_scatterpie这会产生以下df。
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)
运行与插图中相同的代码
> 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
和ggplot或geom_scatterpie和ggforce之间的不兼容吗？
有人可以指点我正确的方向吗？
我使用的是R版本3.4.3，ggplot版本2.2.1，ggforce版本0.1.1和scatterpie版本0.1.0。