una - Calcular medios de fila en un subconjunto de columnas

tablas en r

Question

Dado un marco de datos de muestra:

C1<-c(3,2,4,4,5)
C2<-c(3,7,3,4,5)
C3<-c(5,4,3,6,3)
DF<-data.frame(ID=c("A","B","C","D","E"),C1=C1,C2=C2,C3=C3)

DF
    ID C1 C2 C3
  1  A  3  3  5
  2  B  2  7  4
  3  C  4  3  3
  4  D  4  4  6
  5  E  5  5  3

¿Cuál es la mejor manera de crear un segundo marco de datos que contendría la columna ID y la media de cada fila? Algo como esto:

ID  Mean
A    3.66
B    4.33
C    3.33
D    4.66
E    4.33

Algo similar a:

RM<-rowMeans(DF[,2:4])

Me gustaría mantener los medios alineados con sus ID .

Answer 1

Comenzando con su marco de datos DF , podría usar el paquete data.table :

library(data.table)

## EDIT: As suggested by @MichaelChirico, setDT converts a
## data.frame to a data.table by reference and is preferred
## if you don''t mind losing the data.frame
setDT(DF)

# EDIT: To get the column name ''Mean'':

DF[, .(Mean = rowMeans(.SD)), by = ID]

#      ID     Mean
# [1,]  A 3.666667
# [2,]  B 4.333333
# [3,]  C 3.333333
# [4,]  D 4.666667
# [5,]  E 4.333333

Answer 2

Puede crear una nueva fila con $ en su marco de datos correspondiente a los Medios

DF$Mean <- rowMeans(DF[,2:4])

Answer 3

Usando dplyr :

library(dplyr)

# exclude ID column then get mean
DF %>%
  transmute(ID,
            Mean = rowMeans(select(., -ID)))

O

# select the columns to include in mean
DF %>%
  transmute(ID,
            Mean = rowMeans(select(., C1:C3)))

#   ID     Mean
# 1  A 3.666667
# 2  B 4.333333
# 3  C 3.333333
# 4  D 4.666667
# 5  E 4.333333

Answer 4

Calcular medios de fila en un subconjunto de columnas:

Cree un nuevo data.frame que especifique la primera columna de DF como una columna llamada ID y calcule la media de todos los otros campos en esa fila, y la ponga en la columna titulada ''Means'':

data.frame(ID=DF[,1], Means=rowMeans(DF[,-1]))
  ID    Means
1  A 3.666667
2  B 4.333333
3  C 3.333333
4  D 4.666667
5  E 4.333333