<html><body><div style="color:#000; background-color:#fff; font-family:bookman old style, new york, times, serif;font-size:16px"><div id="yiv2916607847"><div id="yui_3_16_0_1_1435271953799_12222"><div style="background-color: rgb(255, 255, 255);" id="yui_3_16_0_1_1435271953799_12221"><div dir="ltr" id="yiv2916607847yui_3_16_0_1_1435270952475_29558"><div dir="ltr" id="yiv2916607847yui_3_16_0_1_1435270952475_29558" class=""><br class=""></div><div dir="ltr" id="yiv2916607847yui_3_16_0_1_1435270952475_29558" class="">Desculpas pela falta de clareza Walmes, é que não citei que a função faz é D_{ij}^2 = (x_i - x_j)' (Σ^-1) (x_i - x_j) e a matriz Σ, neste caso não tem inversa comum. Já tentei várias funções e de fato todas funções para tal método usam a função solve(Σ) como padrão. Desisti de usar a matriz de Mahalanobis, pensei em distancia Euclidiana, mas seria importante eu conseguir usar um método que envolvesse a matriz de covariâncias para obter D2. Minha pergunta é se teria uma forma de usar, neste caso, um outro tipo de inversa (outro algorítimo) e sem comprometer a matriz D2 ou se vou mesmo ter ficar com distancia Euclidiana e variantes. </div><div dir="ltr" id="yiv2916607847yui_3_16_0_1_1435270952475_29558" class=""> </div></div><div dir="ltr" id="yiv2916607847yui_3_16_0_1_1435270952475_29558" style="color: rgb(0, 0, 0); font-family: 'bookman old style', 'new york', times, serif; font-size: 16px;"><br></div><div dir="ltr" id="yiv2916607847yui_3_16_0_1_1435270952475_29558" style="color: rgb(0, 0, 0); font-family: 'bookman old style', 'new york', times, serif; font-size: 16px;">setwd("/home/andre")<br></div><div dir="ltr" id="yiv2916607847yui_3_16_0_1_1435270952475_29558" style="color: rgb(0, 0, 0); font-family: 'bookman old style', 'new york', times, serif; font-size: 16px;">dados <- read.csv("dados.txt", sep="")<br></div><div dir="ltr" id="yiv2916607847yui_3_16_0_1_1435270952475_29558"><div dir="ltr" id="yiv2916607847yui_3_16_0_1_1435270952475_29558" class="">str(dados)<br></div><div dir="ltr" id="yiv2916607847yui_3_16_0_1_1435270952475_29558" class="">'data.frame':<span class="" style="white-space:pre-wrap;"> </span>6 obs. of 10 variables:</div><div dir="ltr" id="yiv2916607847yui_3_16_0_1_1435270952475_29558" class=""> $ ch : int 146 26 44 56 73 101</div><div dir="ltr" id="yiv2916607847yui_3_16_0_1_1435270952475_29558" class=""> $ lam : int 126 14 20 104 54 156</div><div dir="ltr" id="yiv2916607847yui_3_16_0_1_1435270952475_29558" class=""> $ esfr : int 208 1 1 36 73 22</div><div dir="ltr" id="yiv2916607847yui_3_16_0_1_1435270952475_29558" class=""> $ cut : int 43 10 9 20 22 40</div><div dir="ltr" id="yiv2916607847yui_3_16_0_1_1435270952475_29558" class=""> $ fleh : int 16 1 1 2 9 5</div><div dir="ltr" id="yiv2916607847yui_3_16_0_1_1435270952475_29558" class=""> $ tmont : int 45 5 12 15 11 27</div><div dir="ltr" id="yiv2916607847yui_3_16_0_1_1435270952475_29558" class=""> $ mont : int 18 8 16 25 21 32</div><div dir="ltr" id="yiv2916607847yui_3_16_0_1_1435270952475_29558" class=""> $ montco : int 6 0 3 2 2 3</div><div dir="ltr" id="yiv2916607847yui_3_16_0_1_1435270952475_29558" class=""> $ vocal : int 106 14 21 105 97 151</div><div dir="ltr" id="yiv2916607847yui_3_16_0_1_1435270952475_29558" class=""> $ respaud: int 123 44 64 113 56 79</div><div dir="ltr" id="yiv2916607847yui_3_16_0_1_1435270952475_29558" class=""><br></div></div><div dir="ltr" id="yiv2916607847yui_3_16_0_1_1435270952475_29558" style="color: rgb(0, 0, 0); font-family: 'bookman old style', 'new york', times, serif; font-size: 16px;"><div dir="ltr" id="yiv2916607847yui_3_16_0_1_1435270952475_29558" class="">dados</div><div dir="ltr" id="yiv2916607847yui_3_16_0_1_1435270952475_29558" class=""> ch lam esfr cut fleh tmont mont montco vocal respaud</div><div dir="ltr" id="yiv2916607847yui_3_16_0_1_1435270952475_29558" class="">A 146 126 208 43 16 45 18 6 106 123</div><div dir="ltr" id="yiv2916607847yui_3_16_0_1_1435270952475_29558" class="">B 26 14 1 10 1 5 8 0 14 44</div><div dir="ltr" id="yiv2916607847yui_3_16_0_1_1435270952475_29558" class="">C 44 20 1 9 1 12 16 3 21 64</div><div dir="ltr" id="yiv2916607847yui_3_16_0_1_1435270952475_29558" class="">D 56 104 36 20 2 15 25 2 105 113</div><div dir="ltr" id="yiv2916607847yui_3_16_0_1_1435270952475_29558" class="">E 73 54 73 22 9 11 21 2 97 56</div><div dir="ltr" id="yiv2916607847yui_3_16_0_1_1435270952475_29558" class="">F 101 156 22 40 5 27 32 3 151 79</div><div dir="ltr" id="yiv2916607847yui_3_16_0_1_1435270952475_29558" class=""><br></div></div><div dir="ltr" id="yiv2916607847yui_3_16_0_1_1435270952475_29558" style="color: rgb(0, 0, 0); font-family: 'bookman old style', 'new york', times, serif; font-size: 16px;">require(StatMatch)</div><div dir="ltr" id="yiv2916607847yui_3_16_0_1_1435270952475_29558" class="" style="color: rgb(0, 0, 0); font-family: 'bookman old style', 'new york', times, serif; font-size: 16px;">D2=mahalanobis.dist(dados)</div><div dir="ltr" id="yiv2916607847yui_3_16_0_1_1435270952475_29558" class="" style="color: rgb(0, 0, 0); font-family: 'bookman old style', 'new york', times, serif; font-size: 16px;"><div dir="ltr" id="yiv2916607847yui_3_16_0_1_1435270952475_29558" class="">mahalanobis.dist(dados)</div><div dir="ltr" id="yiv2916607847yui_3_16_0_1_1435270952475_29558" class="">Error in solve.default(cov, ...) : </div><div dir="ltr" id="yiv2916607847yui_3_16_0_1_1435270952475_29558" class="">sistema é computacionalmente singular: condição recíproca número = 1.53112e-19</div><div dir="ltr" id="yiv2916607847yui_3_16_0_1_1435270952475_29558" class=""><br></div><div dir="ltr" id="yiv2916607847yui_3_16_0_1_1435270952475_29558" class=""><br></div></div><div dir="ltr" class="" id="yui_3_16_0_1_1435271953799_13829" style="color: rgb(0, 0, 0); font-family: 'bookman old style', 'new york', times, serif; font-size: 16px;"><div id="yiv1896427967yui_3_16_0_1_1435270952475_2783" class="">require(biotools)</div><div id="yiv1896427967yui_3_16_0_1_1435270952475_2783" class="">Cov=cov(dados)<br></div><div id="yiv1896427967yui_3_16_0_1_1435270952475_2783" class="" dir="ltr">D2=D2.dist(dados, Cov) </div></div><div style="color: rgb(0, 0, 0); font-family: 'bookman old style', 'new york', times, serif; font-size: 16px;"></div><div id="yiv2916607847yui_3_16_0_1_1435270952475_29559" style="color: rgb(0, 0, 0); font-family: 'bookman old style', 'new york', times, serif; font-size: 16px;">D2=D2.dist(dados, Cov) </div><div id="yiv2916607847yui_3_16_0_1_1435270952475_29559" class="">Error in solve.default(cov, (x[i, ] - x[j, ])) : </div><div id="yiv2916607847yui_3_16_0_1_1435270952475_29559" dir="ltr" class="">sistema é computacionalmente singular: condição recíproca número = 1.53112e-19</div><div id="yiv2916607847yui_3_16_0_1_1435270952475_29559" dir="ltr" class=""><br></div><div id="yiv2916607847yui_3_16_0_1_1435270952475_29559" dir="ltr" class=""><br></div><div id="yiv2916607847yui_3_16_0_1_1435270952475_29562" style="color: rgb(0, 0, 0); font-family: 'bookman old style', 'new york', times, serif; font-size: 16px;"><div id="yiv2916607847yui_3_16_0_1_1435270952475_29561">
<br clear="none">
<br clear="none">André Oliveira Souza. <br clear="none">Graduação em Matemática, mestrado em estatística aplicada.Instituto Federal de Educação, Ciência e Tecnologia do Espirito Santo. IFES<br clear="none">
</div><br clear="none"><br clear="none"><div id="yiv2916607847yui_3_16_0_1_1435270952475_29563">
<br clear="none"></div></div> <br clear="none"><div class="yiv2916607847qtdSeparateBR" id="yui_3_16_0_1_1435271953799_13283" style="color: rgb(0, 0, 0); font-family: 'bookman old style', 'new york', times, serif; font-size: 16px;"><br clear="none"><br clear="none"></div><div class="yiv2916607847yqt4192982404" id="yiv2916607847yqt68362" style="color: rgb(0, 0, 0); font-family: 'bookman old style', 'new york', times, serif; font-size: 16px;"></div></div></div></div><div class=".yiv2916607847yahoo_quoted"> <div style="font-family:bookman old style, new york, times, serif;font-size:16px;"> <div style="font-family:HelveticaNeue, Helvetica Neue, Helvetica, Arial, Lucida Grande, sans-serif;font-size:16px;"> <div dir="ltr"> <font size="2" face="Arial"> Em Quinta-feira, 25 de Junho de 2015 19:41, walmes . <walmeszeviani@gmail.com> escreveu:<br clear="none"> </font> </div> <br clear="none"><br clear="none"> <div class="yiv2916607847y_msg_container"><div id="yiv2916607847"><div><div dir="ltr"><div class="yiv2916607847gmail_default" style="font-family:trebuchet ms, sans-serif;">Seu exemplo é 100% não reproduzível.<br clear="none"></div><br clear="none"><div class="yiv2916607847gmail_default" style="font-family:trebuchet ms, sans-serif;">À disposição.<br clear="none"></div><div class="yiv2916607847gmail_default" style="font-family:trebuchet ms, sans-serif;">Walmes.</div><div class="yiv2916607847yqt2966671773" id="yiv2916607847yqtfd85242"><br clear="none"></div></div></div></div><br clear="none"><br clear="none"></div> </div> </div> </div></div></body></html>