Obrigado senhores pelas dicas, e desculpem a demora para responder. Estou aprendendo bastante sobre R nesta comunidade. <div><br></div><div>Abraço à todos.</div><br><div class="gmail_quote">Em 11 de agosto de 2011 17:05, Pedro Rafael <span dir="ltr"><<a href="mailto:pedro.rafael.marinho@gmail.com">pedro.rafael.marinho@gmail.com</a>></span> escreveu:<br>
<blockquote class="gmail_quote" style="margin:0 0 0 .8ex;border-left:1px #ccc solid;padding-left:1ex;"><div><br><br><div class="gmail_quote">Em 1 de agosto de 2011 18:52, jcfaria [via R-br] <span dir="ltr"><<a href="mailto:ml-node%2B3710920-1613572389-223914@n4.nabble.com" target="_blank">ml-node+3710920-1613572389-223914@n4.nabble.com</a>></span> escreveu:<div>
<div></div><div class="h5"><br>
<blockquote class="gmail_quote" style="margin:0 0 0 .8ex;border-left:1px #ccc solid;padding-left:1ex">
Complementando as dicas do Benilton,
<br><br>Em programação orientada a objetos (R é uma delas e usa atualmente
<br>dois sistemas: S3 e S4)
<br>algumas vezes o desenvolvedor opta por encapsular um objeto.
<br><br>Encapsular um objeto (no caso uma função) significa ocultar do usuário
<br>detalhes usados no desenvolvimento dessa função.
<br><br>Por exemplo, as funções abaixo (plot.acf*, plot.data.frame*,
<br>plot.factor*, plot.formula*, etc) estão todas encapsuladas.
<br>Observe o marcador "*" em todas elas!
<br><br>> methods(plot)
<br> [1] plot.acf* plot.data.frame* plot.decomposed.ts*
<br> [4] plot.default plot.dendrogram* plot.density
<br> [7] plot.ecdf plot.factor* plot.formula*
<br>[10] plot.hclust* plot.histogram* plot.HoltWinters*
<br>[13] plot.isoreg* plot.lm plot.medpolish*
<br>[16] plot.mlm plot.ppr* plot.prcomp*
<br>[19] plot.princomp* plot.profile.nls* plot.spec
<br>[22] plot.spec.coherency plot.spec.phase plot.stepfun
<br>[25] plot.stl* plot.table* plot.ts
<br>[28] plot.tskernel* plot.TukeyHSD
<br><br> Non-visible functions are asterisked
<br><br>Se você digita o nome de uma delas para ver seu código fonte:
<br>> plot.data.frame
<br><br>Recebe a mensagem: Erro: objeto 'plot.data.frame' não encontrado!
<br>Ou seja, esta função está encapsulada (não visível ao usuário comum).
<br><br>O operador ":::" lhe permite ter acesso ao código fonte de qualquer
<br>função encapsulada (não visível):
<br><br>> graphics:::plot.data.frame
<br>function (x, ...)
<br>{
<br> plot2 <- function(x, xlab = names(x)[1L], ylab = names(x)[2L],
<br> ...) plot(x[[1L]], x[[2L]], xlab = xlab, ylab = ylab,
<br> ...)
<br> if (!is.data.frame(x))
<br> stop("'plot.data.frame' applied to non data frame")
<br> if (ncol(x) == 1) {
<br> x1 <- x[[1L]]
<br> cl <- class(x1)
<br> if (cl %in% c("integer", "numeric"))
<br> stripchart(x1, ...)
<br> else plot(x1, ...)
<br> }
<br> else if (ncol(x) == 2) {
<br> plot2(x, ...)
<br> }
<br> else {
<br> pairs(data.matrix(x), ...)
<br> }
<br>}
<br><environment: namespace:graphics>
<br><br><br>Posso estar equivocado e gostaria de escutar a opinião da comunidade,
<br>mas não vejo muito sentido em usar encapsulamento numa linguagem com
<br>as características do R.
<br><div><br>Abs,
<br>--
<br>///\\\///\\\///\\\///\\\///\\\///\\\///\\\///\\\
<br>Jose Claudio Faria
<br>Estatistica - Prof. Pleno
<br>UESC/DCET/Brasil
<br>joseclaudio.faria at <a href="http://gmail.com" target="_blank">gmail.com</a>
<br>///\\\///\\\///\\\///\\\///\\\///\\\///\\\///\\\
<br></div><div>_______________________________________________
<br>R-br mailing list
<br><a href="http://user/SendEmail.jtp?type=node&node=3710920&i=0" rel="nofollow" link="external" target="_blank">[hidden email]</a>
<br><a href="https://listas.inf.ufpr.br/cgi-bin/mailman/listinfo/r-br" rel="nofollow" link="external" 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" rel="nofollow" link="external" target="_blank">http://www.leg.ufpr.br/r-br-guia</a>) e forneça código mínimo reproduzível.
<br>
<br>
<br>
<hr noshade size="1" color="#cccccc">
</div><div style="color:#444;font:12px tahoma,geneva,helvetica,arial,sans-serif"><div>
<div style="font-weight:bold">If you reply to this email, your message will be added to the discussion below:</div>
</div><a href="http://r-br.2285057.n4.nabble.com/R-br-Duvida-Operadores-any-e-tp3710751p3710920.html" target="_blank">http://r-br.2285057.n4.nabble.com/R-br-Duvida-Operadores-any-e-tp3710751p3710920.html</a>
</div><div><div></div><div>
<div style="color:#666;font:11px tahoma,geneva,helvetica,arial,sans-serif;margin-top:.4em">
To unsubscribe from R-br, <a href="http://r-br.2285057.n4.nabble.com/template/NamlServlet.jtp?macro=unsubscribe_by_code&node=3357982&code=cGVkcm8ucmFmYWVsLm1hcmluaG9AZ21haWwuY29tfDMzNTc5ODJ8NTAyMjI0MDYw" target="_blank">click here</a>.
</div></div></div></blockquote></div></div></div><font color="#888888"><br><br clear="all"><br>-- <br><font color="#000099">Saudações,</font><div><font color="#000099">Pedro Rafael Diniz Marinho - Estatístico SES-PB</font></div>
<div><font color="#000099">Currículo Lattes</font><font color="#000066">:</font><span style="color:rgb(255, 0, 0)"> <a href="http://buscatextual.cnpq.br/buscatextual/visualizacv.jsp?id=K4250792T6" target="_blank">http://buscatextual.cnpq.br/buscatextual/visualizacv.jsp?id=K4250792T6</a></span></div>
<br>
</font></div>
</blockquote></div><br><br clear="all"><br>-- <br><font color="#000099">Saudações,</font><div><font color="#000099">Pedro Rafael Diniz Marinho - Estatístico SES-PB</font></div><div><font color="#000099">Currículo Lattes</font><font color="#000066">:</font><span style="color:rgb(255, 0, 0)"> <a href="http://buscatextual.cnpq.br/buscatextual/visualizacv.jsp?id=K4250792T6" target="_blank">http://buscatextual.cnpq.br/buscatextual/visualizacv.jsp?id=K4250792T6</a></span></div>
<br>