plotter les éléments d'une liste

[Elise Lacoste]

Bonjour,

Je n'arrive pas à réaliser un pdf avec différentes pages correspondant à différents éléments d'une liste (rasterLayer).
Ci-dessous ma solution pour le moment, avec une page pdf et tous les graphiques sur la même page.
Lorsque j'essaie de plotter "ldf" directement dans ma boucle, les couches se superposent au fur et à mesure et je n'obtient qu'une page...
Merci pour votre aide.

Code : Tout sélectionner

files <- list.files("C:/monchemin/layers/", pattern="asc")
  ldf=list()
  for (i in files) {
    ldf[[i]] <- raster(paste("data/layers/",i,sep=""))
    env = stack(ldf)
  }
  plot(env)
 

[Pierre-Yves Berrard]

Bonjour,

Ne faudrait-il pas inclure l'instruction plot() dans la boucle ?

[Elise Lacoste]

Bonjour,
Lorsque je fais cela, je pense que les plots s'écrasent successivement et je n'obtient qu'un graphique (la dernière couche).
Voici le code que j'ai essayé:

Code : Tout sélectionner

for (i in files) {
    ldf[[i]] <- raster(paste("layers/",i,sep=""))
    env = stack(ldf)
    pdf("test.pdf")
    plot(ldf[[i]])
    dev.off()
  }


Je cherche donc à créer une page par couche...
Merci

[Elise Lacoste]

La solution n'était pas bien loin, j'ai inclu une nouvelle boucle dans la boucel pour toutes mes couches...
Merci pour votre aide!

Code : Tout sélectionner

 for (i in files) {
    ldf[[i]] <- raster(paste("layers/",i,sep=""))
    env = stack(ldf)
    pdf("test.pdf")
    for(i in 1:11) {
    plot(ldf[[i]])
    }
    dev.off()
  }