Discussion :

[vphilops]

Bonjour,
Je suis débutant en R, et j'aimerais définir plusieurs objets dans une boucle, dont le nom incluerais le "i" à chaque itération, comme ceci (c'est juste un exemple bateau) :

Code :

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

1
2
3
4
for (i in 1:5)
{
     objet_i <- f(i)  (où f une fonction quelconque)
}

J´aimerais obtenir comme sortie:
objet_1 = ...
objet_2 = ...
etc.

Je ne sais pas comment faire..

Merci !

[FavreMaxime]

Je peux te proposer cela :

Code :

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

1
2
3
4
5
6
7
8
9
10
11
f=function(x){
 
	return(2*x+3)
 
}
 
for(i in 1:5){
 
	cat("objet_",i," <- ", f(i), "\n")
 
}

Code :

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

1
2
3
4
5
objet_ 1  <-  5 
objet_ 2  <-  7 
objet_ 3  <-  9 
objet_ 4  <-  11 
objet_ 5  <-  13

Je sais pas si ça te convient

Par contre, mettre le 'i' concrètement dans le nom de ton objet, c'est impossible me semble-t-il...

Il faudrait mieux utiliser un vecteur alors.

Max ^_^

[vphilops]

Merci pour ta réponse, mais le problème, c'est que la fonction "cat" ne convient pas pour mon cas.

En fait, j'aimerais créer plusieurs tables à partir d'une table A.
Ma table A est la suivante (simplifiée) :

Code :

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

1
2
3
4
5
6
7
8
9
10
ID  Valeur  
1    456
1    654
1    789
2    498
2    231
3    784
3    147
3    963
etc.

J´aimerais créer une table "table_1" avec toutes les lignes ayant l'ID "1", la table "table_2" avec toutes les lignes ayant l'ID "2", et ainsi de suite.

J'ai essayé un truc du genre :

Code :

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

1
2
3
4
5
 
for (i in 1:n)
{
      table_i <- subset(A, ID == i)
}

mais ca ne marche pas...

Si tu as une idée, je suis preneur !

Merci.

[Sengar]

Hello,

par contre mettre le 'i' concrètement dans le nom de ton objet, c'est impossible me semble t'il...

Tout est possible ^^

?assign devrait résoudre le problème.


Edit:

Exemple:

Code :

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

1
2
 
      table_i <- subset(A, ID == i)

qui ne marchait pas devient:

Code :

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

1
2
 
assign(x=paste("table_",i,sep=""),value=subset(A, ID == i))

[vphilops]

Merci pour "assign", ca marche pour mon probleme!