Tableau T de test 3D

Question

J'ai une matrice de données 3D définie par [i,j,k] et je souhaite effectuer un test t d'échantillon unique sur la 3ème dimension, [k], en testant la différence par rapport à 0. Idéalement, les résultats seraient renvoyés sous la forme d'une matrice de t valeurs de taille [i,j]. Malheureusement, je ne connais pas la taille de la matrice 3D à l'avance.

set.seed(1999) 
i <- 4; j <- 2; k <- 6 
df <- runif((i*j*k)) 
ar <- array(df, c(i, j, k)) 

Answer 1

Si je comprends bien, essayez ce qui suit.

tt <- apply(ar, 1:2, t.test) 
apply(tt, 1, function(x) lapply(x, identity))