如何在R中创建条形图

Question

我已获得以下数据，并希望在R中创建单个条形图，以调查不同客户类型（业务和私有）之间的差异。我该如何编写代码？ （x轴是第1年，第2年等; y轴只是表示不同的数字，因此我们可以在某一年看到商业和私人数字之间的差异，彩色条形图）。谢谢！

qdbus org.kde.yakuake /yakuake/sessions runCommandInTerminal 0 "tmux"

Answer 1

如果您先熔化data.frame，则可以使用ggplot

library(reshape2)
library(ggplot2)

df.melted <- melt(as.matrix(df))
ggplot(df.melted, aes(Var2, value, fill = Var1)) +
    geom_bar(stat="identity")

数据

df <- structure(list(year1 = c(114L, 368L), year2 = c(92L, 376L), year3 = c(22L, 
76L), year4 = c(8L, 32L), year5 = c(4L, 4L)), .Names = c("year1", 
"year2", "year3", "year4", "year5"), class = "data.frame", row.names = c("business", 
"private"))