Stacked Bar Plot with barplot（）from CSV

Question

我正在尝试从CSV文件中获取barplot，但我遇到了一些问题。

P;I;R;F1;F2;F3
20140101;50;20;7;7;16
20140108;55;22;9;9;15
20140115;52;21,4;8,6;10;12

首先，我打开我的.csv

d<-read.csv('d:\\Users\\140050es\\Desktop\\R\\test2.csv', header = F, sep = ",")

然后我分配一个表:(我不知道这一步是否正常）

data<-table(d$I,d$R,d$F1,d$F2,d$F3)

然后我绘制我的数据：

barplot(data,main="barplot()",xlab="Periodo",col=c("blue","red","green","orange","gold")

但是R没有绘制任何东西。

Answer 1

在barplot中，输入矩阵的每个列对应一组条形，每个行对应于组内的不同条形。因为看起来您的群组是由＆＃39; P＆＃39;定义的。变量，您需要转置数据。然后每个列对应一个P日期＆＃39;并且行分别对应于I，R，F1，F2和F3的值。

＆＃39; 值＆＃39; barplot调用是＃34;数字向量[...]给出绘制的所有条形中点的坐标，对于添加到图形非常有用。＆＃34;。因此，我们在变量“bp”中收集这些中点，并将它们用作x at标签的位置（axis参数）。

df <- read.csv2(text = "P;I;R;F1;F2;F3
                20140101;50;20;7;7;16
                20140108;55;22;9;9;15
                20140115;52;21,4;8,6;10;12")

bp <- barplot(t(df[ , -1]), col = c("blue", "red", "green", "orange", "gold"))

axis(side = 1, at = bp, labels = df$P)