Как усреднить по конкретным столбцам
Как рассчитать среднее время ответа участников на каждый вопрос (строки — это участники, а столбцы — правильные ответы и время ответа). Я могу сделать это для отдельных столбцов, но я не знаю, как перебрать все столбцы и поместить ответы в новую таблицу.
В конце концов, мне нужна таблица, в которой показано среднее время ответа и процент правильных ответов на каждый вопрос.
Я могу найти медиану для каждого вопроса, а также процент правильных ответов для каждого вопроса, но я могу прокрутить набор данных, чтобы сопоставить сводную таблицу этой статистики.
new_Data <- data[ , grepl( "correct|time" , names( data ) ) ]
Взгляните на sapply
Ответы 2
Это то, из чего вы смотрите?
sapply( mtcars[ , grepl( "a|wt" , names( mtcars ) ) ], quantile, .5 )
или как петля
A<- NULL
for( i in grep( "a|wt" , names( mtcars ) , value=T )){
A <- rbind( A ,
data.frame( vars=i , medain=quantile( mtcars[ , i ] , .5 )))
}
A
Если я правильно понимаю ваш вопрос, это решение может удовлетворить ваши потребности. Он выбирает столбцы на основе регулярного выражения и вычисляет среднее значение для всех из них. Если нет, включите пример желаемого результата. Удачи!
library(tidyverse)
mtcars %>%
select(matches(".*p$|.*t$")) %>% #regex example: ends in "p" or ends in "t"
summarise_all(mean, na.rm = T)
disp hp drat wt
1 230.7219 146.6875 3.596563 3.21725
Пожалуйста, сделать этот вопрос воспроизводимым, включив некоторые или все
dataв виде обычного текста и пример желаемого результата.