中央の白丸を削除しますか？

Question

私は円形のプロットをしており、真ん中の小さな白い円を取り除く方法を見つけたいと思います。

ggplot(d5)+geom_tile(aes(x=x, y=y, fill=xyz))+ 
    scale_y_continuous(expand=c(0,0),breaks=NULL,limits=c(0,3.6))+ 
    scale_fill_continuous(low="darkgreen", high="white")+ 
    coord_polar(start=-1*pi/2, direction=1)+ 
    theme_bw()+ 
    theme(panel.grid.major = element_blank(),panel.grid.minor = element_blank()) 

多くの感謝：

は、ここに私のコードです。

Answer 1

私はここでダミーの例を作った：

require(dplyr) 
expand.grid(x = 1:20, y = 1:2) %>% 
    mutate(z = rnorm(length(x))) %>% 
    ggplot()+geom_tile(aes(x=x, y=y, fill=z))+ 
    scale_y_continuous(expand=c(0,0),breaks=NULL,limits=c(0,3.6))+ 
    scale_fill_continuous(low="darkgreen", high="white")+ 
    coord_polar(start=-1*pi/2, direction=1)+ 
    theme_bw()+ 
    theme(panel.grid.major = element_blank(),panel.grid.minor = element_blank()) 

をあなたがscale_yのlimitsとexpand引数と正しい軌道に乗っている、あなただけのどこ実際は下限把握する必要がありです。これを行うには、coord_polarなしでscale_yを使わないで同じセットをプロットしましょう。

だから私の例では、タイルの最小エッジはy=0.5です。したがって、最小値yの値が何であるか把握してから、geom_tile（つまり1）のデフォルト値の半分であるheightを減算する必要があります。その値をyの下限値に使用すると、パイの穴が消えます。

Answer 2

@Brianによって与えられた答えにジャストほか。次のように中央に小さな白い円を排除y軸の正確な限界を計算することができる
：

library(dplyr) 
library(ggplot2) 
set.seed(4321) 
d5 <- expand.grid(x = 1:20, y = 1:2) %>% 
    mutate(z = rnorm(length(x))) 

yval <- sort(unique(d5$y)) 
h <- (yval[2] - yval[1])/2 
ylim_lo <- yval[1] - h 
ylim_up <- yval[2] + h 

ggplot(d5)+geom_tile(aes(x=x, y=y, fill=z))+ 
    scale_y_continuous(expand=c(0,0), breaks=NULL, limits=c(ylim_lo,ylim_up)) + 
    scale_fill_continuous(low="darkgreen", high="white") + 
    coord_polar(start=-1*pi/2, direction=1) + 
    theme_bw()+ 
    theme(panel.grid.major = element_blank(), panel.grid.minor = element_blank())