Modérateur : Groupe des modérateurs
Code : Tout sélectionner
rl <- readLines(myfile)
rl_split <- strsplit(rl, "|@=", fixed = T)
mm <- do.call(rbind, rl_split)
as.data.frame(mm)
Code : Tout sélectionner
rl <- readLines(myfile)
rl_s <-gsub("\\|@=", ";", rl)
mm <- read.table(textConnection(rl_s), sep = ";", h= T)
Il te faut remplacer le ";" par un caractère qui n'est pas dans tes données pour éviter de scinder des valeurs (£ ou § ou je ne sais quoi).
Code : Tout sélectionner
test <- do.call(rbind.data.frame, myfile_split)
Code : Tout sélectionner
test[] <- lapply(test, type.convert)
Retourner vers « Questions en cours »
Utilisateurs parcourant ce forum : Aucun utilisateur enregistré et 1 invité