我想在圖層中建立一個情節，其中每一層都在前一層的前面。在下面的簡化示例中，它似乎只生成一層，我不明白為什么。
arcs <- data.frame(
radius = seq(from = 10, to = 100, by = 10)
)
g <- ggplot(arcs)
for(yc in 1:3) {
for(xc in 1:3) {
g <- g ggforce::geom_arc_bar(aes(x0 = xc * 10, y0 = yc * 10,
r0 = radius - 2, r = radius, start = 0, end = 2 * pi),
fill = 'blue', alpha = 0.1, colour = NA)
}
}
g <- g
coord_equal()
print(g)
uj5u.com熱心網友回復：
您需要告訴ggplot將運算式aes()作為外部變數進行評估。
g <- ggplot(arcs)
for(yc in 1:3) {
y0 <- yc * 10
for(xc in 1:3) {
x0 <- xc * 10
g <- g ggforce::geom_arc_bar(aes(x0 = {{x0}}, y0 = {{y0}},
r0 = radius - 2, r = radius, start = 0, end = 2 * pi),
fill = 'blue', alpha = 0.1, colour = NA)
}
}
g <- g
coord_equal()
print(g)
uj5u.com熱心網友回復：
你在尋找這樣的東西嗎？
arcs <- data.frame(
radius = seq(from = 10, to = 100, by = 10)
)
g <- ggplot(arcs, aes(x0 = x, y0 = y))
for(yc in 1:3) {
for(xc in 1:3) {
g <- g ggforce::geom_arc_bar(
data = data.frame(radius = arcs$radius, x = xc * 10, y = yc * 10),
aes(r0 = radius - 2, r = radius, start = 0, end = 2 * pi),
fill = 'blue', alpha = 0.1, colour = NA)
}
}
g <- g coord_equal()
g
轉載請註明出處，本文鏈接：https://www.uj5u.com/qiye/371919.html