ggforce::geom_arc_bar中线的颜色

Question

可能是一个简单的问题。

有没有办法消除ggforce::geom_arc_bar饼图中的边界线？

pie <- data.frame(
    state = c('eaten', 'eaten but said you didn\'t', 'cat took it', 
              'for tonight', 'will decompose slowly'),
    focus = c(0.2, 0, 0, 0, 0),
    start = c(0, 1, 2, 3, 4),
    end = c(1, 2, 3, 4, 2*pi),
    amount = c(4,3, 1, 1.5, 6),
    stringsAsFactors = FALSE
)
ggplot(pie) + 
    geom_arc_bar(aes(x0 = 0, y0 = 0, r0 = 0, r = 1, amount = amount, 
                     fill = state, explode = focus), stat = 'pie') + 
    scale_fill_brewer('', palette = 'Set1') +
    coord_fixed()

​

​

例如，在上面的绘图中，要么消除黑色边框线，要么使其颜色与填充颜色相同？

另一个问题是，是否有可能仅从饼的外围消除边界线？所以只保留切片的分界？

Answer 1

ggplot一般使用两个参数表示颜色：

col = 

和

fill = 

您指定了填充(内部)，但没有处理列(轮廓)。

下面的代码应该可以用，在这里我指定了col=NA

ggplot(pie) + 
  geom_arc_bar(aes(x0 = 0, y0 = 0, r0 = 0, r = 1, amount = amount, 
                   fill = state, explode = focus), col=NA,stat = 'pie') + 
  scale_fill_brewer('', palette = 'Set1') +
  coord_fixed()

编辑:所以为了回答第二个问题--我真的不知道这是否可能(我对ggforce不是太熟悉)，鉴于此，我在这个非常“老套”的问题解决方案之前请求原谅。但我觉得最好是提供一些东西给其他人去改进。

解释:保留原始轮廓，然后使用geom_arc0函数将新轮廓绘制为与每个线段相同的颜色。

geom_arc0(aes(x0 = 0, y0 = 0, r = 1, start = start, end = end, 
              colour = factor(state)), data = pie, ncp = 50)

在上下文中：

ggplot(pie) + 
  geom_arc_bar(aes(x0 = 0, y0 = 0, r0 = 0, r = 1, amount = amount, 
                   fill = state, explode = focus), col="black",stat = 'pie') + 
  geom_arc0(aes(x0 = 0, y0 = 0, r = 1, start = start, end = end, 
                colour = factor(state)), data = pie, ncp = 50)
  scale_fill_brewer('', palette = 'Set1') +
  coord_fixed()

它可能看起来有点不可靠-如果你增加ncp参数，它会给轮廓增加更多的点(从而更接近一个完美的圆)-我被限制在ncp=2000。

再一次道歉，它是如此之多。

Answer 2

您可以在geom_arc_bar中添加color = "transparent"或color = NA

​

​

代码

library(ggforce)
ggplot(pie) + 
  geom_arc_bar(aes(x0 = 0, y0 = 0, r0 = 0, r = 1, amount = amount, 
                   fill = state, explode = focus), stat = 'pie',
                   color = "transparent") + 
  scale_fill_brewer('', palette = 'Set1') +
  coord_fixed()