如何让我的图表在 R 上恢复正常？

Question

不久前我在 R 上画了一个图，现在我需要进行更改以为其添加标题。我拿了我的代码并尝试 re-run 它，但它看起来不像我以前的样子。这是一个带有图例和 red-yellow 渐变的帕累托图，现在当我绘制它时，它没有我的图例，而是蓝色的网格。我想我安装了 ggplot2，但我没有调用它，我认为它搞乱了我的情节。 demensions 已关闭，像 cex 这样的行无法正常工作，我不知道如何修复它，我已经尝试卸载该程序包，但我认为它没有用，因为我一直得到相同的蓝色帕累托图。我想知道如何制作我以前做过的相同情节。

这里是link地块：the blue pareto, the old one

这是代码：

library(qcc)
pareto2 <- c(0.6235685,0.5618261,0.3135217,0.4538191,0.3997403,0.5091719,0.5526803,0.5353629,0.3493655)
names(pareto2) <- seq(1,9,1)
pareto.chart(pareto2,ylab="Taxa de Inflação Média (%)",ylab2="Porcentagem Acumulada",xlab="Grupos",las=1,main="")
grupos <- c("Alimentação e bebidas","Habitação","Artigos de residência","Vestuário","Transportes","Saúde e cuidados pessoais","Despesas pessoais","Educação","Comunicação")
par(mar=c(0, 0, 0, 0))
legend(y=4.3,x=0.1,legend=grupos,ncol=1,pch=c(49,50,51,52,53,54,55,56,57),cex=0.7)

Ps.: 我必须更新 R 基础和 RStudio。目前我有最新消息。

Answer 1

这里有一个方法：

数据：

library(qcc)
pareto2 <- c(0.6235685,0.5618261,0.3135217,0.4538191,0.3997403,0.5091719,0.5526803,0.5353629,0.3493655)
names(pareto2) <- seq(1,9,1)
grupos <- c("Alimentação e bebidas","Habitação","Artigos de residência","Vestuário","Transportes","Saúde e cuidados pessoais","Despesas pessoais","Educação","Comunicação")

定义暖色渐变的函数

colfunc <- colorRampPalette(c("red", "yellow"))

图表：

pareto.chart(pareto2, ylab = "Taxa de Inflação Média (%)",
             ylab2 = "Porcentagem Acumulada", xlab = "Grupos",
             las = 1,main = "", col = colfunc(9))    
legend(x = 0.1, y = 0.85, legend = grupos, ncol = 1,pch = 16,cex = 0.7,
       col = colfunc(9))

图例坐标应该是绘图区域的分数，其中 x = 0 和 y = 1 是左上角。如果你不喜欢图例中的颜色代码，你可以回复：

legend(x = 0.1, y = 0.85,legend = grupos, ncol = 1,cex = 0.7, pch = c(49,50,51,52,53,54,55,56,57))

甚至

legend(x = 0.1, y = 0.85, legend = grupos, ncol = 1,cex = 0.7, pch = c(49,50,51,52,53,54,55,56,57), col = colfunc(9))

如何让我的图表在 R 上恢复正常？

How to get my chart back to normal on R?

charts

packages

r

uninstallation