如何在R中的绘图上绘制几个json文件？

Question

我正在尝试在R中绘制.json文件。我有一个代码可以逐个执行它们，但是R可以一次全部完成。

下面的代码提取一个文件“ 30b-1”，并对一个文件执行所有操作。这些文件的名称相似，分别为“ 0b-1.json”，“ 10b-1.json”，“ 20b-1.json”，并以10到100连续显示。我想在一个图中绘制文件0b-100。它们都是from.json文件。 有没有更简便的方法来做到这一点？

library(jsonlite)
> setwd("C:/Users/EMadigan/Spectral libraries")
> DATA30 <- fromJSON("30b-1.json")
> B30 <- data.frame(DATA30)
> names(B30)
>Cleandata30 <- B30$references.sipoints
> write.table(Cleandata30, file = "30B")
> write.table(Cleandata30, file = "30B")
> B30 <- read.csv("C:/Users/EMadigan/Spectral Libraries/30B", sep="")
> par(mfrow = c(2,2))
> plot(B30$six, B30$siy, main="camera data", sub="30ml", xlab="X-axis label", ylab="y-axix label", xlim=c(400, 850), ylim=c(0, 1))