Faire la jointure de 2 data.frame
Bonjour,
Le but essentiel de ma question est rassembler deux data.frame en un seul
Le premier est simple:
Code:
1 2
| x <- read.csv("cycle_v1.1.csv", header=T, dec=".",sep=";")
tab <-(x[,c("Nom", "Code")]) |
nom |code
nom du logiciel |LOGICIEL
version du logiciel |VERSION
nom de l'homme |NOMH
Le second est plus complexe
Il compte le pourcentage de valeur null dans le fichier csv
Code:
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20
| x <- read.csv("2008-135304_cycle.csv", header=T, dec=".",sep=";")
xC = ncol(x)
xR = nrow(x)
ll <- data.frame(matrix(data = 0, nrow=xC, ncol=2,byrow=T))
colnames(ll) <- c("Manquant")
rownames(ll) <- names(x[,1:xC])
for (c in 1:xC)
{
for (r in 1:xR)
{
if (is.na(x[r,c])==TRUE || x[r,c]=="")
{
ll[c-1,1] = ll[c-1,1] + 1
}
}
}
for (r in 1:xR)
{
ll[r,1] = round((ll[r,1] * 100)/xR)
} |
Ce qui donne
row.names |Manquant
LOGICIEL |45
VERSION |0
NOMH |50
Je souhaiterais afficher la signification du nom des variables et du coup je souhaiterais l'affichage suivant :
row.names |nom |Manquant
LOGICIEL |nom du logiciel | 45
VERSION |version du logiciel | 0
NOMH |nom de l'homme |50
Je vous remercie d'avance