r：barplot - 传说问题

Question

如何摆脱传说中的方框并获得彩色线条呢？另外，我如何将它们放在角落？ 这是我正在使用的命令：

barplot(as.matrix(month_wise_data), main="Product sold per month",
    xlab="Products", col=brewer.pal(nrow(month_wise_data), "Paired"),legend = as.character(month_wise_data[,"MONTH"]), beside=TRUE,
    args.legend=list(x=100,y=10,bty = "n",pt.lwd=0.1, ncol = 3, cex=0.5,pch=1))

Answer 1

你必须像这样添加一个单独的legend电话：

barplot(VADeaths,beside =TRUE,col=1:5,ylim=c(0,100))
legend("topleft",legend=rownames(VADeaths),col=1:5,lty=1)