Discussion :

[UVB_PC]

Bonjour,

J'ai un tableau à 4 dimensions que je transforme en liste triée. Ma façon de faire fonctionne mais je pense qu'il existe un moyen plus direct/standard en R.
Je passe par un data frame avec en colonne les 4 dimensions et la valeur. J'utilise des boucles pour alimenter le data frame, valeur par valeur.

Voici mon code :

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
13
14
 
Matrice<-array(1:81,dim=c(3,3,3,3)) # Pas les vraies valeurs
df<-data.frame(t(c(0,0,0,0,0)))
colnames(df)<-c("A","B","C","D","P")
for (A in 1:3) { 
  for (B in 1:3) {
    for (C in 1:3) {
      for (D in 1:3) { # Que de boucles !!
        df[A*27+B*9+C*3+D-39,]<-c(A,B,C,D,Matrice[A,B,C,D]) # ouh! la grosse astuce
      }
    }
  }
}
write.table(df[order(-df$P),], "Liste.csv", row.names=TRUE, sep="\t",dec=",", na=" ")

Comment feriez-vous ?

Pierre

[dev_ggy]

Bonjour,

Code R :

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

1
2
3
4
5
6
library(reshape2)
x <- 1:100
y <- 2*x+1
z <- 3*x+2
data = data.frame(x,y,z)
melt(data, id=1:1)

Je pense que cela correspond à l'idée de ton code.

Code R :

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

melt(df, id=1:1)

Au plaisir de te lire.