Discussion :

[jb.43]

Bonjour à tous,

Je dispose d'une table (mailles) avec 2 champs:

ID_nouvelles : correspond à l'identifiant d'un polygone
ID_anciennes: correspond à l'identifiant d'un polygone.

Pour chaque ancienne maille (ID_anciennes), elle contient 3 nouvelles mailles (ID_nouvelles).

Par exemple, pour 3 lignes où l'ID_ancienne est 200, il y a 3 identifiants uniques pour l'ID_nouvelles.

Je cherche a faire un tirage aléatoire d'une nouvelle maille parmi les 3 disponibles pour une ancienne maille donnée et ce ce pour l'ensemble des anciennes mailles.


Etant novice sur R, j'ai essayé cette boucle mais elle ne fonctionne pas:

Code :

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

1
2
3
4
5
6
7
8
mailles$ID_anciennes<-as.factor(mailles$ID_anciennes)
mailles$ID_nouvelles<-as.factor(mailles$ID_nouvelles)
 
for(i in mailles$ID_anciennes) {
 
  sample<-sample(mailles$ID_nouvelles,1)
 
  }

Pouvez-vous m'aider svp ?

Merci beaucoup d'avance.

JB

[jb.43]

Voici la solution si cela peut aider:

Code :

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

1
2
3
4
5
6
7
8
9
10
library(plyr)
 
df<-read.csv(file='S:......')
df$ID_anciennes<-as.factor(df$ID_anciennes)
 
test<- ddply(df,'ID_anciennes', function(x){
  res<-sample(x$ID_nouvelles,1)
  return(res)
})
names(test)[2]="ID_nouvelles"

Bonne journée.