我使用这个synthax汇总了我的数据文件中的表:
sumtab <- as.data.frame(table(S$MONTH))
colnames(sumtab) <- c("Month", "Frq")
rownames(sumtab) <- c("Jan","Feb","Mar","Apr","May","Jun","Jul","Aug",
"Sep","Oct","Dec")
导致此表sumtab:
Month Frq
Jan 1 3
Feb 2 5
Mar 3 16
Apr 4 45
May 5 11
Jun 6 16
Jul 7 99
Aug 8 101
Sep 9 45
Oct 10 456
Dec 12 112
这个脚本产生了一个ggplot:
ggplot(sumtab, aes(x=Month,y=Frq),width=1.5) +
scale_y_continuous(limit=c(0,17),expand=c(0, 0)) +
geom_bar(stat='identity',fill="lightgreen",colour="black") +
xlab("Month") + ylab("No of bears killed") +
theme_bw(base_size = 11) +
theme(axis.text.x=element_text(angle=0,size=9))
问题是我的数据中没有11月的值,我需要在表格中以某种方式输入11月的零。对你们大多数人来说可能是一件简单的事情,我试图在其他问题上搜索,我已经用Google搜索并阅读了这些书籍,但却无法找到正确的合成器。需要一点帮助。
将rbind
添加到脚本中:
sumtab <- as.data.frame(table(S$MONTH))
sumtab <- rbind(sumtab, c(11, 0))
产生了此错误消息:
Warning message:
In `[<-.factor`(`*tmp*`, ri, value = 11) :
invalid factor level, NA generated
蚂蚁这个表:
Var1 Freq
1 1 3
2 2 5
3 3 6
4 4 14
5 5 7
6 6 2
7 7 13
8 8 12
9 9 3
10 10 1
11 12 4
12 <NA> 0
非常感谢@PaulH的帮助,但我可能以错误的方式使用了您的帮助。
答案 0 :(得分:1)
您可以使用realloc
命令添加11月行:
rbind
祝你好运!