Question

我使用R.绘制了30年的数据。我创建了一个与我的目录文件相同的列表，我可以找到我的WD中存在哪些栅格，并且可以计算rasters，例如max和min以及ave。我想导出所有这些图，但是想要将图表命名为与max，min和ave栅格对应的文件名。

colfunc <- colorRampPalette(c("Grey", "Blue"))
breakpoints <- c(0,50,100,150,200,250)
plot(maxr,breaks=breakpoints,col=colfunc(5), main=paste(Filenames[i]))

我希望粘贴功能粘贴在最大文件的名称中，但是我无法在不粘贴整个文件列表的情况下工作。

Answer 1

听起来你只需要保留最大文件的索引并在输出图时使用它？我猜你在做这样的事情？

totalMax <- 0
totalMaxIndex <- 0
for (i in 1:length(Filenames)){
    currentMax <- YourFunctionToCalculateMax(Filenames[i])
    if(currentMax > max)
    {
        totalMax <- currentMax
        totalMaxIndex <- i
    }
}

之后

plot(maxr,breaks=breakpoints,col=colfunc(5), main=paste(Filenames[totalMaxIndex]))

将max raster的文件名粘贴到绘图上

1 个答案: