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