R применение функции к субматрице

У меня большая матрица примерно 90x100x90x200. Первые 3 измерения пространственные, а последнее - время. Чтобы применить маску к моим данным, я хочу умножить первые 3 измерения на маску тех же измерений для всех 200 временных точек. Есть ли функция _apply, которая может быть использована для этого? Спасибо за любые предложения.