r - 我在 for() 循环中哪里出错了？

Question

你能帮我找出这段代码中的错误吗？它会生成 .jpg 文件，但它们都具有相同的大小且没有内容（白色、空白、无内容）。我做错了什么？

数据：

v1 <- runif(100,1,6); v2 <- runif(100,1,6); v3 <- runif(100,1,6)
data <- data.frame(v1,v2,v3); data <- round(data, digits = 0)

需要的包：sjPlot

代码：

for (i in 1:length(names(data))) {
  jpeg(paste0("plot_",names(data)[i],".jpg"),
       width = 166, height = 80, units = "mm", pointsize = 12,
       res = 300, quality = 90)
  plot_frq(data[,i],title = "", axis.title = "", show.prc = TRUE, show.n = FALSE, show.axis.values = FALSE,
          axis.labels = c("strongly agree","agree","disagree","strongly disagree", "I don't know"))
  dev.off()
}

问候， Maciej。

标签： rfor-loop