R 通过两行比较生成多个绘图

对于每个项目，我想在同一轴上绘制两天的5种不同价格

我可以只为一个项目（即“a”）绘图，但我希望生成多个图形并自动保存它们

我的实际数据集比示例要大得多

我一直在使用这段代码来尝试保存图形，但它不太管用：

 mypath <- file.path("C:","R","SAVEHERE",paste("myplot_", names[i], ".jpg", 
sep = ""))

 jpg(file=mypath)
    mytitle = paste("my title is", names[i])
    plot(x,y, main = mytitle)
 dev.off()

图表看起来像。 我希望它能循环浏览所有的名字，并保存看起来像第二张照片的图表。我希望这些信息比我最初的帖子更有帮助

---

非常感谢您的帮助，因为您提供的代码太少，但可能是plot.new（）：

---

如果您提出一个建议，并告诉我们什么具体不起作用，我们将能够更好地帮助您。

让它与此一起工作

    Names=levels(q$Name)

for(i in 1:length(Names)){

  mypath <- file.path("C:", "Users", "myname", "Documents", "Plots",paste("myplot_",
                                                                           Names[i], ".jpg", sep = ""))

  jpeg(file=mypath)

  q4 = filter(q3, q3$Name == Names[i])

  qplot = ggplot(q4, aes(x = variable, y = value)) + geom_point(aes(color=TableName)) +
    theme(axis.text.x = element_text(angle = 90, hjust = 1)) + ylim(-100, 300) + 
    labs(title = Names[i], color = "Legend") +xlab("") + ylab("Price")

  plot(qplot)
  dev.off()
}

Name=级别（q$Name）
用于（i/1：长度（名称））{
mypath请不要发布代码图像。通过编辑您的问题来发布实际数据（或一小部分），以包括dput的输出（头（数据））。请发布一个项目的绘图，并描述不完全正确的含义。
plot.new()
jpg(file=mypath)
mytitle = paste("my title is", names[i])
plot(x,y, main = mytitle)
dev.off()

    Names=levels(q$Name)

for(i in 1:length(Names)){

  mypath <- file.path("C:", "Users", "myname", "Documents", "Plots",paste("myplot_",
                                                                           Names[i], ".jpg", sep = ""))

  jpeg(file=mypath)

  q4 = filter(q3, q3$Name == Names[i])

  qplot = ggplot(q4, aes(x = variable, y = value)) + geom_point(aes(color=TableName)) +
    theme(axis.text.x = element_text(angle = 90, hjust = 1)) + ylim(-100, 300) + 
    labs(title = Names[i], color = "Legend") +xlab("") + ylab("Price")

  plot(qplot)
  dev.off()
}