如何在R数据框中找到每个组的绝对最大值？
要找到R数据框中每个组的绝对最大值，我们可以按照以下步骤操作-
首先，创建一个数据框。
然后，使用dplyr包的summarise_each函数which.max和abs函数，在用group_by分组后找到每个组的绝对最大值。
示例1
创建数据框
让我们创建一个数据框，如下所示-
x<-rnorm(25) Grp<-sample(LETTERS[1:10],25,replace=TRUE) df<-data.frame(x,Grp) df输出结果
执行时，上述脚本生成以下内容output(thisoutputwillvaryonyoursystemduetorandomization)-
x Grp 1 0.44813793 I 2 -0.42762853 F 3 1.84217825 D 4 -1.12661531 H 5 0.16377743 E 6 -0.30519746 F 7 1.68274689 D 8 0.20418659 C 9 -0.45494028 J 10 -0.80892645 G 11 -1.79420007 I 12 0.50946053 F 13 0.01846558 J 14 0.94334983 B 15 -0.41051915 A 16 0.85902521 I 17 -0.07774155 I 18 -0.14128810 C 19 -0.20461102 G 20 0.11894428 F 21 0.71705698 C 22 0.71409822 D 23 0.62682371 A 24 -0.03779485 F 25 0.34670072 A
找出每组的绝对最大值
使用dplyr包的summarise_each函数which.max以及abs函数在使用group_by分组后找到列x的每个组的绝对最大值，如下所示-
x<-rnorm(25) Grp<-sample(LETTERS[1:10],25,replace=TRUE) df<-data.frame(x,Grp) library(dplyr) df %>% group_by(Grp) %>% summarise_each(funs(.[which.max(abs(.))]))输出结果
# A tibble: 10 x 2 Grp x <chr> <dbl> 1 A 0.627 2 B 0.943 3 C 0.717 4 D 1.84 5 E 0.164 6 F 0.509 7 G -0.809 8 H -1.13 9 I -1.79 10 J -0.455
示例2
创建数据框
让我们创建一个数据框，如下所示-
DV<-sample(-20:20,25)
Gender<-sample(c("Male","Female"),25,replace=TRUE)
dat<-data.frame(DV,Gender)
dat输出结果执行时，上述脚本生成以下内容output(thisoutputwillvaryonyoursystemduetorandomization)-
DV Gender 1 -16 Male 2 -18 Female 3 20 Male 4 10 Female 5 1 Female 6 -1 Male 7 11 Male 8 -14 Female 9 4 Male 10 -17 Female 11 -9 Female 12 9 Female 13 12 Male 14 5 Male 15 -7 Male 16 14 Female 17 8 Female 18 19 Female 19 -8 Male 20 -19 Male 21 6 Male 22 18 Male 23 -3 Male 24 -5 Female 25 13 Female
找出每组的绝对最大值
使用dplyr包的summarise_each函数which.max以及abs函数在使用group_by分组后找到列DV的每个组的绝对最大值，如下所示-
DV<-sample(-20:20,25)
Gender<-sample(c("Male","Female"),25,replace=TRUE)
dat<-data.frame(DV,Gender)
library(dplyr)
dat %>% group_by(Gender) %>% summarise_each(funs(.[which.max(abs(.))]))输出结果# A tibble: 2 x 2 Gender DV <chr> <int> 1 Female -20 2 Male 17