将geom_bar添加到圆形图ggplot2

Tav*_*avi 2 plot r ggplot2 geom-bar

我有一个看起来像这样的数据框:

dat<-structure(list(x = 1:14, y = c(1.26071476002898, 1.97600316441492, 
2.41629009067185, 3.48953782319898, 10, 8.49584395945854, 3.80688560348562, 
3.07092373734549, 2.96665740569527, 2.73020216450355, 2.39926441554745, 
2.4236111796397, 2.63338121290737, 2.13662243060685)), .Names = c("x", 
"y"), row.names = c(NA, -14L), class = "data.frame")

x         y
1  1.260715
2  1.976003
3  2.416290
4  3.489538
5 10.000000
6  8.495844
7  3.806886
8  3.070924
9  2.966657
10  2.730202
11  2.399264
12  2.423611
13  2.633381
14  2.136622
Run Code Online (Sandbox Code Playgroud)

我正在尝试在ggplot2中创建一个圆图,其中将圆分为我拥有的14个数据点,每个圆弧的长度对应于y的值。像这样:在此处输入图片说明

我的代码产生了一个非常奇怪的输出,条形图相互重叠。我到处搜索过修复它,但没有成功。这是我的代码:

ggplot(dat, aes(x, y)) + geom_bar(breaks = seq(1,14), width = 2, colour = "grey",         stat="identity") + coord_polar(start = 0) + scale_x_continuous("", limits = c(1, 14), breaks = seq(1, 14), labels = seq(1, 14))
Run Code Online (Sandbox Code Playgroud)

请帮助我...预先感谢...

And*_*rie 5

这是因为您指定了width=2。这产生了重叠。

另请注意,您不需要任何内容breaks

尝试这个:

library(ggplot2)

ggplot(dat, aes(x, y)) + 
  geom_bar(stat="identity") +
  coord_polar(start = 0) +
 scale_x_continuous("",breaks = seq(1, 14))
Run Code Online (Sandbox Code Playgroud)

在此处输入图片说明