r语言对数据框按某一列的范围值分组求组内其他列的平均值

是 否 +2 论坛币

k人 参与回答

经管之家送您一份

应届毕业生专属福利!

求职就业群

赵安豆老师微信：zhaoandou666

经管之家联合CDA

送您一个全额奖学金名额~ !

立即领取

感谢您参与论坛问题回答

经管之家送您两个论坛币！

+2 论坛币

变量x1 x2 x3 x4,求1<x4<5时其他三列的均值

x1	x2	x3	x4
4	5	8	3
7	2	6	5
2	6	2	2
9	3	9	4
1	8	3	8

扫码加我 拉你入群

请注明：姓名-公司-职位

以便审核进群资格，未注明则拒绝

分享0 收藏0 回帖

关键词：R语言 数据框 平均值

复制代码

复制代码

谢谢，由于我的原始数据量很大，我要怎么将它转换成tibble呢

narcissism0923 发表于 2018-9-5 10:54

谢谢，由于我的原始数据量很大，我要怎么将它转换成tibble呢

narcissism0923 发表于 2018-9-5 10:54

而且我在运行的时候每次都会出错，Error in a %>% filter(x4 > 1 & x4 < 5) %>% dplyr::select(1:3) %>% summarize_all(mean) :
  could not find function "%>%"

1. library(tidyverse)
   
2. a <-
   
3.   tibble(
   
4.     x1 = c(4, 7, 2, 9, 1),
   
5.     x2 = c(5, 2, 6, 3, 8),
   
6.     x3 = c(8, 6, 2, 9, 3),
   
7.     x4 = c(3, 5, 2, 4, 8)
   
8.   )
   
9. a %>% filter(x4 > 1 & x4 < 5) %>% dplyr::select(1:3) %>% summarize_all(mean)

复制代码

narcissism0923 发表于 2018-9-5 14:52

谢谢您的帮助，我的问题解决了

感觉搞得有点复杂。。。试试
apply(data[,1:3][(data$x4>1) & (data$x4<5)], 1, mean)

2801959927 发表于 2018-9-5 20:35
感觉搞得有点复杂。。。试试
apply(data[,1:3][(data$x4>1) & (data$x4

好的谢谢