Discussion :

[christt94]

La fonction suivante echelle00 permet de mettre à l’echelle [0,1] les valeurs d’un vecteur
numeric.
je voudrais Proposer une fonction myfunc_ech qui permette d’appliquer echelle00 à toutes les colonnes d’un
data.frame.

Code :

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

1
2
3
4
echelle00 <- function(x) {
e_Ch <- range(x, na.rm = TRUE)
(x - e_Ch[1]) / (e_Ch[2] - e_Ch[1])
}

j'applique la fonction myfunc_ech <- apply(df, 2, echelle00)mais j'obtiens ce message d'erreur:

Error in apply(df, 2, echelle00) : dim(X) doit avoir un longueur positive

[faubry]

La fonction apply s'applique à un objet de type array et non à un data.frame. Pour un data.frame, qui est un type particulier de list, il faut utiliser une fonction de la famille lapply.

[christt94]

bonjour et merci pour la réaction.
avec lapply, la fonction se compile bien.
mais quand j'applique cette fonction à une liste j'obtiens ce message d'erreur!!!

Error in Summary.factor(c(1L, 1L, 1L, 1L, 1L, 1L, 1L, 1L, 1L, 1L, 1L, : ‘range’ not meaningful for factors

[faubry]

La colonne en question contient une variable de type factor (facteur) non ordonné, donc la notion de 'range' n'a pas de sens pour ce type de variable. Elle l'aurait pour un facteur ordonné mais la seconde instruction qui est une mise à l'échelle ne serait pas applicable pour des facteurs ordonnées puisque ce sont alors des variables qualitatives ordinales et non des variables quantitatives.