Частоты участка на полярном участке с использованием данных угла, ggplot2

Question

Я пытаюсь использовать полярный график для представления частот в соответствии с круговым углом/направлением (0-360 градусов). По какой-то причине у меня возникают проблемы с попыткой определить масштаб на графике, чтобы представить все 3 угла. На данный момент показывается только 2 («B» и «C»). Любая помощь будет оценена. Заранее спасибо,

library(ggplot2) 

data <- read.table(text = "stat angle freq perc 
        A 1 720 79 
        B 223.5017 121 13 
        C 117.9372 68 7", header=T) 

head(data) 
str(data) 

db<-data 

db$stat<-factor(db$stat) 
levels(db$stat) 

# Plot 

bp<-ggplot(db, aes(x = angle, y = perc), fill = factor(stat)) + 
    geom_bar(stat="identity", colour="grey100", aes(fill = factor(stat), 
                width = 16)) + 
    coord_polar(theta="x", start=0) + 
    theme_minimal() + ylab("Detections (%)") + 
    scale_x_continuous("", lim=c(0,360), breaks = seq(0, 315, 45), 
        labels = c("N","NE","E","SE","S","SW","W","NW")) 

bp2<-bp + theme(panel.grid.major = element_line(colour = "grey60", size=0.45), 
       panel.grid.minor = element_line(colour = "grey60", size=0.45)) 

Answer 1

Ширина в geom_bar - проблема. Следующие работы:

ggplot (дБ) + geom_bar (стат = "идентичность", цвет = "grey100", АЕС (х = угол, у = PERC, заполняют = стат, ширина = 2)) + coord_polar () + theme_minimal() + ylab ("Обнаружения (%)") + scale_x_continuous (пределы = c (0,360), breaks = seq (0, 315, 45), labels = c ("N", "NE" , "E", "СЭ", "S", "SW", "W", "NW"))