R 如何为两个不同的列绘制分组条形图？

我有一个data.frame，我想为两个不同的列绘制一个分组条形图

下面是我关心的两个专栏

str(credit_arff)

$ checking_status       : Factor w/ 4 levels "<0",">=200","0<=X<200",..:
$ class                 : Factor w/ 2 levels "bad","good":

str（信用卡）
$checking_status:系数w/4级“=200”，“0有很多方法可以做到这一点。请参见此

对于这类事情也是一个很好的参考

对于特定情况，可以使用基本图形执行此操作：

credit_arff <- data.frame(
  checking_status = c("<0", "<0", "<0", ">=200", ">=200", "0<=X<200", "0<=X<200", "0<=X<200", "0<=X<200", "no checking", "no checking", "no checking"),
  class = c("bad", "bad", "good", "bad", "good", "bad", "bad", "good", "bad", "good", "good", "bad")
)

df <- table(credit_arff$class, credit_arff$checking_status)
barplot(df, beside=T, col=c("red", "blue"), legend=rownames(df))

credit\u arff