Gostaria de criar um relatório automatizado de knitr que produzirá histogramas para cada campo numérico dentro do meu dataframe. Meu objetivo é fazer isso sem precisar especificar os campos reais (esse conjunto de dados contém mais de 70 e eu também gostaria de reutilizar o script).

Eu tentei algumas abordagens diferentes:

salvando a trama para um objeto,pe, em seguida, chamandop depois do loopIsso só representa o enredo finalCriando uma matriz de gráficosPLOTS <- NULLe anexando os gráficos dentro do loopPLOTS <- append(PLOTS, p)Acessar esses gráficos fora do loop não funcionouAté tentei salvar cada um em um.png arquivo, mas prefere não ter que lidar com a sobrecarga de salvar e, em seguida, acessar novamente cada arquivo

Temo que as complexidades dos dispositivos da trama estejam me escapando.

Questão

Como posso fazer com que o seguinte pedaço produza cada gráfico dentro do loop para o relatório? Atualmente, o melhor que posso conseguir é a saída do gráfico final produzido salvando-o em um objeto e chamando esse objeto fora do loop.

R pedaço de markdown usandoknitr no RStudio:

```{r plotNumeric, echo=TRUE, fig.height=3}
suppressPackageStartupMessages(library(ggplot2))
FIELDS <- names(df)[sapply(df, class)=="numeric"]
for (field in  FIELDS){
  qplot(df[,field], main=field)  
}
```

A partir deste ponto, espero personalizar ainda mais os enredos.