Discussion :

[Gui_mar]

Bonjour,

Je suis débutant en RStudio et j'ai un problème avec la fonction "unstack". J'ai déjà fait plusieurs recherches sur Internet, mais je n'ai rien trouvé pour y remédier.
Afin que vous compreniez bien ce que je veux faire, je vous envoie une partie des données que je dois traiter.

À partir du fichier .txt (ci-joint), j'aimerais désassembler les données de "reflectance" en fonction des "lettreFiltres" dans un nouveau dataFrame. Voici le code pour y arriver.

forumDeveloppez.txt

Code :

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

1
2
3
data <- read.table("forumDeveloppez.txt", header = TRUE) # lecture fichier
 
unstackData <- unstack(data, reflectance ~ lettreFiltre) #unstack reflectance selon les lettres de filtre

Mon problème est que le nom des colonnes de "unstackData" est "C", "D", ... , "X". Or, j'aimerais que le nom des colonnes reprenne à la fois le nom de la colonne initiale en plus du nom de la nouvelle variable : "reflectance_C", "reflectance_D",..., "reflectance_X".

Est-il possible d'y arriver avec la fonction "unstack" ?
Sinon, voyez-vous un moyen d'y arriver ?
Cette question a-t-elle déjà été posée sur ce forum ?

J'ai l'impression que c'est une bête question, si c'est le cas, je m'en excuse.

D'avance, un tout grand merci pour votre aide.

[mgdondon]

Bonjour,

Tout d'abord merci d'avoir fourni un fichier test.

Je ne sais pas s'il existe une option pour renommer les colonnes mais vous pouvez le faire a posteriori :

Code :

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

1
2
mynames <- paste("reflectance", names(unstackData), sep="_")
names(unstackData) <- mynames

Cordialement,

[faubry]

Dans read.table, en utilisant l'argument col.names=c( "nom.col1", ..., "nom.colN") on peut renommer les colonnes avec ces nouveaux noms. Cependant, les nouveaux noms ne peuvent pas à ma connaissance être déduits des anciens. Donc la solution de mgdondon est celle à utiliser dans ce cas.

[Gui_mar]

Bonjour,

Un grand merci pour votre aide, c'est exactement ce que je voulais.

Pour ceux que cela intéresse, la fonction "spread" est similaire à la fonction "unstack". Il faut juste installer library(tidyr).
L'avantage de spread est qu'elle ré-assemble les 2 premières colonnes qu'on ne veut pas désassembler. Pour bien comprendre ce que fait la fonction, essayez le test avec le code ci-dessous et le fichier joint.

Code :

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

1
2
3
4
5
6
data <- read.table("forumDeveloppez.txt", header = TRUE) # lecture fichier
 
unstackData1 <- unstack(data, reflectance ~ lettreFiltre) #unstack reflectance selon les lettres de filtre
 
library(tidyr)
unstackData2 <- spread(data,lettreFiltre, reflectance, convert = TRUE) #désassemble les données de réflectance selon la lettre filtre du dossier data.

Bonne journée