Discussion :

[joyeux_lapin13]

Bonjour,

je cherche à créer pour chaque itération i de ma boucle for un objet_i.

Par exemple:

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
 
for (i in 1:10000) { 
model_i = randomForest(...) 
}

Peut-il y avoir des problèmes d'out of memory à force de créer un nombre successif et grandissant d'objet de ce type?

En vous remerciant.

[pitipoisson]

Bonjour,

Peut-il y avoir des problèmes d'out of memory à force de créer un nombre successif et grandissant d'objet de ce type?

C'est possible mais ça va surtout dépendre de la taille des objets et de leur nombre.
Edit: ainsi que du système d'exploitation et si c'est une version 32 ou 64bits de R.

Tu peux regarder les pages d'aide

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

> ?memory.size

et

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

?Memory-limits

Pour en savoir plus.

Note que ta méthode pour créer des objets d'après un indice i ne va pas fonctionner (tu vas créer 10000x le même objet model_i !).
Pour faire ça, c'est un peu plus contraignant :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
## Création d'objets en routine :
for (i in 1:3)
{
    eval(parse(text=paste("objet.", i,  # construction du nom de l'objet.
                          " <- i",      # construction de la commande d'assignement.
                          sep="")))     # pour ne pas avoir "objet. i" !
}
 
## Vérifications :
ls(pat="objet.")

En gros :

1. tu crées une chaine de caractères qui décrit la commande de création de l'objet
   

   Code :

   Sélectionner tout - Visualiser dans une fenêtre à part

   "objet.3 <- i"

2. tu la transformes en une expression à l'aide de parse
   

   Code :

   Sélectionner tout - Visualiser dans une fenêtre à part

   1
   2
   3
   4
   > parse(text="objet.3 <- i")
   expression(objet.3 <- i)
   attr(,"srcfile")
   <text>

3. que tu évalues à l'aide de
   

   Code :

   Sélectionner tout - Visualiser dans une fenêtre à part

   eval(<expression>)

[joyeux_lapin13]

Salut pitipoisson et merci pour ton aide!

Pour le moment j'étais partie sur un système de vecteur de liste:

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
 
Liste <- vector(mode = "list", length = 10000) 
for(i in 1:10000) Liste[[i]] <- randomForest(blabla)

qui semblait marché, mais bon méthode à la main trouvé aprés des heures de labeur

Encore merci pour ton aide, je vais tester ta méthode de suite et la comparer à ce que j'ai et ce que je voulais à la base.

[pitipoisson]

Pour le moment j'étais partie sur un système de vecteur de liste:

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
 
Liste <- vector(mode = "list", length = 10000) 
for(i in 1:10000) Liste[[i]] <- randomForest(blabla)

...

Encore merci pour ton aide, je vais tester ta méthode de suite et la comparer à ce que j'ai et ce que je voulais à la base.

Ce n'est pas forcément la peine... j'avais oublié de mentionner cette possibilité et je lui trouve en fait deux gros avantages :

• beaucoup plus lisible.
• permet de t'affranchir des boucles en tirant avantageusement parti des fonctions de la famille des apply, beaucoup plus efficaces.
  Il est d'ailleurs fort probable que tu puisses utiliser de telles fonctions pour créer la liste.
• tu n'as pas à faire des contorsions du même genre que dans mon précédent message pour accéder aux objets en routine et les compter (ce que je ne sais manifestement pas faire puisque ça fait trois bonnes raisons ).