{"id":4270,"date":"2023-07-12T09:26:38","date_gmt":"2023-07-12T09:26:38","guid":{"rendered":"https:\/\/statorials.org\/pl\/stol-trojdrozny-w-r\/"},"modified":"2023-07-12T09:26:38","modified_gmt":"2023-07-12T09:26:38","slug":"stol-trojdrozny-w-r","status":"publish","type":"post","link":"https:\/\/statorials.org\/pl\/stol-trojdrozny-w-r\/","title":{"rendered":"Jak utworzy\u0107 tabel\u0119 tr\u00f3jstronn\u0105 w r (z przyk\u0142adami)"},"content":{"rendered":"

<\/p>\n

\n

Tabela tr\u00f3jwymiarowa<\/strong> to typ tabeli, kt\u00f3ry wy\u015bwietla cz\u0119stotliwo\u015bci trzech zmiennych kategorycznych.<\/span><\/p>\n

Naj\u0142atwiejszym sposobem utworzenia tabeli z trzema wpisami w R jest u\u017cycie funkcji xtabs()<\/strong> :<\/span><\/p>\n

 three_way <- xtabs(~var1 + var2 + var3, data=df)<\/strong><\/pre>\n
 Je\u015bli chcesz bardziej zwi\u0119\u017ale wy\u015bwietli\u0107 tablic\u0119 tr\u00f3jczynnikow\u0105, mo\u017cesz u\u017cy\u0107 funkcji ftable()<\/strong> :<\/span><\/p>\n
 three_way_ftable <- ftable(three_way)<\/strong><\/pre>\n
 Uwaga<\/strong> : funkcje xtabs()<\/strong> i ftable()<\/strong> s\u0105 zintegrowane z baz\u0105 danych R.<\/span><\/p>\n
 Poni\u017cszy przyk\u0142ad pokazuje, jak w praktyce wykorzysta\u0107 te funkcje do tworzenia tabel tr\u00f3jdzielnych w R.<\/span><\/p>\n
 Przyk\u0142ad: Jak utworzy\u0107 tabele tr\u00f3jczynnikowe w R<\/strong><\/span><\/h2>\n
 Za\u0142\u00f3\u017cmy, \u017ce mamy nast\u0119puj\u0105c\u0105 ramk\u0119 danych zawieraj\u0105c\u0105 informacje o r\u00f3\u017cnych koszykarzach:<\/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
 Za\u0142\u00f3\u017cmy, \u017ce chcemy utworzy\u0107 tr\u00f3jstronn\u0105 tabel\u0119 wy\u015bwietlaj\u0105c\u0105 cz\u0119stotliwo\u015b\u0107 graczy w oparciu o trzy zmienne: zesp\u00f3\u0142<\/strong> , pozycja<\/strong> i starter<\/strong> .<\/span><\/p>\n
 Mo\u017cemy u\u017cy\u0107 funkcji xtabs()<\/a> do utworzenia tej tr\u00f3jczynnikowej tablicy:<\/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
 Pierwsza tabela wynik\u00f3w pokazuje cz\u0119stotliwo\u015b\u0107 graczy wed\u0142ug dru\u017cyny<\/strong> i pozycji<\/strong> , gdzie zmienna pocz\u0105tkowa<\/strong> jest r\u00f3wna Nie.<\/span><\/p>\n
 Druga tabela pokazuje cz\u0119stotliwo\u015b\u0107 graczy wed\u0142ug dru\u017cyny<\/strong> i pozycji<\/strong> , gdzie zmienna pocz\u0105tkowa<\/strong> jest r\u00f3wna Tak.<\/span><\/p>\n
 Je\u015bli chcemy, mo\u017cemy u\u017cy\u0107 funkcji ftable()<\/strong> , aby \u201esp\u0142aszczy\u0107\u201d te tablice w jedn\u0105 tablic\u0119:<\/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
 Powsta\u0142a tabela trzech zmiennych przedstawia cz\u0119sto\u015bci wyst\u0119powania trzech zmiennych w \u201ep\u0142askim\u201d formacie.<\/span><\/p>\n
 Na przyk\u0142ad mo\u017cemy zobaczy\u0107:<\/span><\/p>\n