La corrélation entre les deux dataframes en ligne

J'ai 2 trames de données w/5 colonnes et 100 lignes chacune. 

id       price1      price2     price3     price4     price5
 1         11.22      25.33      66.47      53.76      77.42
 2         33.56      33.77      44.77      34.55      57.42
...

Je voudrais obtenir la corrélation des lignes correspondantes, essentiellement 

for(i in 1:100){    
cor(df1[i, 1:5], df2[i, 1:5])    
}

mais sans l'aide d'une boucle for. Je suis en supposant qu'il est d'une certaine manière pour l'utilisation plyr de le faire, mais n'arrive pas à obtenir ce droit. Des suggestions?

InformationsquelleAutor screechOwl | 2012-02-03
  1. 23

    Selon que vous voulez un endroit frais ou solution rapide, vous pouvez utiliser

    diag(cor(t(df1), t(df2)))

    ce qui est cool, mais le gaspillage (parce qu'il calcule les corrélations entre toutes les lignes dont vous n'avez pas vraiment besoin de sorte qu'ils seront rejetés) ou

    A <- as.matrix(df1)
B <- as.matrix(df2)
sapply(seq.int(dim(A)[1]), function(i) cor(A[i,], B[i,]))

    qui ne s'occupe que de ce que vous voulez, mais c'est un peu plus de type.

    • +1 le fait Que la première est cool. Aussi, t(as.matrix(df1)) peut devenir t(df1), etc., puisque la contrainte de la matrice a lieu de façon implicite lorsque l' t() est passé de données.cadre.
    • Ah, très bien, merci (c'est là où mon faible niveau de la pensée est moi ;)), je vais le modifier
    • Qu'il a fait. Je vous remercie beaucoup.
    InformationsquelleAutor Simon Urbanek
  2. 6

    J'ai trouvé que as.matrix n'est pas nécessaire.

    Corrélations de toutes les paires de lignes entre dataframes df1 et df2:

    sapply(1:nrow(df1), function(i) cor(df1[i,], df2[i,]))

    et en colonnes:

    sapply(1:ncol(df1), function(i) cor(df1[,i], df2[,i]))
    InformationsquelleAutor Kamil Slowikowski