<html><head><meta http-equiv="Content-Type" content="text/html; charset=utf-8"></head><body style="word-wrap: break-word; -webkit-nbsp-mode: space; line-break: after-white-space;" class="">Boa tarde Chiara<div class=""><br class=""></div><div class="">Desculpe por sugerir transpor a matriz. Eu interpretei de forma equivocada a sa questão.<br class=""><div class=""><br class=""></div><div class="">O tipo de organização que você está querendo fazer não vai acontecer. </div><div class="">O algoritmo de clusterização que está usando é não supervisionado e ele irá agrupar cada pessoa que respondeu o questionário de acordo com a distância entre eles.</div><div class=""><br class=""></div><div class="">No caso da cidade o exemplo agrupou por cidades pois havia uma linha para cada cidade com vários atributos. Você têm uma linha com vários atributos para cada pessoa. </div><div class="">As pessoas pertencem ao mesmo grupo. O que você pode fazer é aplicar um algoritmo supervisionado, já que você sabe de qual grupo a pessoa pertence. Ou, como são dois grupos, verificar se a clusterização separa as pessoas nos dois grupos de forma eficaz.</div><div class=""><br class=""></div><div class="">Por exemplo:</div><div class=""><div class="">df <- read.csv('~/Downloads/Questionários cluster.xlsx - Agrupamento.csv')</div><div class="">head(df)</div><div class="">dim(df)</div><div class="">table(df$X)</div><div class="">head(df[,-c(1,2)])</div><div class=""># Ward Hierarchical Clustering</div><div class="">d <- vegan::vegdist(df[,-c(1,2)],distance="jaccard")# distance matrix</div></div><div class="">fit <- hclust(d, method="ward.D2")</div><div class=""><div class="">groups <- cutree(fit, k=2) </div><div class=""># draw dendogram with red borders around the 5 clusters</div><div class=""><br class=""></div><div class="">plot(fit) # display dendogram</div><div class="">plot.new()</div><div class="">rect.hclust(fit, k=2, border="red")</div><div class=""><br class=""></div><div class="">table(df$X, groups)</div></div><div class=""><br class=""></div><div class=""><br class=""></div><div class=""><div class=""> groups</div><div class=""> 1 2</div><div class=""> COM_LOCAL 90 10</div><div class=""> PESCADOR_ESPORTIVO 63 37</div></div><div class=""><br class=""></div><div class="">Em porcentagens:</div><div class=""><br class=""></div><div class="">round(prop.table(table(df$X, groups),2)*100,1)</div><div class=""><div class="">groups</div><div class=""> 1 2</div><div class=""> COM_LOCAL 58.8 21.3</div><div class=""> PESCADOR_ESPORTIVO 41.2 78.7</div></div><div class=""><br class=""></div><div class=""><br class=""></div><div class="">Veja que o algoritmo, de uma forma não muito eficaz, é capaz de separar os grupos baseado na resposta.</div><div class=""><br class=""></div><div class="">Agora, qual seria o seu teste de hipótese aqui?</div><div class=""><br class=""></div><div class="">Se você aplicar um um teste para verificar que a distribuição dos casos na tabela é uniforme ou não:</div><div class=""><br class=""></div><div class="">chisq.test(df$X, groups)</div><div class=""><br class=""></div><div class=""><div class=""><span class="Apple-tab-span" style="white-space:pre"> </span>Pearson's Chi-squared test with Yates' continuity</div><div class=""><span class="Apple-tab-span" style="white-space:pre"> </span>correction</div><div class=""><br class=""></div><div class="">data: df$X and groups</div><div class="">X-squared = 18.801, df = 1, p-value = 1.451e-05</div></div><div class=""><br class=""></div><div class="">Vai notar que você deveria rejeitar a H0.</div><div class=""><br class=""></div><div class=""><br class=""></div><div class="">Mas depende muito do que você está investigando e qual é a sua hipótese.</div><div class=""><br class=""></div><div class="">Outra questão é verificar se o método de cálculo de distância é aplicável para as suas variável e se o Ward.D é o melhor método de agrupamento. Aparentemente as suas variáveis são categóricas. </div><div class=""><br class=""></div><div class="">Espero ter ajudado.</div><div class=""><br class=""></div><div class="">Daniel</div><div class=""><br class=""></div><div class=""><br class=""></div><div class="">----------------------------------------------------------------<br class="">Daniel Tiezzi, MD, PhD<br class="">Oncologia / Mastologia<br class="">Professor Associado - Livre Docente<br class="">Departamento de Ginecologia e Obstetrícia<br class="">Setor de Mastologia e Oncologia Ginecológica<br class="">Faculdade de Medicina de Ribeirão Preto - USP<br class="">Tel.: 16 3602-2488<br class=""><a href="https://github.com/dtiezzi" class="">https://github.com/dtiezzi</a><br class="">http://danieltiezzi.pro.br<br class="">e-mail: dtiezzi@usp.br<br class=""></div><div class=""><div><br class=""><blockquote type="cite" class=""><div class="">On 20 Jan 2023, at 10:49, Chiara Lubich <<a href="mailto:lubichchiara@gmail.com" class="">lubichchiara@gmail.com</a>> wrote:</div><br class="Apple-interchange-newline"><div class=""><div dir="ltr" class=""><div class="gmail_default" style="font-family:tahoma,sans-serif"><div class="gmail_default">Oi, Daniel, obrigada pelo retorno</div><div class="gmail_default"><br class=""></div><div class="gmail_default">Eu fiz a transposição, no entanto a organização fica em função dos objetos (importância, recurso, etc). Ver imagem aqui-->acesse.one/dqXgX</div><div class="gmail_default">Eu queria que ficasse em função de quem respondeu, ou seja, os atores que estou avaliando (pescador e comunidade). Pois quero ver se esses atores têm a mesma opinião sobre o ambiente, visto que um é visitante e outro é residente do local.</div><div class="gmail_default"> </div><div class="gmail_default">Como você pode ver na tabela tenho 200 linhas de respostas (Pescador -> N=100 e Comunidade -> N=100). Minha tabela é essa --><a href="http://encr.pw/Gs0ZK" target="_blank" class="">encr.pw/Gs0ZK</a></div><div class="gmail_default"><br class=""></div><div class="gmail_default">Mas queria algo assim, mas ao invés de organizar por cidade (Barcelos, Ausentes etc) como na imagem, quero organizar por ator (pescador e comunidade) --><a href="http://l1nk.dev/xHbST" target="_blank" class="">l1nk.dev/xHbST</a></div><div class="gmail_default"><br class=""></div><div class="gmail_default">Espero ter explicado melhor!</div><div class="gmail_default"><br class=""></div><div class="gmail_default">Muito obrigada e aguardo o retorno</div></div></div><br class=""><div class="gmail_quote"><div dir="ltr" class="gmail_attr">Em ter., 17 de jan. de 2023 às 14:45, Daniel Guimarães Tiezzi <<a href="mailto:dtiezzi@usp.br" class="">dtiezzi@usp.br</a>> escreveu:<br class=""></div><blockquote class="gmail_quote" style="margin:0px 0px 0px 0.8ex;border-left:1px solid rgb(204,204,204);padding-left:1ex"><div dir="auto" class="">Fazer a transposição da matrix<div dir="auto" class=""><br class=""></div><div dir="auto" class="">daniel</div><div dir="auto" class=""><br class=""></div><div dir="auto" class=""><br class=""></div></div><br class=""><div class="gmail_quote"><div dir="ltr" class="gmail_attr">On Tue, Jan 17, 2023, 3:33 PM Chiara Lubich por (R-br) <<a href="mailto:r-br@listas.c3sl.ufpr.br" target="_blank" class="">r-br@listas.c3sl.ufpr.br</a>> wrote:<br class=""></div><blockquote class="gmail_quote" style="margin:0px 0px 0px 0.8ex;border-left:1px solid rgb(204,204,204);padding-left:1ex"><div dir="ltr" class=""><div class="gmail_default" style="font-family:tahoma,sans-serif">Boa tarde, pessoal</div><div class="gmail_default" style="font-family:tahoma,sans-serif"><br class=""></div><div class="gmail_default" style="font-family:tahoma,sans-serif">Estou com dificuldade para entender como fazer para juntar os dados e formar grupos na análise e mostrar graficamente isso.</div><div class="gmail_default" style="font-family:tahoma,sans-serif"><br class=""></div><div class="gmail_default" style="font-family:tahoma,sans-serif">Estou usando o seguinte banco de dados: <a href="http://encr.pw/Gs0ZK" rel="noreferrer" target="_blank" class="">encr.pw/Gs0ZK</a></div><div class="gmail_default" style="font-family:tahoma,sans-serif"><br class=""></div><div class="gmail_default" style="font-family:tahoma,sans-serif">Estou usando o seguinte comando:</div><div class="gmail_default" style="font-family:tahoma,sans-serif">dac<-read.table("clipboard",sep="\t", header=T, dec=".", row.names=1)<br class="">dac<br class="">attach(dac)<br class=""># Ward Hierarchical Clustering<br class="">d<-vegdist(dac[,-1],distance="jaccard")# distance matrix<br class="">fit <- hclust(d, method="ward.D2")<br class="">plot(fit) # display dendogram<br class="">groups <- cutree(fit, k=5) # cut tree into 5 clusters<br class=""># draw dendogram with red borders around the 5 clusters<br class="">rect.hclust(fit, k=5, border="red")<br class=""></div><div class="gmail_default" style="font-family:tahoma,sans-serif"><br class=""></div><div class="gmail_default" style="font-family:tahoma,sans-serif">que gera esse gráfico:</div><div class="gmail_default" style="font-family:tahoma,sans-serif"><span id="cid:ii_ld0ke9fp0"><image.png></span><br class=""></div><div class="gmail_default" style="font-family:tahoma,sans-serif">No entanto, queria que formasse de acordo como nome dos grupos, semelhante a esse gráfico, mas em função dos meus dois atores avaliados (pescador e comunidade).</div><div class="gmail_default" style="font-family:tahoma,sans-serif"><span id="cid:ii_ld0kgffz1"><image.png></span><br class=""></div><div class="gmail_default" style="font-family:tahoma,sans-serif">Só que no meu caso, ao invés de ser as cidades, são os grupos de pessoas.</div><div class="gmail_default" style="font-family:tahoma,sans-serif"><br class=""></div><div class="gmail_default" style="font-family:tahoma,sans-serif">Aos que puderem ajudar eu agradeço</div><div class="gmail_default" style="font-family:tahoma,sans-serif"><br class=""></div><div class="gmail_default" style="font-family:tahoma,sans-serif">Muito obrigada</div><div class="gmail_default" style="font-family:tahoma,sans-serif"><br class=""></div><div class="gmail_default" style="font-family:tahoma,sans-serif">Abraços,</div><div class="gmail_default" style="font-family:tahoma,sans-serif"><br class=""></div></div>
_______________________________________________<br class="">
R-br mailing list<br class="">
<a href="mailto:R-br@listas.c3sl.ufpr.br" rel="noreferrer" target="_blank" class="">R-br@listas.c3sl.ufpr.br</a><br class="">
<a href="https://listas.inf.ufpr.br/cgi-bin/mailman/listinfo/r-br" rel="noreferrer noreferrer" target="_blank" class="">https://listas.inf.ufpr.br/cgi-bin/mailman/listinfo/r-br</a><br class="">
Leia o guia de postagem (<a href="http://www.leg.ufpr.br/r-br-guia" rel="noreferrer noreferrer" target="_blank" class="">http://www.leg.ufpr.br/r-br-guia</a>) e forneça código mínimo reproduzível.<br class="">
</blockquote></div>
</blockquote></div>
</div></blockquote></div><br class=""></div></div></body></html>