小编cur*_*wed的帖子

我在表（从 csv 导入）中有一堆数据，格式如下：

date        classes         score
9/1/11       french          34
9/1/11       english         34
9/1/11       french          34
9/1/11       spanish         34
9/2/11       french          34
9/2/11       english         34
9/3/11       spanish         34
9/3/11       spanish         34
9/5/11       spanish         34
9/5/11       english         34
9/5/11       french          34
9/5/11       english         34

忽略分数列，这不重要。

我需要根据日期统计参加英语或西班牙语或法语课程的学生总数，即。我需要首先按日期对其进行分组，然后根据语言将每一天划分为更多的块，并将其绘制为堆叠条形图，如下所示。每个条形代表一个日期，条形的每个横截面代表一种语言。

一旦我以矩阵形式获取数据，其中每一行代表一个日期，每列代表一个属性（或语言），我就想出了如何做到这一点。所以我假设数据是 csv 格式的：

ie           french      english       spanish
9/1/11       2           1             1
9/2/11       1           1             0          
9/3/11       0           0             2
9/5/11       1           2             1

那么我可以这样做：

directory<-"C:\\test\\language.csv"
ourdata6<-read.csv(directory)

language<-as.matrix(ourdata6)

barchart(prop.table(language), horizontal=FALSE, auto.key = list(space='right',cex=.5,border=T,points=F, lines=F,lwd=5,text=c('french','spanish','enligsh'),cex=.6), main = list(label="Distribution …