Как извлечь описательную статистику из всей таблицы, содержащей факторы?

Question

Есть ли способ в R выделить несколько описательных переменных, таких как среднее значение, медиана и доверительные интервалы, в отдельный кадр данных?

Это код, который я использовал для создания своего кадра данных:

health <- data.frame(ID=c(1,2,3,4,5,6,7,8,9,10), Stroke = factor(c(0,0,1,0,0,1,0,0,0,1)), 
                     Diab = factor(c(0,0,0,0,0,1,0,0,0,1)), MI = factor(c(0,0,0,0,0,1,0,0,0,1)),
                     Age = factor(c(65,66,78,55,67,66,79,54,65,78)), 
                     Sex = factor(c("M","M","F","M","M","M","F","M","F","F")))

Вот так выглядит фрейм данных:

   ID Stroke Age Sex MI_imp[, 1] diab_imp[, 1]
1   1      0  65   M           0             0
2   2      0  66   M           0             0
3   3      1  78   F           0             0
4   4      0  55   M           0             0
5   5      0  67   M           0             0
6   6      1  66   M           1             1
7   7      0  79   F           0             0
8   8      0  54   M           0             0
9   9      0  65   F           0             0
10 10      1  78   F           1             1

Я пытался запустить этот код, чтобы извлечь доверительные интервалы, которые возвращают ошибку:

sapply(health_imp[-1], quantile, probs=c(0.5, 0.05, 0.95), na.rm=TRUE)

Error in quantile.default(X[[i]], ...) : factors are not allowed

Answer 1

Функция Summary () может быть тем, что вы ищете:

health<-data.frame(ID=c(1,2,3,4,5,6,7,8,9,10), Stroke = factor(c(0,0,1,0,0,1,0,0,0,1)), Diab = factor(c(0,0,0,0,0,1,0,0,0,1)), MI = factor(c(0,0,0,0,0,1,0,0,0,1)), Age = factor(c(65,66,78,55,67,66,79,54,65,78)), Sex = factor(c("M","M","F","M","M","M","F","M","F","F")))
summary(health)

И сохранить в другой фрейм данных

health_table <- summary(health)
health_df <- as.data.frame(health_table)