{"id":4271,"date":"2023-07-12T09:26:38","date_gmt":"2023-07-12T09:26:38","guid":{"rendered":"https:\/\/statorials.org\/pt\/mesa-de-tres-vias-em-r\/"},"modified":"2023-07-12T09:26:38","modified_gmt":"2023-07-12T09:26:38","slug":"mesa-de-tres-vias-em-r","status":"publish","type":"post","link":"https:\/\/statorials.org\/pt\/mesa-de-tres-vias-em-r\/","title":{"rendered":"Como criar uma tabela de tr\u00eas vias em r (com exemplos)"},"content":{"rendered":"

<\/p>\n

\n

Uma tabela trivariada<\/strong> \u00e9 um tipo de tabela que exibe as frequ\u00eancias de tr\u00eas vari\u00e1veis categ\u00f3ricas.<\/span><\/p>\n

A maneira mais f\u00e1cil de criar uma tabela de tr\u00eas entradas em R \u00e9 usar a fun\u00e7\u00e3o xtabs()<\/strong> :<\/span><\/p>\n

 three_way <- xtabs(~var1 + var2 + var3, data=df)<\/strong><\/pre>\n
 Se quiser exibir o array de tr\u00eas vias de forma mais compacta, voc\u00ea pode usar a fun\u00e7\u00e3o ftable()<\/strong> :<\/span><\/p>\n
 three_way_ftable <- ftable(three_way)<\/strong><\/pre>\n
 Nota<\/strong> : as fun\u00e7\u00f5es xtabs()<\/strong> e ftable()<\/strong> est\u00e3o integradas ao banco de dados R.<\/span><\/p>\n
 O exemplo a seguir mostra como usar essas fun\u00e7\u00f5es para criar tabelas de tr\u00eas vias em R na pr\u00e1tica.<\/span><\/p>\n
 Exemplo: como criar tabelas de tr\u00eas vias em R<\/strong><\/span><\/h2>\n
 Suponha que temos o seguinte quadro de dados contendo informa\u00e7\u00f5es sobre v\u00e1rios jogadores de basquete:<\/span><\/span><\/p>\n
 #create data frame\n<\/span>df <- data. frame<\/span> (team=c('A', 'A', 'A', 'A', 'A', 'B', 'B', 'B', 'B', 'B'),\n                 position=c('G', 'G', 'G', 'F', 'F', 'G', 'G', 'F', 'F', 'F'),\n                 starter=c('Yes', 'No', 'No', 'Yes', 'No',\n                           'Yes', 'No', 'Yes', 'Yes', 'No'),\n                 points=c(30, 28, 24, 24, 28, 14, 16, 20, 34, 29))\n\n#view data frame\n<\/span>df\n\n   team position starter points\n1 AG Yes 30\n2 AG No. 28\n3 AG No. 24\n4 AF Yes 24\n5 AF No. 28\n6 BG Yes 14\n7 BG No. 16\n8 BF Yes 20\n9 BF Yes 34\n10 BF No. 29\n<\/strong><\/pre>\n
 Digamos que queremos criar uma tabela de tr\u00eas fatores para exibir a frequ\u00eancia dos jogadores com base em tr\u00eas vari\u00e1veis: time<\/strong> , posi\u00e7\u00e3o<\/strong> e titular<\/strong> .<\/span><\/p>\n
 Podemos usar a fun\u00e7\u00e3o xtabs()<\/a> para criar este array de tr\u00eas vias:<\/span><\/p>\n
 #create three-way table\n<\/span>three_way <- xtabs(~ team + position + starter, data=df)\n\n#view three-way table\n<\/span>three_way\n\n, , starter = No\n\n    position\nteam FG\n   AT 12\n   B 1 1\n\n, , starter = Yes\n\n    position\nteam FG\n   At 1 1\n   B 2 1<\/strong><\/pre>\n
 A primeira tabela do resultado mostra a frequ\u00eancia de jogadores por equipe<\/strong> e posi\u00e7\u00e3o<\/strong> onde a vari\u00e1vel inicial<\/strong> \u00e9 igual a N\u00e3o.<\/span><\/p>\n
 A segunda tabela mostra a frequ\u00eancia de jogadores por equipe<\/strong> e posi\u00e7\u00e3o<\/strong> onde a vari\u00e1vel inicial<\/strong> \u00e9 igual a Sim.<\/span><\/p>\n
 Se quisermos, podemos usar a fun\u00e7\u00e3o ftable()<\/strong> para \u201cachatar\u201d esses arrays em um \u00fanico array:<\/span><\/p>\n
 #convert table to ftable\n<\/span>three_way_ftable <- ftable(three_way)\n\n#view ftable\n<\/span>three_way_fttable\n\n              starter No Yes\nteam position               \nAF 1 1\n     G 2 1\nBF 1 2\n     G 1 1\n<\/strong><\/pre>\n
 A tabela de tr\u00eas vari\u00e1veis resultante mostra as frequ\u00eancias das tr\u00eas vari\u00e1veis num formato \u201cplano\u201d.<\/span><\/p>\n
 Por exemplo, podemos ver:<\/span><\/p>\n