Discussion :

[orland]

Bonjour,
Je veux accéder aux objets de mon jeu de données. J'ai fais un script et j'ai tapé ce code

Code :

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

1
2
3
4
cal=function(data)
{for(i in 1:dim(data)[1])
{obji=data[i,]}
}

Mais il m'affiche que obj1, obj2 , obj100 et obj1000
pour les autres objets il m'affiche

Code :

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

Erreur : objet 'obj90' introuvable

Veuillez m'aider svp.

[A. D.]

Bonjour,

Le problème vient du fait que dans le code que vous avez écrit, le "i" de "obji" est juste un caractère, "obji" est en lui-même le nom d'une variable qui va être écrasée à chaque nouvelle itération.

Pour remédier à cela, je pense que quelque chose comme ceci devrait fonctionner :

Code :

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

1
2
3
4
5
6
7
8
9
10
cal<-function(data)
{
     for(i in 1:dim(data)[1])
     {
          pp<-paste("obj",i,sep="")
 
          assign(pp,data[i,])
 
     }
}

Bonne continuation


Cordialement,

A.D.

[orland]

Merci de votre reponse.
Mais ici comment puis-je avoir par exemple un tel objet dont j'ai besoin ?

[A. D.]

Je ne comprends pas votre question...

Normalement avec le code que je vous ai fournis (moyennant peut-être une petite adaptation en fonction de ce que vous souhaitez faire), pour accéder aux différents objets il suffit juste de taper dans R :

Code :

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

1
2
3
4
5
obj1
obj2
...
obj90
...

Cordialement,

A.D.

[orland]

J'ai écrit votre code dans un script puis je l'ai sourcé.
Lorsque je tape :

Code :

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

1
2
3
4
obj1
ob2
..
obj100

Il m'affiche toujours

Code :

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

1
2
3
4
1
Erreur : objet 'obj1' introuvable
> obj2
Erreur : objet 'obj2' introuvable

Veuillez me posez vos questions si c'est pas clair.

[A. D.]

Avez-vous bien pensé à faire un appel à la fonction ?

Code :

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

cal(mesdonneesreelles)

En effet, le code que je vous fournis est le code qui permet de définir une fonction de manière générale.



Cordialement,

A.D.

[orland]

Mais oui j'ai tapé :

Code :

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

cal(t)

avec :

Code :

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

t=read.table(file.choose(),sep="\t")

[A. D.]

Effectivement, j'avais oublié de renseigner l'option "pos" de la fonction "assign" afin que les variables soient bien créées dans l'environnement de travail (car appel au sein d'une fonction).
Ceci devrait donc mieux fonctionner :

Code :

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

1
2
3
4
5
6
7
8
9
10
cal<-function(data)
{
     for(i in 1:dim(data)[1])
     {
          pp<-paste("obj",i,sep="")
 
          assign(pp,data[i,],pos=1)
 
     }
}

Un petit coup d'oeil du côté de l'aide de la fonction : ?assign
Bonne continuation


Cordialement,

A.D.

[orland]

Un grand merci
c'est résolu

Cordialement B.H