PROSAGA码农传奇-R-平均来自两个data.frames的公共列，其中包含从第1列到第3个data.frame的常用字

平均来自两个data.frames的公共列，其中包含从第1列到第3个data.frame的常用字

作者: 易米烊光
发布时间: 2024-06-29 03:05:03 (1月前)
转自：

<div class =“post-text”itemprop =“text”>
  <P>
    将两个数据帧的行绑定在一起，转换为数字，
     <code>
      filter
    </code>
     只要
     <code>
      common.words
    </code>
    ，
     <code>
      group_by
    </code>
     <code>
      y
    </code>
     并计算
     <code>
      mean
    </code>
    。
  </p>
   <pre>
    <code>
      library(dplyr)

bind_rows(df, df2) %>%
    mutate_at(vars(starts_with("V")), as.numeric) %>%
    filter(y %in% common.words) %>%
    group_by(y) %>%
    summarise_all(mean)

</code>
  </pre>
  <HR />
  <P>
    我们可以使用相同的逻辑来使用基数R.
     <code>
      aggregate
    </code>
  </p>
   <pre>
    <code>
      #rbind both the datasets
df1 <- rbind(df, df2)
#Convert factor numbers to numeric
df1[2:3] <- lapply(df1[2:3], function(x) as.numeric(as.character(x)))
#Filter and aggregate
aggregate(.~y, df1[df1$y %in% common.words, ], mean)

</code>
  </pre>
  <P>
    的<strong>
      数据
    </强>
  </p>
   <pre>
    <code>
      df <- data.frame(df)
df2 <- data.frame(df2)

</code>
  </pre>
</DIV>