<div dir="ltr"><div class="gmail_extra"><div class="gmail_quote"><blockquote class="gmail_quote" style="margin:0px 0px 0px 0.8ex;border-left:1px solid rgb(204,204,204);padding-left:1ex"><br><div class="gmail_default" style="font-family:"comic sans ms",sans-serif;font-size:large;display:inline">Para o  codigo que o Walmes disponibilizou para as curvas bimodais de Durner e preciso instalar o package </div></blockquote><div><div class="gmail_default" style="font-family:"comic sans ms",sans-serif;font-size:large;display:inline"><br></div></div><div><div class="gmail_default" style="font-family:"comic sans ms",sans-serif;font-size:large;display:inline">minpack.lm </div></div><div><div class="gmail_default" style="font-family:"comic sans ms",sans-serif;font-size:large;display:inline"><br></div></div><div><div class="gmail_default" style="font-family:"comic sans ms",sans-serif;font-size:large;display:inline">​install.packages("minpack.lm")</div></div><div><div class="gmail_default" style="font-family:"comic sans ms",sans-serif;font-size:large;display:inline">​</div> </div><blockquote class="gmail_quote" style="margin:0px 0px 0px 0.8ex;border-left:1px solid rgb(204,204,204);padding-left:1ex">
<br>
------------------------------<wbr>------------------------------<wbr>----------<br>
<br>
Message: 1<br>
Date: Tue, 8 Aug 2017 12:02:29 -0300<br>
From: Walmes Zeviani <<a href="mailto:walmeszeviani@gmail.com">walmeszeviani@gmail.com</a>><br>
To: Delcio Rudinei Bortolanza <<a href="mailto:delcio.bortolanza@outlook.com">delcio.bortolanza@outlook.com</a><wbr>>,  a<br>
        lista Brasileira oficial de discussão do programa R.<br>
        <<a href="mailto:r-br@listas.c3sl.ufpr.br">r-br@listas.c3sl.ufpr.br</a>><br>
Subject: Re: [R-br] Adicionar restrições a parâmetros em regressão<br>
        não linear no R<br>
Message-ID:<br>
        <CAFU=<a href="mailto:EkYt-YJiO-3gcyRYfW_4uJ%2B9qyZFr4O5zO%2BDbAoVhhcjbQ@mail.gmail.com">EkYt-YJiO-3gcyRYfW_4uJ+<wbr>9qyZFr4O5zO+DbAoVhhcjbQ@mail.<wbr>gmail.com</a>><br>
Content-Type: text/plain; charset="utf-8"<br>
<br>
Delcio,<br>
<br>
Basta fazer assim:<br>
<br>
durner <- as.formula(theta ~<br>
                         w0 * (thetar + ((thetas - thetar)/(1 + (alpha0 *<br>
psi)^n0)^(1 - 1/n0))) +<br>
                         (1 - w0) * (thetar + ((thetas - thetar)/(1 +<br>
(alpha1 * psi)^n1)^(1 - 1/n1))))<br>
<br>
dur <- nlsLM(durner,<br>
             start = list(w0 = 0.6,<br>
                          thetas = 0.5,<br>
                          thetar = 0.25,<br>
                          alpha0 = 0.1,<br>
                          n0 = 2,<br>
                          alpha1 = 0.1,<br>
                          n1 = 1),<br>
             data = dados,<br>
             algorithm = "LM",<br>
             trace = "F",<br>
             control = list(maxiter = 500))<br>
summary(dur)<br>
<br>
À disposição.<br>
Walmes.<br>
<br>
​<br>
-------------- Próxima Parte ----------<br>
Um anexo em HTML foi limpo...<br>
URL: <<a href="http://listas.inf.ufpr.br/pipermail/r-br/attachments/20170808/737511e5/attachment-0001.html" rel="noreferrer" target="_blank">http://listas.inf.ufpr.br/<wbr>pipermail/r-br/attachments/<wbr>20170808/737511e5/attachment-<wbr>0001.html</a>><br>
<br>
------------------------------<br>
<br>
Message: 2<br>
Date: Tue, 8 Aug 2017 14:35:29 -0300<br>
From: Cesar Rabak <<a href="mailto:cesar.rabak@gmail.com">cesar.rabak@gmail.com</a>><br>
To: Cleber Oliveira <<a href="mailto:oliveiramacedocleber@gmail.com">oliveiramacedocleber@gmail.<wbr>com</a>>,  a lista<br>
        Brasileira oficial de discussão do programa R.<br>
        <<a href="mailto:r-br@listas.c3sl.ufpr.br">r-br@listas.c3sl.ufpr.br</a>><br>
Subject: Re: [R-br] Análise de dados antes e depois<br>
Message-ID:<br>
        <CAKrF98=<a href="mailto:P-xCSjHHV8_qiCVtAprJryOfQs8kNL%2BHoutQdX0cwiA@mail.gmail.com">P-xCSjHHV8_<wbr>qiCVtAprJryOfQs8kNL+<wbr>HoutQdX0cwiA@mail.gmail.com</a>><br>
