Olá, pessoal. Estou tentando usar a função "amova" do pacote ade4, mas não consigo. Comparei a estrutura dos meus objetos com a dos objetos do HELP da função, mas me parece tudo ok.<br><br>A função roda tudo bem, mas recebo o seguinte resultado:<br>
amova(samples,sqrt(distance),structure)<br><br>
$call<br>
amova(samples = samp3, distances = sqrt(distance), structures = structurss)<br>
<br>
$results<br>
                                                Df    Sum Sq    Mean Sq<br>
Between regions                         2 0.1371102 0.06855508<br>
Between samples Within regions  0 0.0000000        NaN<br>
Within samples                         41 1.7349423 0.04231567<br>
Total                                        43 1.8720525 0.04353610<br>
<br>
$componentsofcovariance<br>
                                                Sigma   %<br>
Variations  Between regions                               NaN NaN<br>
Variations  Between samples Within regions        NaN NaN<br>
Variations  Within samples                      0.04231567 NaN<br>
Total variations                                                  NaN NaN<br>
<br>
$statphi<br>
                    Phi<br>
Phi-samples-total      NaN<br>
Phi-samples-regions  NA<br>
Phi-regions-total        NaN<br><br><br>Abaixo o resultado de 'str' dos meus objetos.<br><br>str(samples)<br>
'data.frame':        19 obs. of  3 variables:<br>
 $ AF      : int  0 7 1 4 0 1 2 4 1 1 ...<br>
 $ Caatinga: int  1 0 0 0 0 0 0 0 0 0 ...<br>
 $ Cerrado : int  0 0 0 0 1 0 0 0 0 0 ...<br>
<br>
 str(distance)<br>
Class 'dist'  atomic [1:171] 0.0411 0.1007 0.0919 0.1007 0.0919 ...<br>
  ..- attr(*, "Labels")= chr [1:19] "4" "12" "17" "19" ...<br>
  ..- attr(*, "Size")= int 19<br>
  ..- attr(*, "call")= language as.dist.default(m = mat)<br>
  ..- attr(*, "Diag")= logi FALSE<br>
  ..- attr(*, "Upper")= logi FALSE<br>
<br>
str(structure)<br>
'data.frame':        3 obs. of  1 variable:<br>
 $ regions: Factor w/ 3 levels "AF","Caatinga",..: 1 2 3<br>
<br>
<br clear="all"><br>-- <br>Abraços,<br>Ricardo Fernandes Campos Junior<br><br>