R help es - Jun 2020 - Problema con un loop for

Vuelvo al ataque, pues ya os lo pregunté.  Javier Rubén me dió una posible
explicación, pero finalmente no me resolvió el problema. Así que lo vuelvo
a intentar, a ver si hay más suerte.

Si hago, p.e., i = 1 y corro las 2 filas de dentro del loop que pongo
abajo, me abre una ventana y me hace el
partial() de frg, es decir, lo hace bien, pero si corro todo el loop, me
abre las 9 ventanas (de 9 predictores) pero las deja vacías.

predictores <-
c("frg","omn","bc","co","pr","gg","fg","mf","br","hc")

for(i in 1:length(predictores)){
    windows()
    partial(RFfit, pred.var = predictores[i], which.class = "Ard",
plot = T,
    prob = T, chull=T, type="classification",plot.engine =
"ggplot2", rug=T)
  }

Esto está, a su vez, dentro de otro loop con varias categorías, por lo que
al final son 36 gráficos, que debo hacer con distintos parámetros, por lo
que me sería muy útil solucionar el problema, que debe ser una chorrada.

Gracias por vuestra ayuda,
Manuel

	[[alternative HTML version deleted]]

Hola Manuel,

¿No tienes un pequeño ejemplo reproducible?...
RFfit es del paquete RandomFields, no?... Y partial?.

Por construir un pequeño ejemplo y ver qué se puede hacer.

Gracias,
Carlos Ortega
www.qualityexcellence.es

El mié., 24 jun. 2020 a las 19:03, Manuel Mendoza (<
mmendoza en fulbrightmail.org>) escribió:
> Vuelvo al ataque, pues ya os lo pregunté.  Javier Rubén me dió una posible
> explicación, pero finalmente no me resolvió el problema. Así que lo vuelvo
> a intentar, a ver si hay más suerte.
>
> Si hago, p.e., i = 1 y corro las 2 filas de dentro del loop que pongo
> abajo, me abre una ventana y me hace el
> partial() de frg, es decir, lo hace bien, pero si corro todo el loop, me
> abre las 9 ventanas (de 9 predictores) pero las deja vacías.
>
> predictores <-
c("frg","omn","bc","co","pr","gg","fg","mf","br","hc")
>
> for(i in 1:length(predictores)){
>     windows()
>     partial(RFfit, pred.var = predictores[i], which.class =
"Ard", plot > T,
>     prob = T, chull=T, type="classification",plot.engine =
"ggplot2",
> rug=T)
>   }
>
> Esto está, a su vez, dentro de otro loop con varias categorías, por lo que
> al final son 36 gráficos, que debo hacer con distintos parámetros, por lo
> que me sería muy útil solucionar el problema, que debe ser una chorrada.
>
> Gracias por vuestra ayuda,
> Manuel
>
>         [[alternative HTML version deleted]]
>
> _______________________________________________
> R-help-es mailing list
> R-help-es en r-project.org
> https://stat.ethz.ch/mailman/listinfo/r-help-es
>

-- 
Saludos,
Carlos Ortega
www.qualityexcellence.es

	[[alternative HTML version deleted]]

Gracias Carlos, resuelto. Como dices, el problema era que dentro del loop
se suspendía la función print que partial trae por defecto, y lo único que
había que hacer es indicársela.

  predictores <-
c("frg","omn","bc","co","pr","gg","fg","mf","br","hc")

  for(i in 1:length(predictores)){
    windows()
    print(partial(RFfit, pred.var = predictores[i], which.class =
"Ard",
plot = T,
            prob = T, chull=T, type="classification",plot.engine
"ggplot2", rug=T))
  }


El mié., 24 jun. 2020 a las 19:54, Manuel Mendoza (<
>>> mmendoza en fulbrightmail.org>) escribió:
>>>
>>>> Gracias Carlos.
>>>> Partial es del paquete pdp, que utiliza un objeto obtenido con
el
>>>> paquete randomforest
>>>> Te copio un resumen del script que funciona todo menos el for
final,
>>>> aunque sí su interior si le doy a i un valor como 1
>>>>
>>>> library(randomForest)
>>>> RFfit<- randomForest(ecsta ~ ., data=data)
>>>> predictores <-
c("frg","omn","bc","co","pr","gg","fg","mf","br","hc")
>>>>
>>>>   for(i in 1:length(predictores)){
>>>>     windows()
>>>>     partial(RFfit, pred.var = predictores[i], which.class =
"Ard", plot
>>>> = T,
>>>>             prob = T, chull=T,
type="classification",plot.engine >>>>
"ggplot2", rug=T)
>>>>   }
>>>>
>>>>
>>>>> El mié., 24 jun. 2020 a las 19:03, Manuel Mendoza (<
>>>>> mmendoza en fulbrightmail.org>) escribió:
>>>>>
>>>>>> Vuelvo al ataque, pues ya os lo pregunté.  Javier Rubén
me dió una
>>>>>> posible
>>>>>> explicación, pero finalmente no me resolvió el
problema. Así que lo
>>>>>> vuelvo
>>>>>> a intentar, a ver si hay más suerte.
>>>>>>
>>>>>> Si hago, p.e., i = 1 y corro las 2 filas de dentro del
loop que pongo
>>>>>> abajo, me abre una ventana y me hace el
>>>>>> partial() de frg, es decir, lo hace bien, pero si corro
todo el loop,
>>>>>> me
>>>>>> abre las 9 ventanas (de 9 predictores) pero las deja
vacías.
>>>>>>
>>>>>> predictores <-
c("frg","omn","bc","co","pr","gg","fg","mf","br","hc")
>>>>>>
>>>>>> for(i in 1:length(predictores)){
>>>>>>     windows()
>>>>>>     partial(RFfit, pred.var = predictores[i],
which.class = "Ard",
>>>>>> plot = T,
>>>>>>     prob = T, chull=T,
type="classification",plot.engine = "ggplot2",
>>>>>> rug=T)
>>>>>>   }
>>>>>>
>>>>>> Esto está, a su vez, dentro de otro loop con varias
categorías, por
>>>>>> lo que
>>>>>> al final son 36 gráficos, que debo hacer con distintos
parámetros,
>>>>>> por lo
>>>>>> que me sería muy útil solucionar el problema, que debe
ser una
>>>>>> chorrada.
>>>>>>
>>>>>> Gracias por vuestra ayuda,
>>>>>> Manuel
>>>>>>
>>>>>>         [[alternative HTML version deleted]]
>>>>>>
>>>>>> _______________________________________________
>>>>>> R-help-es mailing list
>>>>>> R-help-es en r-project.org
>>>>>> https://stat.ethz.ch/mailman/listinfo/r-help-es
>>>>>>
>>>>>
>>>>>
>>>>> --
>>>>> Saludos,
>>>>> Carlos Ortega
>>>>> www.qualityexcellence.es
>>>>>
>>>>
>>>
>>> --
>>> Saludos,
>>> Carlos Ortega
>>> www.qualityexcellence.es
>>>
>>
>
> --
> Saludos,
> Carlos Ortega
> www.qualityexcellence.es
>
	[[alternative HTML version deleted]]