как средние группы элементов в списке в R?

Question

В R, у меня есть список из 10 элементов, таких как:

n <- c(5,5,5,5,5,6,6,6,6,6) 

Я хочу, чтобы создать еще один список, который будет иметь 2 элементов, где каждый элемент будет в среднем 5-элементов в предыдущем списке. Таким образом, другой список должен выглядеть следующим образом:

5,6 

Есть ли быстрый способ сделать это в R? То, что я хочу, это список, который дает мне среднее значение первого элемента X, среднее значение второго элемента X и т. Д. В примере исходный список содержит 10 элементов, и я хочу сгруппировать их по 5. Поэтому я пытаюсь вычислить список, где первым элементом является среднее из первых 5 элементов, а второй элемент - среднее из последних 5 элементов.

Answer 1

Как вы уже упоминали, ваш первоначальный список насчитывает 500 имен. Вот подход:

x <- runif(500) 
list_x <- split(x, ceiling(seq_along(x)/50)) 

# find the mean in each group of 50 
colMeans(as.data.frame(list_x)) 

10 элементов:

y <- c(rep(5, 5), rep(6, 5)) 

list_y <- split(y, ceiling(seq_along(y)/5)) 
colMeans(as.data.frame(list_y)) 

Answer 2

Отдайте свой вектор значений

x = rnorm(50 * 10) 

в матрицу и взять колонку означает

colMeans(matrix(x, 50)) 

Подробнее как правило, создать вектор, который описывает, как данные должны быть разделены

f = rep(seq_len(10), each=50) 

split() ваших данных, lapply() функции для каждой группы, и объединить (unlist() в данном случае) результаты

unlist(lapply(split(x, f), mean)) 

ли это в два (например, sapply(split(x, f), mean)) или один (например, tapply(), by(), ave()) шаги.