我正在尝试在rodham :: emails中随时间(emails $ docDate)绘制电子邮件主题(emails $ subject)中定义的术语(x)的频率。问题是无论我将x定义为什么,我都会得到相同的图。
我将docDates列转换为Date类:
emails$docDate<-as.Date(emails$docDate)
然后我尝试创建我的函数:
plotsubject<-function(x){
subject<-grep(x, emails$subject, ignore.case=TRUE, na.omit(emails$docDate))
subjectcount<-count(subject, vars="emails$docDate")
emailsplot<-plot(freq~emails.docDate, subjectcount)
return(emailsplot)
}
但是,无论我在函数中添加什么,都得到相同的图形。例如,
plotsubject("speech")
给我相同的图:
plotsubject("peace")
我是R的新手,而且是生物学家,而不是程序员,所以我一直在努力寻找解决方案。我怀疑这与我如何尝试删除docDate列中缺少数据的行有关?
我们可以更改功能以使用table
而不是'count',因为count
希望以data.frame作为输入
plotsubject<-function(x){
subject<-grep(x, emails$subject, ignore.case=TRUE,
value = TRUE, na.omit(emails$docDate))
subjectcount <- table(subject)
plot(subjectcount)
}