<div dir="ltr">Gente 🤔. . .<div><br></div><div>Os competentes <i>scripts</i> apresentados <b>não</b> me parecem validação cruzada. . . apenas uma validação de um modelo com um conjunto seperado de dados dos de treino.</div><div><br></div><div>Na validação cruzada deve-se fazer a quebra em dados de treino e teste em n "dobras" (<i>folds</i>) e os resultados das n validações, <u>aí sim</u>, cruzadas devem gerar um modelo "médio" ou mais adaptado a partir de alguma métrica para o tipo de modelagem.</div><div><br></div><div>Maiores detalhes de natureza <i>prática</i> podem ser obtidas da página github do pacote R <font face="monospace">caret</font> e de natureza teórica em obras sobre o assunto, que para uma abordagem sintética, recomendo a de Friedman, Hastie & Tibshirani "The Elements of Statistical Learning", subcapítulo 7.10 "Cross-Validation"</div><div><br></div><div>HTH</div><div>--<br></div><div>Cesar Rabak</div><div><br></div></div><br><div class="gmail_quote"><div dir="ltr" class="gmail_attr">On Tue, Dec 3, 2019 at 11:18 AM Andre Oliveira por (R-br) <<a href="mailto:r-br@listas.c3sl.ufpr.br">r-br@listas.c3sl.ufpr.br</a>> wrote:<br></div><blockquote class="gmail_quote" style="margin:0px 0px 0px 0.8ex;border-left:1px solid rgb(204,204,204);padding-left:1ex"><div><div style="font-family:"bookman old style","new york",times,serif;font-size:16px"><div><div><div><div dir="ltr" style="color:rgb(0,0,0);font-family:"bookman old style","new york",times,serif;font-size:16px">Obrigado pela Walmes! <br><br></div><div dir="ltr" style="color:rgb(0,0,0);font-family:"bookman old style","new york",times,serif;font-size:16px">Mauro, os dados <span style="font-family:monospace"><b>PlodiaPO</b> estão ai sim! </span></div><div style="color:rgb(0,0,0);font-family:"bookman old style","new york",times,serif;font-size:16px"><div style="font-family:"old times",serif"><div dir="ltr">att,.</div><div>André </div></div></div></div><br></div><div><br></div><div><div style="font-family:"old times",serif;font-size:16px"><div dir="ltr">att,.</div><div>André </div></div></div></div>
        <div><br></div><div><br></div>
        
        </div><div id="gmail-m_4382594877623964737yahoo_quoted_6334013731">
            <div style="font-family:"Helvetica Neue",Helvetica,Arial,sans-serif;font-size:13px;color:rgb(38,40,42)">
                
                <div>
                    Em segunda-feira, 2 de dezembro de 2019 19:02:00 BRT, Mauro Sznelwar por (R-br) <<a href="mailto:r-br@listas.c3sl.ufpr.br" target="_blank">r-br@listas.c3sl.ufpr.br</a>> escreveu:
                </div>
                <div><br></div>
                <div><br></div>
                <div><div id="gmail-m_4382594877623964737yiv5406431136"><div><div><span style="font-size:large;color:rgb(0,0,255)">Nâo colocou o data set PlodiaPO!</span></div>
<div> </div>
<div> </div>
<div id="gmail-m_4382594877623964737yiv5406431136yqt44683"><div style="font-family:"bookman old style","new york",times,serif;font-size:16px">
<div>
<div dir="ltr">boa noite, <br clear="none">estou com dificuldades fazer a validação cruzada de modelos gerados com as bibliotecas sommer e MCMCglmm. Alguém do grupo que tenha experiência poderia ma dar uma ajuda? <br clear="none"><br clear="none"><strong>Segue o CMR</strong></div>
<div dir="ltr"><br clear="none">
<div>
<div># Dados </div>
<div>require(MCMCglmm)</div>
<div>data(PlodiaPO) </div>
<div>str(PlodiaPO)</div>
<div> </div>
<div># Divisão dos dados </div>
<div>library(caTools)</div>
<div>divisao = sample.split(PlodiaPO$PO, SplitRatio = 0.75)</div>
<div>conj_treinamento = subset(PlodiaPO,divisao==TRUE)</div>
<div>conj_validacao = subset(PlodiaPO$PO,divisao==FALSE)</div>
<div> </div>
<div> </div>
<div># Modelo </div>
<div>require(sommer)</div>
<div>fit=mmer(PO ~ 1, random = ~ FSfamily, data=conj_treinamento)</div>
<div>summary(fit)</div>
<div> </div>
<div># Validação ???</div>
<div>pred=predict(fit, new_data = conj_validacao, classify = "FSfamily")</div>
<div>pred</div>
<div> </div>
</div>
 </div>
<div> </div>
<div>
<div style="font-family:"old times",serif;font-size:16px">
<div dir="ltr">att,.</div>
<div>André </div>
</div>
</div>
</div>
</div></div>
<div>_______________________________________________<br clear="none">R-br mailing list<br clear="none"><a href="mailto:R-br@listas.c3sl.ufpr.br" target="_blank">R-br@listas.c3sl.ufpr.br</a><br clear="none"><a rel="nofollow" shape="rect" 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 clear="none">Leia o guia de postagem (<a rel="nofollow" shape="rect" 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.<br clear="none"><br clear="none"></div></div></div><div id="gmail-m_4382594877623964737yqt70793">_______________________________________________<br clear="none">R-br mailing list<br clear="none"><a shape="rect" href="mailto:R-br@listas.c3sl.ufpr.br" target="_blank">R-br@listas.c3sl.ufpr.br</a><br clear="none"><a shape="rect" 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 clear="none">Leia o guia de postagem (<a shape="rect" 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>
            </div>
        </div></div>_______________________________________________<br>
R-br mailing list<br>
<a href="mailto: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" rel="noreferrer" 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="noreferrer" target="_blank">http://www.leg.ufpr.br/r-br-guia</a>) e forneça código mínimo reproduzível.<br>
</blockquote></div>