mais simples que isso, dado seu array 3d 'M', M <- array(c(seq(1:25),rep(NA,2)),dim=c(3,3,3)) rowMeans(M, dims=2, na.rm=T) (bem mais simples qdo ha' um exemplo q pode ser reproduzido) Em 12 de junho de 2013 14:51, <andrebvs@bol.com.br> escreveu:
Olá Tito, acredito que seja essa solução a qual procuras:
# Matriz Tridimensional:
M <- array(c(seq(1:25),rep(NA,2)),dim=c(3,3,3))
A <- NULL nM <- 3 # nº de matrizes a serem usadas nE <- 9 # nº de elementos em cada matriz
S1 <- rep(1:nE,each=nM) S2 <- rep(1:nM,nE)
for (i in 1:(nM*nE)) { A[i] <- mean(M[,,S2[i]][S1[i]]) }
Result <- matrix(colMeans(matrix(A,,9),na.rm = TRUE),3,3) Result
Espero ter ajudado colega.
Att. André BVS
________________________________ Em 12/06/2013 14:31, Tito Conte < tito.conte@gmail.com > escreveu: ok
Tito Conte
2013/6/12 Benilton Carvalho <beniltoncarvalho@gmail.com>
o comando eh array(), use o argumento dim= apropriadamente... qdo houver um exemplo reproduzivel, nao me incomodarei em dar as duas linhas de comando q vc procura.
Em 12 de junho de 2013 11:36, Tito Conte <tito.conte@gmail.com> escreveu:
Benilton, como criar um array 3d (nunca fiz isso)?
Tito Conte
2013/6/12 Benilton Carvalho <beniltoncarvalho@gmail.com>
Crie um array 3d e use rowMeans com o argumento na.rm=TRUE
On 12 Jun 2013 11:14, "Tito Conte" <tito.conte@gmail.com> wrote:
Bom dia,
Preciso calcular a média de pontos entre matrizes que possuem NA i gnorando-os
exemplo: média entre estas matrizes
[,1] [,2] [,3] [1,] 3 6 9 [2,] 4 7 10
& gt;> [3,] 5 8 11
[,1] [,2] [,3] [1,] 1.5 3.0 4.5 [2,] 2.0 3.5 5.0 [3,] 2.5 4.0 5.5
[,1] [,2] [,3] [1,] 2 2 NA [2,] 2 2 2 [3,] 2 2 NA
e obter um resultado que fosse uma matriz do mesmo tamnho com a média de cada ponto ignoradno NAs
alguém pode me ajudar com essa?
Tito Conte
_______________________________________________ R-br mailing list R-br@listas.c3sl.u fpr.br https://listas.inf.ufpr.br/cgi-bin/mailman/listinfo/r-br Leia o guia de postagem (http://www.leg.ufpr.br/r-br-guia) e forneça código mínimo reproduzível.
_______________________________________________ R-br mailing list R-br@listas.c3sl.ufpr.br https://listas.inf.ufpr.br/cgi-bin/mailman/listinfo/r-br Leia o guia de postagem (http://www.leg.ufpr.br/r-br-guia) e forneça código mínimo reproduzível. &g t;
_______________________________________________ R-br mailing list R-br@listas.c3sl.ufpr.br https://listas.inf.ufpr.br/cgi-bin/mailman/listinfo/r-br Leia o guia de postagem (http://www.leg.ufpr.br/r-br-guia) e forneça código mínimo reproduzível.
_______________________________________________ R-br mailing list R-br@listas.c3sl.ufpr.br https://listas.inf.ufpr.br/cgi-bin/mailman/listinfo/r-br Leia o guia de postagem (http://www.leg.ufpr.br/r-br-guia) e forneça código mínimo reproduzível.
_______________________________________________ R-br mailing list R-br@listas.c3sl.ufpr.br https://listas.inf.ufpr.br/cgi-bin/mailman/listinfo/r-br Leia o guia de postagem (http://www.leg.ufpr.br/r-br-guia) e forneça código mínimo reproduzível.