<div dir="ltr">Fernando, ai vai o CRM.<div style>Não consegui disponibilizar o arquivo via R, os comandos sugeridos na lista não deram certo, então terá de salvar num txt, para não atachar arquivo.</div><div style><br></div>
<div style><div>Dados:</div><div> <a href="https://www.dropbox.com/s/tfml7zjpc7hmbc3/dados250.txt">https://www.dropbox.com/s/tfml7zjpc7hmbc3/dados250.txt</a></div><div> </div><div>library(geoR)</div><div>#direcionando para dir onde está o arquivo dados250.txt</div>
<div>setwd("k:/2013/r/")</div><div><br></div><div>#carregando arquivo:</div><div>dados=read.geodata("dados250.txt ",coords.col=1:2,data.col=3,sep = "",header=T);summary(dados);n=summary(dados)[[1]];n</div>
<div><br></div><div>#distancia máxima</div><div>hmax=summary(dados)[[3]][[2]]*.8 ;hmax</div><div><br></div><div>#variograma com direção de 135 graus</div><div>vario135= variog(dados,uvec=12,pairs.min=100,max.dist=hmax, direction=(pi/4 + pi/2),estimator="classical")</div>
<div>plot(vario135, xlab="cento e trinta e cinco",main="numero de pontos");text(vario135$u,vario135$v,vario135$n,pos=1);lines(vario135$u,vario135$v)</div><div><br></div><div>#Ajustar variograma experimental ao teórico</div>
<div>as135=eyefit(vario135)</div><div><br></div><div># valores do Patamar(sill), alcance e nugget , só para comparar</div><div>sillp135=as135[[1]]$cov.pars[1];sillp135 ##C1</div><div>alcance135=as135[[1]]$cov.pars[2];alcance135 ##phi </div>
<div>pepita135=as135[[1]]$nugget;pepita135 ##C0</div><div><br></div><div>#validação cruzada</div><div>xv.as135=xvalid(dados,model=as135)</div><div><br></div><div style>ai dá o erro:</div><div style><div>xvalid: performing cross-validation at location ... 1, Erro em solve.default(Vcov, trend.d) : </div>
<div> sistema é computacionalmente singular: condição recíproca número = 2.24178e-20</div><div><br></div><div style>Grato</div><div style><br></div><div style>Hélio</div></div></div><div style><br></div></div><div class="gmail_extra">
<br><br><div class="gmail_quote">Em 3 de junho de 2013 23:05, Fernando Mayer [via R-br] <span dir="ltr"><<a href="mailto:ml-node+s2285057n4659534h22@n4.nabble.com" target="_blank">ml-node+s2285057n4659534h22@n4.nabble.com</a>></span> escreveu:<br>
<blockquote class="gmail_quote" style="margin:0 0 0 .8ex;border-left:1px #ccc solid;padding-left:1ex">
Como não houveram respostas ainda, eu sugiro que vc forneça mais
<br>detalhes como comandos e pacotes que vc utilizou, e um CMR para que as
<br>pessoas possam reproduzir o erro. Veja também que nem todos sabem o
<br>que eh exatamente "validação cruzada na direção 45 graus", então uma
<br>breve expilcação também vai ajudar.
<br><br>Sobre o erro, está claro pela mensagem que a matriz Vcov é singular
<br>(não possui inversa), então o solve() não vai resolver. Sem fornecer
<br>mais detalhes é o que pode ser concluído...
<br><br>[]s,
<br><br><br><br>---
<br>Fernando de Pol Mayer
<br>Doutorando em Estatística e Experimentação Agronômica
<br>Escola Superior de Agricultura "Luiz de Queiroz" - ESALQ
<br>Universidade de São Paulo - USP
<br>URL: <a href="http://fernandomayer.github.com" rel="nofollow" link="external" target="_blank">http://fernandomayer.github.com</a><br>e-mail: fernando.mayer [@] {<a href="http://gmail.com" target="_blank">gmail.com</a>, <a href="http://usp.br" target="_blank">usp.br</a>}
<br><br><br>2013/6/3 Hélio Gallo Rocha <<a href="http://user/SendEmail.jtp?type=node&node=4659534&i=0" rel="nofollow" link="external" target="_blank">[hidden email]</a>>:
<div><div><div class="h5"><br>> Caros da Lista,
<br>>
<br>> Está dando este erro ao tentar rodar a validação cruzada na direção de 45
<br>> graus:
<br>>
<br>> xvalid: performing cross-validation at location ... 1, Erro em
<br>> solve.default(Vcov, trend.d) :
<br>> sistema é computacionalmente singular: condição recíproca número =
<br>> 8.6266e-21
<br>>
<br>>
<br>>
<br>> Grato a todos
<br>>
<br>> --
<br>> Hélio Gallo Rocha
<br>> IFSULDEMINAS - Câmpus Muzambinho
<br>>
<br></div></div>> _______________________________________________
<br>> R-br mailing list
<br>> <a href="http://user/SendEmail.jtp?type=node&node=4659534&i=1" 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
<br>> mínimo reproduzível.
</div>_______________________________________________
<br>R-br mailing list
<br><a href="http://user/SendEmail.jtp?type=node&node=4659534&i=2" 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 style="color:#444;font:12px tahoma,geneva,helvetica,arial,sans-serif">
<div style="font-weight:bold">If you reply to this email, your message will be added to the discussion below:</div>
<a href="http://r-br.2285057.n4.nabble.com/R-br-erro-na-validacao-cruzada-tp4659526p4659534.html" target="_blank">http://r-br.2285057.n4.nabble.com/R-br-erro-na-validacao-cruzada-tp4659526p4659534.html</a>
</div>
<div style="color:#666;font:11px tahoma,geneva,helvetica,arial,sans-serif;margin-top:.4em;line-height:1.5em">
To unsubscribe from R-br, <a href="http://r-br.2285057.n4.nabble.com/template/NamlServlet.jtp?macro=unsubscribe_by_code&node=3357982&code=aGVsaW9nYWxsb3JvY2hhQGdtYWlsLmNvbXwzMzU3OTgyfC0xMzQ3NTkwMDY4" target="_blank">click here</a>.<br>
<a href="http://r-br.2285057.n4.nabble.com/template/NamlServlet.jtp?macro=macro_viewer&id=instant_html%21nabble%3Aemail.naml&base=nabble.naml.namespaces.BasicNamespace-nabble.view.web.template.NabbleNamespace-nabble.view.web.template.NodeNamespace&breadcrumbs=notify_subscribers%21nabble%3Aemail.naml-instant_emails%21nabble%3Aemail.naml-send_instant_email%21nabble%3Aemail.naml" rel="nofollow" style="font:9px serif" target="_blank">NAML</a>
</div></blockquote></div><br><br clear="all"><div><br></div>-- <br>Hélio Gallo Rocha<br>IFSULDEMINAS - Câmpus Muzambinho<br>
</div>