Tableau croisé dynamique sous R

Bonjour,
J'ai mon tableau sous la forme suivante:

Code:

---

1 2 3 4 5 6 7 8 9 10 11 12 13 14 15

> read.csv('D:/essai_rca.csv', header = TRUE, sep = ";") Reporter.ISO Commodity.Code Mcp 1 TN 1 1 2 TN 2 0 3 TN 3 0 4 TN 4 1 5 DZA 1 1 6 DZA 2 1 7 DZA 3 0 8 DZA 4 1 9 FR 1 0 10 FR 2 1 11 FR 3 1 12 FR 4 0

---

J'aimerais construire un tableau croisé dynamique comme l'on peut obtenir sous excel:
En ligne: la colonne Reporter.ISO
En colonne: la colonne Commodity.Code
En valeur: la colonne Mcp (càd la valeur de Mcp pour chaque croisement entre les 2 colonnes précitées et la somme totale en ligne et en colonne)
Le tableau sera sous la forme suivante:

Code:

---

1 2 3 4 5 6 7 8

DZA FR TN Total 1 1 0 1 2 2 1 1 0 2 3 0 1 0 1 4 1 0 1 2 Total 3 2 2 7

---

Y a-t-il une solution sous R?
Merci d'avance :)

Code:

---

1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17

table = read.csv('D:/essai_rca.csv', header = TRUE, sep = ";")   table1 = as.data.frame(matrix( table$Mcp, ncol = length(unique(table$Reporter.ISO)) , nrow = nrow(table)/length(unique(table$Reporter.ISO)))) colnames(table1) = unique(table$Reporter.ISO) row.names(table1)= unique(table$Commodity.Code) table1 = cbind(table1, rowSums(table1)) table1 = rbind(table1, colSums(table1)) colnames(table1) = c(colnames(table1)[1:(ncol(table1)-1)], 'total') row.names(table1)= c(row.names(table1)[1:(nrow(table1)-1)],'total') table1 # TN DZA FR total # 1 1 1 0 2 # 2 0 1 1 2 # 3 0 0 1 1 # 4 1 1 0 2 # total 2 3 2 7

---

Les librairies reshape et reshape2 ont des fonctions qui permettent cela.

Au plaisir de te lire.