Bonjour. J'essaye d'écrire une fonction qui, étant donné un dataframe, renvoie les corrélations entre les colonnes (qui correspondent à des variables) et qui affiche les nuages de points pour chaque couple de variables.
J'ai écris une fonction mais il me renvoie un message d'erreur:
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
fonction_correlations<-function(data_frame){
  cat("Les coefficients de correlation entre les variables sont:","\n")
  cor(data_frame)
  n<-length(data_frame[1,])
  for(i in 1:n-1) {
    for (j in i+1:n) {
      L1<-data_frame[,i]
      L2<-data_frame[,j]
      m=lm(L1 ~ L2)
      a=m$coefficient[1];b=m$coefficient[2]
      plot(data_frame[,i],data_frame[,j])
      abline(a,b)
    }
  }
}
Ce à quoi il répond:

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
Error in model.frame.default(formula = L1 ~ L2, drop.unused.levels = TRUE) : 
  type (list) incorrect pour la variable 'L1'