<html><body><div style="color:#000; background-color:#fff; font-family:HelveticaNeue, Helvetica Neue, Helvetica, Arial, Lucida Grande, sans-serif;font-size:8pt"><div class="" style="">Bom dia, eu uso o pacote cubature. Segue exemplo abaixo de uma integral tripla.</div><div class="" style=""><br class="" style=""></div><div class="" style="color: rgb(0, 0, 0); font-size: 11px; font-family: HelveticaNeue, 'Helvetica Neue', Helvetica, Arial, 'Lucida Grande', sans-serif; font-style: normal; background-color: transparent;">Att,</div><div class="" style=""></div><div class="" style=""> </div><div class="" style=""><span style="font-weight:bold;font-style:italic;" class="">Ari Clecius Alves de Lima</span><br style="font-weight:bold;font-style:italic;" class=""><span style="font-weight:bold;font-style:italic;" class="">Engenheiro Químico</span><br style="font-weight:bold;font-style:italic;" class=""><span style="font-weight:bold;font-style:italic;"
class="">Me. Engenharia Civil</span><br style="font-weight:bold;font-style:italic;" class=""><span style="font-weight:bold;font-style:italic;" class="">(085)88412345</span><br style="font-weight:bold;font-style:italic;" class=""><span style="font-weight:bold;font-style:italic;" class="">(085)33669042</span></div><div style="color: rgb(0, 0, 0); font-size: 11px; font-family: HelveticaNeue, 'Helvetica Neue', Helvetica, Arial, 'Lucida Grande', sans-serif; font-style: italic; background-color: transparent;" class=""><span style="font-weight:bold;font-style:italic;" class=""><br class="" style=""></span></div><div style="color: rgb(0, 0, 0); font-size: 11px; font-family: HelveticaNeue, 'Helvetica Neue', Helvetica, Arial, 'Lucida Grande', sans-serif; font-style: italic; background-color: transparent;" class=""><span style="font-weight:bold;font-style:italic;" class=""><!--[if gte msEquation 12]><m:oMathPara><m:oMath><m:nary><m:naryPr><m:limLoc
m:val="subSup"/><span style='font-family:"Cambria Math","serif";
mso-ascii-font-family:"Cambria Math";mso-fareast-font-family:"Times New Roman";
mso-fareast-theme-font:major-fareast;mso-hansi-font-family:"Cambria Math";
mso-bidi-font-family:"Times New Roman";mso-bidi-theme-font:major-bidi;
font-style:italic;mso-bidi-font-style:normal'><m:ctrlPr></m:ctrlPr></span></m:naryPr><m:sub><b
style='mso-bidi-font-weight:normal'><i style='mso-bidi-font-style:normal'><span
style='font-size:11.0pt;line-height:115%;font-family:"Cambria Math","serif";
mso-fareast-font-family:"Times New Roman";mso-fareast-theme-font:minor-fareast;
mso-bidi-font-family:"Times New Roman";mso-bidi-theme-font:minor-bidi;
mso-ansi-language:PT-BR;mso-fareast-language:PT-BR;mso-bidi-language:AR-SA'><m:r><m:rPr><m:scr
m:val="roman"/><m:sty m:val="bi"/></m:rPr>0</m:r></span></i></b></m:sub><m:sup><b
style='mso-bidi-font-weight:normal'><i style='mso-bidi-font-style:normal'><span
style='font-size:11.0pt;line-height:115%;font-family:"Cambria Math","serif";
mso-fareast-font-family:"Times New Roman";mso-fareast-theme-font:minor-fareast;
mso-bidi-font-family:"Times New Roman";mso-bidi-theme-font:minor-bidi;
mso-ansi-language:PT-BR;mso-fareast-language:PT-BR;mso-bidi-language:AR-SA'><m:r><m:rPr><m:scr
m:val="roman"/><m:sty m:val="bi"/></m:rPr>5</m:r></span></i></b></m:sup><m:e><m:nary><m:naryPr><m:limLoc
m:val="subSup"/><span style='font-family:"Cambria Math","serif";
mso-ascii-font-family:"Cambria Math";mso-fareast-font-family:"Times New Roman";
mso-fareast-theme-font:major-fareast;mso-hansi-font-family:"Cambria Math";
mso-bidi-font-family:"Times New Roman";mso-bidi-theme-font:major-bidi;
font-style:italic;mso-bidi-font-style:normal'><m:ctrlPr></m:ctrlPr></span></m:naryPr><m:sub><b
style='mso-bidi-font-weight:normal'><i style='mso-bidi-font-style:normal'><span
style='font-size:11.0pt;line-height:115%;font-family:"Cambria Math","serif";
mso-fareast-font-family:"Times New Roman";mso-fareast-theme-font:minor-fareast;
mso-bidi-font-family:"Times New Roman";mso-bidi-theme-font:minor-bidi;
mso-ansi-language:PT-BR;mso-fareast-language:PT-BR;mso-bidi-language:
AR-SA'><m:r><m:rPr><m:scr m:val="roman"/><m:sty m:val="bi"/></m:rPr>0</m:r></span></i></b></m:sub><m:sup><b
style='mso-bidi-font-weight:normal'><i style='mso-bidi-font-style:normal'><span
style='font-size:11.0pt;line-height:115%;font-family:"Cambria Math","serif";
mso-fareast-font-family:"Times New Roman";mso-fareast-theme-font:minor-fareast;
mso-bidi-font-family:"Times New Roman";mso-bidi-theme-font:minor-bidi;
mso-ansi-language:PT-BR;mso-fareast-language:PT-BR;mso-bidi-language:
AR-SA'><m:r><m:rPr><m:scr m:val="roman"/><m:sty m:val="bi"/></m:rPr>5</m:r></span></i></b></m:sup><m:e><m:nary><m:naryPr><m:limLoc
m:val="subSup"/><span style='font-family:"Cambria Math","serif";
mso-ascii-font-family:"Cambria Math";mso-fareast-font-family:"Times New Roman";
mso-fareast-theme-font:major-fareast;mso-hansi-font-family:"Cambria Math";
mso-bidi-font-family:"Times New Roman";mso-bidi-theme-font:major-bidi;
font-style:italic;mso-bidi-font-style:normal'><m:ctrlPr></m:ctrlPr></span></m:naryPr><m:sub><b
style='mso-bidi-font-weight:normal'><i style='mso-bidi-font-style:normal'><span
style='font-size:11.0pt;line-height:115%;font-family:"Cambria Math","serif";
mso-fareast-font-family:"Times New Roman";mso-fareast-theme-font:minor-fareast;
mso-bidi-font-family:"Times New Roman";mso-bidi-theme-font:minor-bidi;
mso-ansi-language:PT-BR;mso-fareast-language:PT-BR;mso-bidi-language:
AR-SA'><m:r><m:rPr><m:scr m:val="roman"/><m:sty m:val="bi"/></m:rPr>0</m:r></span></i></b></m:sub><m:sup><b
style='mso-bidi-font-weight:normal'><i style='mso-bidi-font-style:normal'><span
style='font-size:11.0pt;line-height:115%;font-family:"Cambria Math","serif";
mso-fareast-font-family:"Times New Roman";mso-fareast-theme-font:minor-fareast;
mso-bidi-font-family:"Times New Roman";mso-bidi-theme-font:minor-bidi;
mso-ansi-language:PT-BR;mso-fareast-language:PT-BR;mso-bidi-language:
AR-SA'><m:r><m:rPr><m:scr m:val="roman"/><m:sty m:val="bi"/></m:rPr>5</m:r></span></i></b></m:sup><m:e><m:f><m:fPr><span
style='font-family:"Cambria Math","serif";mso-ascii-font-family:"Cambria Math";
mso-fareast-font-family:"Times New Roman";mso-fareast-theme-font:
major-fareast;mso-hansi-font-family:"Cambria Math";mso-bidi-font-family:
"Times New Roman";mso-bidi-theme-font:major-bidi;font-style:italic;
mso-bidi-font-style:normal'><m:ctrlPr></m:ctrlPr></span></m:fPr><m:num><b
style='mso-bidi-font-weight:normal'><i style='mso-bidi-font-style:
normal'><span style='font-size:11.0pt;line-height:115%;font-family:
"Cambria Math","serif";mso-fareast-font-family:"Times New Roman";
mso-fareast-theme-font:minor-fareast;mso-bidi-font-family:"Times New Roman";
mso-bidi-theme-font:minor-bidi;mso-ansi-language:PT-BR;mso-fareast-language:
PT-BR;mso-bidi-language:AR-SA'><m:r><m:rPr><m:scr m:val="roman"/><m:sty
m:val="bi"/></m:rPr>2</m:r></span></i></b></m:num><m:den><b
style='mso-bidi-font-weight:normal'><i style='mso-bidi-font-style:
normal'><span style='font-size:11.0pt;line-height:115%;font-family:
"Cambria Math","serif";mso-fareast-font-family:"Times New Roman";
mso-fareast-theme-font:minor-fareast;mso-bidi-font-family:"Times New Roman";
mso-bidi-theme-font:minor-bidi;mso-ansi-language:PT-BR;mso-fareast-language:
PT-BR;mso-bidi-language:AR-SA'><m:r><m:rPr><m:scr m:val="roman"/><m:sty
m:val="bi"/></m:rPr>3</m:r></span></i></b></m:den></m:f></m:e></m:nary></m:e></m:nary><b
style='mso-bidi-font-weight:normal'><i style='mso-bidi-font-style:normal'><span
style='font-size:11.0pt;line-height:115%;font-family:"Cambria Math","serif";
mso-fareast-font-family:"Times New Roman";mso-fareast-theme-font:minor-fareast;
mso-bidi-font-family:"Times New Roman";mso-bidi-theme-font:minor-bidi;
mso-ansi-language:PT-BR;mso-fareast-language:PT-BR;mso-bidi-language:AR-SA'><m:r><m:rPr><m:scr
m:val="roman"/><m:sty m:val="bi"/></m:rPr>x</m:r><m:r><m:rPr><m:scr
m:val="roman"/><m:sty m:val="bi"/></m:rPr>*</m:r><m:r><m:rPr><m:scr
m:val="roman"/><m:sty m:val="bi"/></m:rPr>y</m:r><m:r><m:rPr><m:scr
m:val="roman"/><m:sty m:val="bi"/></m:rPr>*</m:r><m:r><m:rPr><m:scr
m:val="roman"/><m:sty m:val="bi"/></m:rPr>z</m:r><m:r><m:rPr><m:scr
m:val="roman"/><m:sty m:val="bi"/></m:rPr>*</m:r><m:r><m:rPr><m:scr
m:val="roman"/><m:sty m:val="bi"/></m:rPr>dx</m:r><m:r><m:rPr><m:scr
m:val="roman"/><m:sty m:val="bi"/></m:rPr>*</m:r><m:r><m:rPr><m:scr
m:val="roman"/><m:sty m:val="bi"/></m:rPr>dy</m:r><m:r><m:rPr><m:scr
m:val="roman"/><m:sty m:val="bi"/></m:rPr>*</m:r><m:r><m:rPr><m:scr
m:val="roman"/><m:sty m:val="bi"/></m:rPr>dz</m:r></span></i></b></m:e></m:nary></m:oMath></m:oMathPara><![endif]--><!--[if !msEquation]--><span style="font-size:11.0pt;line-height:115%;font-family:"Calibri","sans-serif";
mso-ascii-theme-font:minor-latin;mso-fareast-font-family:"Times New Roman";
mso-fareast-theme-font:minor-fareast;mso-hansi-theme-font:minor-latin;
mso-bidi-font-family:"Times New Roman";mso-bidi-theme-font:minor-bidi;
mso-ansi-language:PT-BR;mso-fareast-language:PT-BR;mso-bidi-language:AR-SA" class=""><v:shapetype id="_x0000_t75" coordsize="21600,21600" o:spt="75" o:preferrelative="t" path="m@4@5l@4@11@9@11@9@5xe" filled="f" stroked="f" class="" style=""> #∫∫</v:shapetype></span></span><span style="font-family: Calibri, sans-serif; font-size: 15px; font-weight: bold; line-height: 16.866666793823242px;" class="">∫</span><span style="font-family: Calibri, sans-serif; font-size: 11pt; line-height: 115%; font-weight: bold; background-color: transparent;" class="">2/3 x*y*z*dx*dy*dz</span></div><div class="" style="margin-bottom: 0.0001pt; word-break: break-all;"><span lang="EN-US" style="font-size: 9pt; font-family: 'Lucida Console'; background: rgb(225, 226, 229);" class="">library(cubature)<o:p class="" style=""></o:p></span></div><div class="" style="margin-bottom: 0.0001pt; word-break: break-all;"><span lang="EN-US" style="font-size: 9pt; font-family:
'Lucida Console'; background: rgb(225, 226, 229);" class="">f =function(x) 2/3 * (x[1] + x[2] + x[3])<o:p class="" style=""></o:p></span></div><div style="font-style: italic; background-color: transparent;" class=""><span style="font-weight: bold;" class="">
</span></div><div class="" style="margin-bottom: 0.0001pt; word-break: break-all;"><span lang="EN-US" style="font-size: 9pt; font-family: 'Lucida Console'; background: rgb(225, 226, 229);" class="">adaptIntegrate(f, lowerLimit = c(0, 0, 0),
upperLimit = c(0.5, 0.5, 0.5))<o:p class="" style=""></o:p></span></div> <div class="qtdSeparateBR"><br><br></div><div class="yahoo_quoted" style="display: block;"> <div style="font-family: HelveticaNeue, Helvetica Neue, Helvetica, Arial, Lucida Grande, sans-serif; font-size: 8pt;" class=""> <div style="font-family: HelveticaNeue, Helvetica Neue, Helvetica, Arial, Lucida Grande, sans-serif; font-size: 12pt;" class=""> <div dir="ltr" class="" style=""> <font size="2" face="Arial" class="" style=""> Em Segunda-feira, 11 de Agosto de 2014 11:18, Artur Lourival da Fonseca Machado <artur@irati.unicentro.br> escreveu:<br class="" style=""> </font> </div> <br class="" style=""><br class="" style=""> <div class="" style=""><div id="yiv5658239851" class="" style=""><div class="" style="">
Olá Jodavid,<div class="" style=""><br class="" style=""></div><div class="" style="">Use integral2 do pacote {pracma}. </div><div class="" style="">No help do pacote você encontra diversos exemplos, incluindo limites de integração dados por funções.</div><div class="" style=""><br class="" style=""></div><div class="" style="">Att.,</div><div class="" style=""><br class="" style=""></div><div class="" style="">Artur L F Machado</div><div class="" style=""><br class="" style=""><br class="" style="">Em 11/08/2014 às 11:04 horas, r-br@listas.c3sl.ufpr.br escreveu:<blockquote style="border-left:1px solid rgb(204, 204, 204);margin:0pt 0pt 0pt 0.8ex;padding-left:1ex;" class=""><span class="" style=""><div dir="ltr" class="" style="">estou precisando fazer uma integral de uma distribuição conjunta no R, e para isso é necessário fazer uma integral dupla.<div class="" style=""><br class="" style=""></div><div class="" style=""><br class=""
style=""></div><div class="" style="">Alguém saberia me responder como posso calcular integral dupla no R?<br class="" style="">
<div class="" style=""><div class="" style=""><br class="" style=""></div>-- <br class="" style=""><div dir="ltr" class="" style="">Jodavid Ferreira<br class="" style="">Responsável pela comissão de Comunicação do MJ da RCCPB - <a rel="nofollow" target="_blank" href="http://rccpbjovem.com/" class="" style=""></a><a rel="nofollow" target="_blank" href="http://rccpbjovem.com/" class="" style="">rccpbjovem.com</a><div class="" style="">Membro da equipe Estadual do Ministério de Comunicação da RCCPB - <a rel="nofollow" target="_blank" href="http://rccpb.com.br/" class="" style=""></a><a rel="nofollow" target="_blank" href="http://rccpb.com.br/" class="" style="">rccpb.com.br</a><br class="" style="">
Bacharelando em Estatística - Universidade Federal da Paraíba - <a rel="nofollow" target="_blank" href="http://www.de.ufpb.br/" class="" style=""></a><a rel="nofollow" target="_blank" href="http://www.de.ufpb.br/" class="" style="">www.de.ufpb.br</a></div><div class="" style="">Estagiário no Laboratório de Estatística Aplicada ao Processamento de Imagens e Geoprocessamento - <a rel="nofollow" target="_blank" href="http://de.ufpb.br/~leapig" class="" style=""></a><a rel="nofollow" target="_blank" href="http://de.ufpb.br/~leapig" class="" style="">de.ufpb.br/~leapig</a></div>
<div class="" style="">Site Pessoal - <a rel="nofollow" target="_blank" href="http://blog.jodavidferreira.com/" class="" style=""></a><a rel="nofollow" target="_blank" href="http://blog.jodavidferreira.com/" class="" style="">blog.jodavidferreira.com</a></div><div class="" style="">Twitter - <a rel="nofollow" target="_blank" href="http://twitter.com/JodavidFerreira" class="" style=""></a><a rel="nofollow" ymailto="mailto:@JodavidFerreira" target="_blank" href="mailto:@JodavidFerreira" class="" style="">@JodavidFerreira</a></div>
</div>
</div></div></div>
</span></blockquote></div>
</div>
</div><br class="" style="">_______________________________________________<br class="" style="">R-br mailing list<br class="" style=""><a ymailto="mailto:R-br@listas.c3sl.ufpr.br" href="mailto:R-br@listas.c3sl.ufpr.br" class="" style="">R-br@listas.c3sl.ufpr.br</a><br class="" style=""><a href="https://listas.inf.ufpr.br/cgi-bin/mailman/listinfo/r-br" target="_blank" class="" style="">https://listas.inf.ufpr.br/cgi-bin/mailman/listinfo/r-br</a><br class="" style="">Leia o guia de postagem (<a href="http://www.leg.ufpr.br/r-br-guia" target="_blank" class="" style="">http://www.leg.ufpr.br/r-br-guia</a>) e forneça código mínimo reproduzível.<br class="" style=""><br class="" style=""></div> </div> </div> </div> </div></body></html>