Fatal编程技术网
  • r/
  • R 是否将多列折叠为一行，每列的值最大？

R 是否将多列折叠为一行，每列的值最大？

r

R 是否将多列折叠为一行，每列的值最大？,r,dplyr,R,Dplyr,假设我有这样的东西 df <- data.frame(row1 = c(1, 2), row2 = c(3, 1), row3 = c(1, 4)) df使用dplyr df %>% dplyr::summarise_all(max) # row1 row2 row3 # 1 2 3 4 使用dplyr df %>% dplyr::summarise_all(max) # row1 row2 row3 # 1 2 3 4 简

假设我有这样的东西

df <- data.frame(row1 = c(1, 2), row2 = c(3, 1), row3 = c(1, 4))

df使用
dplyr


df %>% dplyr::summarise_all(max)

#   row1 row2 row3
# 1    2    3    4



使用
dplyr


df %>% dplyr::summarise_all(max)

#   row1 row2 row3
# 1    2    3    4


简单：


as.data.frame(lapply(df, max))
#   row1 row2 row3                                                               
# 1    2    3    4   


简单：


as.data.frame(lapply(df, max))
#   row1 row2 row3                                                               
# 1    2    3    4   



带有
数据。表
：


library(data.table)
setDT(df)[, lapply(.SD, max)]


结果：


   row1 row2 row3
1:    2    3    4



带有
数据。表
：


library(data.table)
setDT(df)[, lapply(.SD, max)]


结果：


   row1 row2 row3
1:    2    3    4



@也许是mowglis_尿布，但当这是一个比我的答案质量好得多的复制品时，感觉像是作弊own@mowglis_diaper，也许吧，但当这是一个比我自己的答案质量好得多的副本时，感觉就像作弊