поэлементно означают в R

Question

В R, у меня есть два вектора:

a <- c(1, 2, 3, 4) 
b <- c(NA, 6, 7, 8) 

Как найти поэлементное среднее из двух векторов, удаления NA, без цикла? то есть я хочу, чтобы получить вектор

(1, 4, 5, 6) 

Я знаю функцию mean(), я знаю, что аргумент na.rm = 1. Но я не знаю, как соединить вещи. Разумеется, на самом деле у меня тысячи векторов с NA, появляющихся в разных местах, поэтому любое зависящее от размера решение не будет работать. Благодарю.

Answer 1

как насчет:

rowMeans(cbind(a, b), na.rm=TRUE) 

или

colMeans(rbind(a, b), na.rm=TRUE) 

Answer 2

Я не совсем уверен, что вы просите, но

apply(rbind(a,b),2,mean,na.rm = TRUE) 

делать то, что вы хотите?