Content-Type: text/plain; charset="utf-8"<br>
<br>
Cleber,<br>
<br>
Sua pergunta extrapola o objetivo deste grupo (não CMR, etc.).<br>
<br>
Ademais ela enseja muitas questões antes que possa ser iniciada uma<br>
discussão com assertividade.<br>
<br>
Minha recomendação é que você a refaça nos foruns mais voltados para<br>
questões de Estatística (p.ex.: <a href="https://stats.stackexchange.com/" rel="noreferrer" target="_blank">https://stats.stackexchange.<wbr>com/</a>), e no seu<br>
caso Projeto e Análise de Experimentos.<br>
<br>
HTH<br>
--<br>
Cesar Rabak<br>
<br>
<br>
2017-08-08 9:50 GMT-03:00 Cleber Oliveira via R-br <<a href="mailto:r-br@listas.c3sl.ufpr.br">r-br@listas.c3sl.ufpr.br</a><br>
>:<br>
<br>
> Bom dia listeiros (@)<br>
><br>
> Estou realizando um experimento e de uma única amostra inicial dividi em<br>
> várias subamostras e em cada uma apliquei um tratamento e ao longo dos dias<br>
> fiz a análise dos parâmetros. Gostaria de verificar o efeito dos<br>
> tratamentos sob as alterações dos parâmetros em relação ao inicial e em<br>
> relação aos tratamentos e tempo. Estou com muitas dúvidas de como iniciar.<br>
> Alguém que já tenha realizado este tipo de análise poderia me ajudar.<br>
> Obrigado.<br>
> --<br>
><br>
><br>
> ______________________________<wbr>_________________<br>
> R-br mailing list<br>
> <a href="mailto:R-br@listas.c3sl.ufpr.br">R-br@listas.c3sl.ufpr.br</a><br>
> <a href="https://listas.inf.ufpr.br/cgi-bin/mailman/listinfo/r-br" rel="noreferrer" target="_blank">https://listas.inf.ufpr.br/<wbr>cgi-bin/mailman/listinfo/r-br</a><br>
> Leia o guia de postagem (<a href="http://www.leg.ufpr.br/r-br-guia" rel="noreferrer" target="_blank">http://www.leg.ufpr.br/r-br-<wbr>guia</a>) e forneça<br>
> código mínimo reproduzível.<br>
><br>
-------------- Próxima Parte ----------<br>
Um anexo em HTML foi limpo...<br>
URL: <<a href="http://listas.inf.ufpr.br/pipermail/r-br/attachments/20170808/00668a09/attachment-0001.html" rel="noreferrer" target="_blank">http://listas.inf.ufpr.br/<wbr>pipermail/r-br/attachments/<wbr>20170808/00668a09/attachment-<wbr>0001.html</a>><br>
<br>
------------------------------<br>
<br>
Message: 3<br>
Date: Tue, 08 Aug 2017 19:17:55 -0300<br>
From: <a href="mailto:sznelwar@uol.com.br">sznelwar@uol.com.br</a><br>
To: <a href="mailto:walmeszeviani@gmail.com">walmeszeviani@gmail.com</a>,  <a href="mailto:r-br@listas.c3sl.ufpr.br">r-br@listas.c3sl.ufpr.br</a><br>
Subject: Re: [R-br] Adicionar restrições a parâmetros em regressão<br>
        não linear no R<br>
Message-ID: <598a38938f354_<wbr>38515c87c2813d89477e@a4-<wbr>weasel17.mail><br>
Content-Type: text/plain; charset="utf-8"<br>
<br>
Um anexo em HTML foi limpo...<br>
URL: <<a href="http://listas.inf.ufpr.br/pipermail/r-br/attachments/20170808/703b580c/attachment-0001.html" rel="noreferrer" target="_blank">http://listas.inf.ufpr.br/<wbr>pipermail/r-br/attachments/<wbr>20170808/703b580c/attachment-<wbr>0001.html</a>><br>
<br>
------------------------------<br>
<br>
Message: 4<br>
Date: Tue, 08 Aug 2017 19:21:33 -0300<br>
From: <a href="mailto:sznelwar@uol.com.br">sznelwar@uol.com.br</a><br>
To: <a href="mailto:walmeszeviani@gmail.com">walmeszeviani@gmail.com</a>,  <a href="mailto:r-br@listas.c3sl.ufpr.br">r-br@listas.c3sl.ufpr.br</a><br>
Subject: [R-br] Fwd:  Adicionar restrições a parâmetros em<br>
        regressão não linear no R<br>
Message-ID: <598a396da05ef_<wbr>57cd155cbcdd73e448736@a4-<wbr>weasel12.mail><br>
Content-Type: text/plain; charset="utf-8"<br>
<br>
Um anexo em HTML foi limpo...<br>
URL: <<a href="http://listas.inf.ufpr.br/pipermail/r-br/attachments/20170808/a6bfb3b1/attachment-0001.html" rel="noreferrer" target="_blank">http://listas.inf.ufpr.br/<wbr>pipermail/r-br/attachments/<wbr>20170808/a6bfb3b1/attachment-<wbr>0001.html</a>><br>
<br>
------------------------------<br>
<br>
Subject: Legenda do Digest<br>
<br>
______________________________<wbr>_________________<br>
R-br mailing list<br>
<a href="mailto:R-br@listas.c3sl.ufpr.br">R-br@listas.c3sl.ufpr.br</a><br>
<a href="https://listas.inf.ufpr.br/cgi-bin/mailman/listinfo/r-br" rel="noreferrer" target="_blank">https://listas.inf.ufpr.br/<wbr>cgi-bin/mailman/listinfo/r-br</a><br>
<br>
<br>
------------------------------<br>
<br>
Fim da Digest R-br, volume 80, assunto 5<br>
******************************<wbr>**********<br>
</blockquote></div><br><br clear="all"><div><br></div>-- <br><div class="gmail_signature"><div dir="ltr"><br>Wenceslau Teixeira<br><br><a href="mailto:wgt007@gmail.com" target="_blank">wgt007@gmail.com</a><br>skype: wgt007<br><br><br><br><br><br><br><br><br><br><br><br><br><br><br><br><br><br><br><br><br><br><br><br><br><br><br><br></div></div>
</div></div>