{"id":943,"date":"2023-07-28T05:49:15","date_gmt":"2023-07-28T05:49:15","guid":{"rendered":"https:\/\/statorials.org\/th\/%e0%b8%81%e0%b8%a3%e0%b8%ad%e0%b8%87%e0%b9%81%e0%b8%96%e0%b8%a7-r\/"},"modified":"2023-07-28T05:49:15","modified_gmt":"2023-07-28T05:49:15","slug":"%e0%b8%81%e0%b8%a3%e0%b8%ad%e0%b8%87%e0%b9%81%e0%b8%96%e0%b8%a7-r","status":"publish","type":"post","link":"https:\/\/statorials.org\/th\/%e0%b8%81%e0%b8%a3%e0%b8%ad%e0%b8%87%e0%b9%81%e0%b8%96%e0%b8%a7-r\/","title":{"rendered":"\u0e27\u0e34\u0e18\u0e35\u0e01\u0e23\u0e2d\u0e07\u0e41\u0e16\u0e27\u0e43\u0e19 r"},"content":{"rendered":"

<\/p>\n

\n

\u0e1a\u0e48\u0e2d\u0e22\u0e04\u0e23\u0e31\u0e49\u0e07\u0e17\u0e35\u0e48\u0e04\u0e38\u0e13\u0e2d\u0e32\u0e08\u0e2a\u0e19\u0e43\u0e08\u0e0a\u0e38\u0e14\u0e22\u0e48\u0e2d\u0e22\u0e02\u0e2d\u0e07\u0e01\u0e23\u0e2d\u0e1a\u0e02\u0e49\u0e2d\u0e21\u0e39\u0e25\u0e15\u0e32\u0e21\u0e40\u0e07\u0e37\u0e48\u0e2d\u0e19\u0e44\u0e02\u0e1a\u0e32\u0e07\u0e1b\u0e23\u0e30\u0e01\u0e32\u0e23\u0e43\u0e19 R \u0e42\u0e0a\u0e04\u0e14\u0e35\u0e17\u0e35\u0e48\u0e17\u0e33\u0e44\u0e14\u0e49\u0e07\u0e48\u0e32\u0e22\u0e42\u0e14\u0e22\u0e43\u0e0a\u0e49\u0e1f\u0e31\u0e07\u0e01\u0e4c\u0e0a\u0e31\u0e19 filter()<\/a> \u0e08\u0e32\u0e01\u0e41\u0e1e\u0e47\u0e04\u0e40\u0e01\u0e08 dplyr<\/a><\/span><\/p>\n

 library(dplyr)<\/strong><\/pre>\n
 \u0e1a\u0e17\u0e0a\u0e48\u0e27\u0e22\u0e2a\u0e2d\u0e19\u0e19\u0e35\u0e49\u0e08\u0e30\u0e2d\u0e18\u0e34\u0e1a\u0e32\u0e22\u0e15\u0e31\u0e27\u0e2d\u0e22\u0e48\u0e32\u0e07\u0e15\u0e48\u0e32\u0e07\u0e46 \u0e02\u0e2d\u0e07\u0e27\u0e34\u0e18\u0e35\u0e43\u0e0a\u0e49\u0e1f\u0e35\u0e40\u0e08\u0e2d\u0e23\u0e4c\u0e19\u0e35\u0e49\u0e43\u0e19\u0e17\u0e32\u0e07\u0e1b\u0e0f\u0e34\u0e1a\u0e31\u0e15\u0e34\u0e42\u0e14\u0e22\u0e43\u0e0a\u0e49\u0e0a\u0e38\u0e14\u0e02\u0e49\u0e2d\u0e21\u0e39\u0e25 dplyr \u0e43\u0e19\u0e15\u0e31\u0e27\u0e17\u0e35\u0e48\u0e40\u0e23\u0e35\u0e22\u0e01\u0e27\u0e48\u0e32 starwars<\/strong> :<\/span><\/p>\n
 #view first six rows of starwars dataset<\/span>\nhead(starwars)\n\n# A tibble: 6 x 13\n  name height mass hair_color skin_color eye_color birth_year gender homeworld\n                                   \n1 Luke~ 172 77 blond fair blue 19 male Tatooine \n2 C-3PO 167 75 <NA> gold yellow 112 <NA> Tatooine \n3 R2-D2 96 32 <NA> white, bl~ red 33 <NA> Naboo    \n4 Dart~ 202 136 none white yellow 41.9 male Tatooine \n5 Leia~ 150 49 brown light brown 19 female Alderaan \n6 Owen~ 178 120 brown, gr~ light blue 52 male Tatooine \n# ... with 4 more variables: species , films , vehicles ,\n# starships \n<\/strong><\/pre>\n
 \u0e15\u0e31\u0e27\u0e2d\u0e22\u0e48\u0e32\u0e07\u0e17\u0e35\u0e48 1: \u0e01\u0e23\u0e2d\u0e07\u0e41\u0e16\u0e27\u0e43\u0e2b\u0e49\u0e40\u0e17\u0e48\u0e32\u0e01\u0e31\u0e1a\u0e04\u0e48\u0e32\u0e17\u0e35\u0e48\u0e01\u0e33\u0e2b\u0e19\u0e14<\/span><\/strong><\/h3>\n
 \u0e23\u0e2b\u0e31\u0e2a\u0e15\u0e48\u0e2d\u0e44\u0e1b\u0e19\u0e35\u0e49\u0e41\u0e2a\u0e14\u0e07\u0e27\u0e34\u0e18\u0e35\u0e01\u0e32\u0e23\u0e01\u0e23\u0e2d\u0e07\u0e0a\u0e38\u0e14\u0e02\u0e49\u0e2d\u0e21\u0e39\u0e25\u0e2a\u0e33\u0e2b\u0e23\u0e31\u0e1a\u0e41\u0e16\u0e27\u0e17\u0e35\u0e48\u0e15\u0e31\u0e27\u0e41\u0e1b\u0e23 “species” \u0e40\u0e17\u0e48\u0e32\u0e01\u0e31\u0e1a Droid<\/span><\/p>\n
 starwars %>% filter(species == ' Droid<\/span> ')\n\n# A tibble: 5 x 13\n  name height mass hair_color skin_color eye_color birth_year gender homeworld\n                                   \n1 C-3PO 167 75 gold yellow 112 Tatooine \n2 R2-D2 96 32 white, bl~ red 33 Naboo    \n3 R5-D4 97 32 white, red red NA Tatooine \n4 IG-88 200 140 none metal red 15 none        \n5 BB8 NA NA none none black NA none        \n# ... with 4 more variables: species , films , vehicles ,\n# starships \n<\/strong><\/pre>\n
 \u0e40\u0e23\u0e32\u0e08\u0e30\u0e40\u0e2b\u0e47\u0e19\u0e27\u0e48\u0e32\u0e0a\u0e38\u0e14\u0e02\u0e49\u0e2d\u0e21\u0e39\u0e25 5 \u0e41\u0e16\u0e27\u0e15\u0e23\u0e07\u0e15\u0e32\u0e21\u0e40\u0e07\u0e37\u0e48\u0e2d\u0e19\u0e44\u0e02\u0e19\u0e35\u0e49 \u0e15\u0e32\u0e21\u0e17\u0e35\u0e48\u0e23\u0e30\u0e1a\u0e38\u0e42\u0e14\u0e22 #A tibble: 5 x 13<\/em><\/span><\/p>\n
 \u0e15\u0e31\u0e27\u0e2d\u0e22\u0e48\u0e32\u0e07\u0e17\u0e35\u0e48 2: \u0e01\u0e23\u0e2d\u0e07\u0e41\u0e16\u0e27\u0e42\u0e14\u0e22\u0e43\u0e0a\u0e49 “\u0e41\u0e25\u0e30”<\/span><\/strong><\/h3>\n
 \u0e19\u0e2d\u0e01\u0e08\u0e32\u0e01\u0e19\u0e35\u0e49\u0e40\u0e23\u0e32\u0e22\u0e31\u0e07\u0e2a\u0e32\u0e21\u0e32\u0e23\u0e16\u0e01\u0e23\u0e2d\u0e07\u0e41\u0e16\u0e27\u0e17\u0e35\u0e48\u0e21\u0e35\u0e2a\u0e32\u0e22\u0e1e\u0e31\u0e19\u0e18\u0e38\u0e4c\u0e40\u0e1b\u0e47\u0e19 Droid \u0e41\u0e25\u0e30<\/strong> \u0e2a\u0e35\u0e15\u0e32\u0e40\u0e1b\u0e47\u0e19\u0e2a\u0e35\u0e41\u0e14\u0e07:<\/span><\/p>\n
 starwars %>% filter(species == ' Droid<\/span> ' &<\/span> eye_color == ' red<\/span> ')\n\n# A tibble: 3 x 13\n  name height mass hair_color skin_color eye_color birth_year gender homeworld\n                                   \n1 R2-D2 96 32 <NA> white, bl~ red 33 <NA> Naboo    \n2 R5-D4 97 32 <NA> white, red red NA <NA> Tatooine \n3 IG-88 200 140 none metal red 15 none <NA>      \n# ... with 4 more variables: species , films , vehicles ,\n# starships \n<\/strong><\/pre>\n
 \u0e40\u0e23\u0e32\u0e08\u0e30\u0e40\u0e2b\u0e47\u0e19\u0e27\u0e48\u0e32 3 \u0e41\u0e16\u0e27\u0e43\u0e19\u0e0a\u0e38\u0e14\u0e02\u0e49\u0e2d\u0e21\u0e39\u0e25\u0e15\u0e23\u0e07\u0e15\u0e32\u0e21\u0e40\u0e07\u0e37\u0e48\u0e2d\u0e19\u0e44\u0e02\u0e19\u0e35\u0e49<\/span><\/p>\n
 \u0e15\u0e31\u0e27\u0e2d\u0e22\u0e48\u0e32\u0e07\u0e17\u0e35\u0e48 3: \u0e01\u0e23\u0e2d\u0e07\u0e41\u0e16\u0e27\u0e42\u0e14\u0e22\u0e43\u0e0a\u0e49 “\u0e2b\u0e23\u0e37\u0e2d”<\/span><\/strong><\/h3>\n
 \u0e19\u0e2d\u0e01\u0e08\u0e32\u0e01\u0e19\u0e35\u0e49\u0e40\u0e23\u0e32\u0e22\u0e31\u0e07\u0e2a\u0e32\u0e21\u0e32\u0e23\u0e16\u0e01\u0e23\u0e2d\u0e07\u0e41\u0e16\u0e27\u0e17\u0e35\u0e48\u0e21\u0e35\u0e2a\u0e32\u0e22\u0e1e\u0e31\u0e19\u0e18\u0e38\u0e4c\u0e40\u0e1b\u0e47\u0e19 Droid \u0e2b\u0e23\u0e37\u0e2d<\/strong> \u0e2a\u0e35\u0e15\u0e32\u0e40\u0e1b\u0e47\u0e19\u0e2a\u0e35\u0e41\u0e14\u0e07:<\/span><\/p>\n
 starwars %>% filter(species == ' Droid<\/span> ' |<\/span> eye_color == ' red<\/span> ')\n\n# A tibble: 7 x 13\n  name height mass hair_color skin_color eye_color birth_year gender homeworld\n                                   \n1 C-3PO 167 75 <NA> gold yellow 112 <NA> Tatooine \n2 R2-D2 96 32 <NA> white, bl~ red 33 <NA> Naboo    \n3 R5-D4 97 32 <NA> white, red red NA <NA> Tatooine \n4 IG-88 200 140 none metal red 15 none <NA>     \n5 Bossk 190 113 none green red 53 male Trandosha\n6 Nute~ 191 90 none mottled g~ red NA male Cato Nei~\n7 BB8 NA NA none none black NA none <NA>     \n# ... with 4 more variables: species , films , vehicles ,\n# starships  \n<\/strong><\/pre>\n
 \u0e40\u0e23\u0e32\u0e08\u0e30\u0e40\u0e2b\u0e47\u0e19\u0e27\u0e48\u0e32\u0e0a\u0e38\u0e14\u0e02\u0e49\u0e2d\u0e21\u0e39\u0e25 7 \u0e41\u0e16\u0e27\u0e15\u0e23\u0e07\u0e15\u0e32\u0e21\u0e40\u0e07\u0e37\u0e48\u0e2d\u0e19\u0e44\u0e02\u0e19\u0e35\u0e49<\/span><\/p>\n
 \u0e15\u0e31\u0e27\u0e2d\u0e22\u0e48\u0e32\u0e07\u0e17\u0e35\u0e48 4: \u0e01\u0e23\u0e2d\u0e07\u0e41\u0e16\u0e27\u0e14\u0e49\u0e27\u0e22\u0e04\u0e48\u0e32\u0e43\u0e19\u0e23\u0e32\u0e22\u0e01\u0e32\u0e23<\/span><\/strong><\/h3>\n
 \u0e19\u0e2d\u0e01\u0e08\u0e32\u0e01\u0e19\u0e35\u0e49\u0e40\u0e23\u0e32\u0e22\u0e31\u0e07\u0e2a\u0e32\u0e21\u0e32\u0e23\u0e16\u0e01\u0e23\u0e2d\u0e07\u0e41\u0e16\u0e27\u0e17\u0e35\u0e48\u0e2a\u0e35\u0e15\u0e32\u0e1b\u0e23\u0e32\u0e01\u0e0f\u0e43\u0e19\u0e23\u0e32\u0e22\u0e01\u0e32\u0e23\u0e2a\u0e35\u0e44\u0e14\u0e49:<\/span><\/p>\n
 starwars %>% filter(eye_color %in%<\/span> c(' blue<\/span> ', ' yellow<\/span> ', ' red<\/span> '))\n\n# A tibble: 35 x 13\n   name height mass hair_color skin_color eye_color birth_year gender\n                               \n 1 Luke~ 172 77 blond fair blue 19 male  \n 2 C-3PO 167 75 <NA> gold yellow 112 <NA> \n 3 R2-D2 96 32 <NA> white, bl~ red 33 <NA>  \n 4 Dart~ 202 136 none white yellow 41.9 male  \n 5 Owen~ 178 120 brown, gr~ light blue 52 male  \n 6 Beru~ 165 75 brown light blue 47 female\n 7 R5-D4 97 32 <NA> white, red red NA <NA> \n 8 Anak~ 188 84 blond fair blue 41.9 male  \n 9 Wilh~ 180 NA auburn, g~ fair blue 64 male  \n10 Chew~ 228 112 brown unknown blue 200 male  \n# ... with 25 more rows, and 5 more variables: homeworld, species,\n# films, vehicles, starships  \n<\/strong><\/pre>\n
 \u0e40\u0e23\u0e32\u0e08\u0e30\u0e40\u0e2b\u0e47\u0e19\u0e27\u0e48\u0e32\u0e0a\u0e38\u0e14\u0e02\u0e49\u0e2d\u0e21\u0e39\u0e25 35 \u0e41\u0e16\u0e27\u0e21\u0e35\u0e2a\u0e35\u0e15\u0e32\u0e40\u0e1b\u0e47\u0e19\u0e2a\u0e35\u0e19\u0e49\u0e33\u0e40\u0e07\u0e34\u0e19 \u0e40\u0e2b\u0e25\u0e37\u0e2d\u0e07 \u0e2b\u0e23\u0e37\u0e2d\u0e41\u0e14\u0e07<\/span><\/p>\n
 \u0e17\u0e35\u0e48\u0e40\u0e01\u0e35\u0e48\u0e22\u0e27\u0e02\u0e49\u0e2d\u0e07:<\/span><\/strong> \u0e27\u0e34\u0e18\u0e35\u0e43\u0e0a\u0e49\u0e15\u0e31\u0e27\u0e14\u0e33\u0e40\u0e19\u0e34\u0e19\u0e01\u0e32\u0e23 %in% \u0e43\u0e19 R (\u0e1e\u0e23\u0e49\u0e2d\u0e21\u0e15\u0e31\u0e27\u0e2d\u0e22\u0e48\u0e32\u0e07)<\/a><\/p>\n
 \u0e15\u0e31\u0e27\u0e2d\u0e22\u0e48\u0e32\u0e07\u0e17\u0e35\u0e48 5: \u0e01\u0e23\u0e2d\u0e07\u0e41\u0e16\u0e27\u0e42\u0e14\u0e22\u0e43\u0e0a\u0e49\u0e19\u0e49\u0e2d\u0e22\u0e01\u0e27\u0e48\u0e32\u0e2b\u0e23\u0e37\u0e2d\u0e21\u0e32\u0e01\u0e01\u0e27\u0e48\u0e32<\/span><\/strong><\/h3>\n
 \u0e19\u0e2d\u0e01\u0e08\u0e32\u0e01\u0e19\u0e35\u0e49\u0e40\u0e23\u0e32\u0e22\u0e31\u0e07\u0e2a\u0e32\u0e21\u0e32\u0e23\u0e16\u0e01\u0e23\u0e2d\u0e07\u0e41\u0e16\u0e27\u0e42\u0e14\u0e22\u0e43\u0e0a\u0e49\u0e19\u0e49\u0e2d\u0e22\u0e01\u0e27\u0e48\u0e32\u0e2b\u0e23\u0e37\u0e2d\u0e21\u0e32\u0e01\u0e01\u0e27\u0e48\u0e32\u0e01\u0e32\u0e23\u0e14\u0e33\u0e40\u0e19\u0e34\u0e19\u0e01\u0e32\u0e23\u0e01\u0e31\u0e1a\u0e15\u0e31\u0e27\u0e41\u0e1b\u0e23\u0e15\u0e31\u0e27\u0e40\u0e25\u0e02:<\/span><\/p>\n
 #find rows where height is greater than 250<\/span>\nstarwars %>% filter(height ><\/span> 250)\n\n# A tibble: 1 x 13\n  name height mass hair_color skin_color eye_color birth_year gender homeworld\n                                   \n1 Yara~ 264 NA none white yellow NA male Quermia  \n# ... with 4 more variables: species , films , vehicles ,\n# starships   \n\n#find rows where height is between 200 and 220<\/span>\nstarwars %>% filter(height ><\/span> 200 &<\/span> height <<\/span> 220)\n\n# A tibble: 5 x 13\n  name height mass hair_color skin_color eye_color birth_year gender homeworld\n                                   \n1 Dart~ 202 136 none white yellow 41.9 male Tatooine \n2 Rugo~ 206 NA none green orange NA male Naboo    \n3 Taun~ 213 NA none gray black NA female Kamino   \n4 Grie~ 216 159 none brown, wh~ green, y~ NA male Kalee    \n5 Tion~ 206 80 none gray black NA male Utapau   \n# ... with 4 more variables: species , films , vehicles ,\n# starships \n\n#find rows where height is above the average height\nstarwars %>% filter(height ><\/span> mean<\/span> (height, na.rm = TRUE<\/span> ))\n\n# A tibble: 51 x 13\n   name height mass hair_color skin_color eye_color birth_year gender\n                               \n 1 Dart~ 202 136 none white yellow 41.9 male  \n 2 Owen~ 178 120 brown, gr~ light blue 52 male  \n 3 Bigg~ 183 84 black light brown 24 male  \n 4 Obi-~ 182 77 auburn, w~ fair blue-gray 57 male  \n 5 Anak~ 188 84 blond fair blue 41.9 male  \n 6 Wilh~ 180 NA auburn, g~ fair blue 64 male  \n 7 Chew~ 228 112 brown unknown blue 200 male  \n 8 Han ~ 180 80 brown fair brown 29 male  \n 9 Jabb~ 175 1358 <NA> green-tan~ orange 600 herma~\n10 Jek ~ 180 110 brown fair blue NA male  \n# ... with 41 more rows, and 5 more variables: homeworld, species,\n# films, vehicles, starships<\/span><\/span>\n<\/strong><\/pre>\n
\u0e1a\u0e48\u0e2d\u0e22\u0e04\u0e23\u0e31\u0e49\u0e07\u0e17\u0e35\u0e48\u0e04\u0e38\u0e13\u0e2d\u0e32\u0e08\u0e2a\u0e19\u0e43\u0e08\u0e0a\u0e38\u0e14\u0e22\u0e48\u0e2d\u0e22\u0e02\u0e2d\u0e07\u0e01\u0e23\u0e2d\u0e1a\u0e02\u0e49\u0e2d\u0e21\u0e39\u0e25\u0e15\u0e32\u0e21\u0e40\u0e07\u0e37\u0e48\u0e2d\u0e19\u0e44\u0e02\u0e1a\u0e32 […]<\/p>\n","protected":false},"author":1,"featured_media":0,"comment_status":"open","ping_status":"open","sticky":false,"template":"","format":"standard","meta":{"footnotes":""},"categories":[3],"tags":[],"class_list":["post-943","post","type-post","status-publish","format-standard","hentry","category-3"],"yoast_head":"\n\u0e27\u0e34\u0e18\u0e35\u0e01\u0e23\u0e2d\u0e07\u0e41\u0e16\u0e27\u0e43\u0e19 R \u2013 Statology<\/title>\n<meta name=\"description\" content=\"\u0e04\u0e33\u0e2d\u0e18\u0e34\u0e1a\u0e32\u0e22\u0e07\u0e48\u0e32\u0e22\u0e46 \u0e40\u0e01\u0e35\u0e48\u0e22\u0e27\u0e01\u0e31\u0e1a\u0e27\u0e34\u0e18\u0e35\u0e01\u0e23\u0e2d\u0e07\u0e02\u0e49\u0e2d\u0e21\u0e39\u0e25\u0e43\u0e19 R \u0e42\u0e14\u0e22\u0e43\u0e0a\u0e49\u0e1f\u0e31\u0e07\u0e01\u0e4c\u0e0a\u0e31\u0e19 filter() \u0e08\u0e32\u0e01\u0e41\u0e1e\u0e47\u0e04\u0e40\u0e01\u0e08 dplyr\" \/>\n<meta name=\"robots\" content=\"index, follow, max-snippet:-1, max-image-preview:large, max-video-preview:-1\" \/>\n<link rel=\"canonical\" href=\"https:\/\/statorials.org\/th\/\u0e01\u0e23\u0e2d\u0e07\u0e41\u0e16\u0e27-r\/\" \/>\n<meta property=\"og:locale\" content=\"th_TH\" \/>\n<meta property=\"og:type\" content=\"article\" \/>\n<meta property=\"og:title\" content=\"\u0e27\u0e34\u0e18\u0e35\u0e01\u0e23\u0e2d\u0e07\u0e41\u0e16\u0e27\u0e43\u0e19 R \u2013 Statology\" \/>\n<meta property=\"og:description\" content=\"\u0e04\u0e33\u0e2d\u0e18\u0e34\u0e1a\u0e32\u0e22\u0e07\u0e48\u0e32\u0e22\u0e46 \u0e40\u0e01\u0e35\u0e48\u0e22\u0e27\u0e01\u0e31\u0e1a\u0e27\u0e34\u0e18\u0e35\u0e01\u0e23\u0e2d\u0e07\u0e02\u0e49\u0e2d\u0e21\u0e39\u0e25\u0e43\u0e19 R \u0e42\u0e14\u0e22\u0e43\u0e0a\u0e49\u0e1f\u0e31\u0e07\u0e01\u0e4c\u0e0a\u0e31\u0e19 filter() \u0e08\u0e32\u0e01\u0e41\u0e1e\u0e47\u0e04\u0e40\u0e01\u0e08 dplyr\" \/>\n<meta property=\"og:url\" content=\"https:\/\/statorials.org\/th\/\u0e01\u0e23\u0e2d\u0e07\u0e41\u0e16\u0e27-r\/\" \/>\n<meta property=\"og:site_name\" content=\"Statorials\" \/>\n<meta property=\"article:published_time\" content=\"2023-07-28T05:49:15+00:00\" \/>\n<meta name=\"author\" content=\"\u0e14\u0e23.\u0e40\u0e1a\u0e19\u0e08\u0e32\u0e21\u0e34\u0e19 \u0e41\u0e2d\u0e19\u0e40\u0e14\u0e2d\u0e23\u0e4c\u0e2a\u0e31\u0e19\" \/>\n<meta name=\"twitter:card\" content=\"summary_large_image\" \/>\n<meta name=\"twitter:label1\" content=\"Written by\" \/>\n\t<meta name=\"twitter:data1\" content=\"\u0e14\u0e23.\u0e40\u0e1a\u0e19\u0e08\u0e32\u0e21\u0e34\u0e19 \u0e41\u0e2d\u0e19\u0e40\u0e14\u0e2d\u0e23\u0e4c\u0e2a\u0e31\u0e19\" \/>\n\t<meta name=\"twitter:label2\" content=\"Est. reading time\" \/>\n\t<meta name=\"twitter:data2\" content=\"3 \u0e19\u0e32\u0e17\u0e35\" \/>\n<script type=\"application\/ld+json\" class=\"yoast-schema-graph\">{\"@context\":\"https:\/\/schema.org\",\"@graph\":[{\"@type\":\"WebPage\",\"@id\":\"https:\/\/statorials.org\/th\/%e0%b8%81%e0%b8%a3%e0%b8%ad%e0%b8%87%e0%b9%81%e0%b8%96%e0%b8%a7-r\/\",\"url\":\"https:\/\/statorials.org\/th\/%e0%b8%81%e0%b8%a3%e0%b8%ad%e0%b8%87%e0%b9%81%e0%b8%96%e0%b8%a7-r\/\",\"name\":\"\u0e27\u0e34\u0e18\u0e35\u0e01\u0e23\u0e2d\u0e07\u0e41\u0e16\u0e27\u0e43\u0e19 R \u2013 Statology\",\"isPartOf\":{\"@id\":\"https:\/\/statorials.org\/th\/#website\"},\"datePublished\":\"2023-07-28T05:49:15+00:00\",\"dateModified\":\"2023-07-28T05:49:15+00:00\",\"author\":{\"@id\":\"https:\/\/statorials.org\/th\/#\/schema\/person\/7c9bb3d0f799d0f1b17883495e1de332\"},\"description\":\"\u0e04\u0e33\u0e2d\u0e18\u0e34\u0e1a\u0e32\u0e22\u0e07\u0e48\u0e32\u0e22\u0e46 \u0e40\u0e01\u0e35\u0e48\u0e22\u0e27\u0e01\u0e31\u0e1a\u0e27\u0e34\u0e18\u0e35\u0e01\u0e23\u0e2d\u0e07\u0e02\u0e49\u0e2d\u0e21\u0e39\u0e25\u0e43\u0e19 R \u0e42\u0e14\u0e22\u0e43\u0e0a\u0e49\u0e1f\u0e31\u0e07\u0e01\u0e4c\u0e0a\u0e31\u0e19 filter() \u0e08\u0e32\u0e01\u0e41\u0e1e\u0e47\u0e04\u0e40\u0e01\u0e08 dplyr\",\"breadcrumb\":{\"@id\":\"https:\/\/statorials.org\/th\/%e0%b8%81%e0%b8%a3%e0%b8%ad%e0%b8%87%e0%b9%81%e0%b8%96%e0%b8%a7-r\/#breadcrumb\"},\"inLanguage\":\"th\",\"potentialAction\":[{\"@type\":\"ReadAction\",\"target\":[\"https:\/\/statorials.org\/th\/%e0%b8%81%e0%b8%a3%e0%b8%ad%e0%b8%87%e0%b9%81%e0%b8%96%e0%b8%a7-r\/\"]}]},{\"@type\":\"BreadcrumbList\",\"@id\":\"https:\/\/statorials.org\/th\/%e0%b8%81%e0%b8%a3%e0%b8%ad%e0%b8%87%e0%b9%81%e0%b8%96%e0%b8%a7-r\/#breadcrumb\",\"itemListElement\":[{\"@type\":\"ListItem\",\"position\":1,\"name\":\"\u0e1a\u0e49\u0e32\u0e19\",\"item\":\"https:\/\/statorials.org\/th\/\"},{\"@type\":\"ListItem\",\"position\":2,\"name\":\"\u0e27\u0e34\u0e18\u0e35\u0e01\u0e23\u0e2d\u0e07\u0e41\u0e16\u0e27\u0e43\u0e19 r\"}]},{\"@type\":\"WebSite\",\"@id\":\"https:\/\/statorials.org\/th\/#website\",\"url\":\"https:\/\/statorials.org\/th\/\",\"name\":\"Statorials\",\"description\":\"\u0e04\u0e33\u0e41\u0e19\u0e30\u0e19\u0e33\u0e02\u0e2d\u0e07\u0e04\u0e38\u0e13\u0e40\u0e01\u0e35\u0e48\u0e22\u0e27\u0e01\u0e31\u0e1a\u0e04\u0e27\u0e32\u0e21\u0e2a\u0e32\u0e21\u0e32\u0e23\u0e16\u0e17\u0e32\u0e07\u0e2a\u0e16\u0e34\u0e15\u0e34!\",\"potentialAction\":[{\"@type\":\"SearchAction\",\"target\":{\"@type\":\"EntryPoint\",\"urlTemplate\":\"https:\/\/statorials.org\/th\/?s={search_term_string}\"},\"query-input\":\"required name=search_term_string\"}],\"inLanguage\":\"th\"},{\"@type\":\"Person\",\"@id\":\"https:\/\/statorials.org\/th\/#\/schema\/person\/7c9bb3d0f799d0f1b17883495e1de332\",\"name\":\"\u0e14\u0e23.\u0e40\u0e1a\u0e19\u0e08\u0e32\u0e21\u0e34\u0e19 \u0e41\u0e2d\u0e19\u0e40\u0e14\u0e2d\u0e23\u0e4c\u0e2a\u0e31\u0e19\",\"image\":{\"@type\":\"ImageObject\",\"inLanguage\":\"th\",\"@id\":\"https:\/\/statorials.org\/th\/#\/schema\/person\/image\/\",\"url\":\"https:\/\/statorials.org\/th\/wp-content\/uploads\/2023\/11\/Dr.-Benjamin-Anderson-96x96.jpg\",\"contentUrl\":\"https:\/\/statorials.org\/th\/wp-content\/uploads\/2023\/11\/Dr.-Benjamin-Anderson-96x96.jpg\",\"caption\":\"\u0e14\u0e23.\u0e40\u0e1a\u0e19\u0e08\u0e32\u0e21\u0e34\u0e19 \u0e41\u0e2d\u0e19\u0e40\u0e14\u0e2d\u0e23\u0e4c\u0e2a\u0e31\u0e19\"},\"description\":\"\u0e2a\u0e27\u0e31\u0e2a\u0e14\u0e35 \u0e09\u0e31\u0e19\u0e0a\u0e37\u0e48\u0e2d\u0e40\u0e1a\u0e19\u0e08\u0e32\u0e21\u0e34\u0e19 \u0e28\u0e32\u0e2a\u0e15\u0e23\u0e32\u0e08\u0e32\u0e23\u0e22\u0e4c\u0e2a\u0e16\u0e34\u0e15\u0e34\u0e40\u0e01\u0e29\u0e35\u0e22\u0e13\u0e2d\u0e32\u0e22\u0e38\u0e41\u0e25\u0e49\u0e27 \u0e41\u0e25\u0e30\u0e1c\u0e31\u0e19\u0e15\u0e31\u0e27\u0e21\u0e32\u0e40\u0e1b\u0e47\u0e19\u0e04\u0e23\u0e39\u0e2a\u0e2d\u0e19\u0e2a\u0e16\u0e34\u0e15\u0e34\u0e42\u0e14\u0e22\u0e40\u0e09\u0e1e\u0e32\u0e30 \u0e14\u0e49\u0e27\u0e22\u0e1b\u0e23\u0e30\u0e2a\u0e1a\u0e01\u0e32\u0e23\u0e13\u0e4c\u0e41\u0e25\u0e30\u0e04\u0e27\u0e32\u0e21\u0e40\u0e0a\u0e35\u0e48\u0e22\u0e27\u0e0a\u0e32\u0e0d\u0e17\u0e35\u0e48\u0e01\u0e27\u0e49\u0e32\u0e07\u0e02\u0e27\u0e32\u0e07\u0e43\u0e19\u0e2a\u0e32\u0e02\u0e32\u0e2a\u0e16\u0e34\u0e15\u0e34 \u0e09\u0e31\u0e19\u0e01\u0e23\u0e30\u0e15\u0e37\u0e2d\u0e23\u0e37\u0e2d\u0e23\u0e49\u0e19\u0e17\u0e35\u0e48\u0e08\u0e30\u0e41\u0e1a\u0e48\u0e07\u0e1b\u0e31\u0e19\u0e04\u0e27\u0e32\u0e21\u0e23\u0e39\u0e49\u0e02\u0e2d\u0e07\u0e09\u0e31\u0e19\u0e40\u0e1e\u0e37\u0e48\u0e2d\u0e40\u0e2a\u0e23\u0e34\u0e21\u0e28\u0e31\u0e01\u0e22\u0e20\u0e32\u0e1e\u0e19\u0e31\u0e01\u0e40\u0e23\u0e35\u0e22\u0e19\u0e1c\u0e48\u0e32\u0e19 Statorials. \u0e23\u0e39\u0e49\u0e40\u0e1e\u0e34\u0e48\u0e21\u0e40\u0e15\u0e34\u0e21\",\"sameAs\":[\"https:\/\/statorials.org\/th\"]}]}<\/script>\n<!-- \/ Yoast SEO plugin. -->","yoast_head_json":{"title":"\u0e27\u0e34\u0e18\u0e35\u0e01\u0e23\u0e2d\u0e07\u0e41\u0e16\u0e27\u0e43\u0e19 R \u2013 Statology","description":"\u0e04\u0e33\u0e2d\u0e18\u0e34\u0e1a\u0e32\u0e22\u0e07\u0e48\u0e32\u0e22\u0e46 \u0e40\u0e01\u0e35\u0e48\u0e22\u0e27\u0e01\u0e31\u0e1a\u0e27\u0e34\u0e18\u0e35\u0e01\u0e23\u0e2d\u0e07\u0e02\u0e49\u0e2d\u0e21\u0e39\u0e25\u0e43\u0e19 R \u0e42\u0e14\u0e22\u0e43\u0e0a\u0e49\u0e1f\u0e31\u0e07\u0e01\u0e4c\u0e0a\u0e31\u0e19 filter() \u0e08\u0e32\u0e01\u0e41\u0e1e\u0e47\u0e04\u0e40\u0e01\u0e08 dplyr","robots":{"index":"index","follow":"follow","max-snippet":"max-snippet:-1","max-image-preview":"max-image-preview:large","max-video-preview":"max-video-preview:-1"},"canonical":"https:\/\/statorials.org\/th\/\u0e01\u0e23\u0e2d\u0e07\u0e41\u0e16\u0e27-r\/","og_locale":"th_TH","og_type":"article","og_title":"\u0e27\u0e34\u0e18\u0e35\u0e01\u0e23\u0e2d\u0e07\u0e41\u0e16\u0e27\u0e43\u0e19 R \u2013 Statology","og_description":"\u0e04\u0e33\u0e2d\u0e18\u0e34\u0e1a\u0e32\u0e22\u0e07\u0e48\u0e32\u0e22\u0e46 \u0e40\u0e01\u0e35\u0e48\u0e22\u0e27\u0e01\u0e31\u0e1a\u0e27\u0e34\u0e18\u0e35\u0e01\u0e23\u0e2d\u0e07\u0e02\u0e49\u0e2d\u0e21\u0e39\u0e25\u0e43\u0e19 R \u0e42\u0e14\u0e22\u0e43\u0e0a\u0e49\u0e1f\u0e31\u0e07\u0e01\u0e4c\u0e0a\u0e31\u0e19 filter() \u0e08\u0e32\u0e01\u0e41\u0e1e\u0e47\u0e04\u0e40\u0e01\u0e08 dplyr","og_url":"https:\/\/statorials.org\/th\/\u0e01\u0e23\u0e2d\u0e07\u0e41\u0e16\u0e27-r\/","og_site_name":"Statorials","article_published_time":"2023-07-28T05:49:15+00:00","author":"\u0e14\u0e23.\u0e40\u0e1a\u0e19\u0e08\u0e32\u0e21\u0e34\u0e19 \u0e41\u0e2d\u0e19\u0e40\u0e14\u0e2d\u0e23\u0e4c\u0e2a\u0e31\u0e19","twitter_card":"summary_large_image","twitter_misc":{"Written by":"\u0e14\u0e23.\u0e40\u0e1a\u0e19\u0e08\u0e32\u0e21\u0e34\u0e19 \u0e41\u0e2d\u0e19\u0e40\u0e14\u0e2d\u0e23\u0e4c\u0e2a\u0e31\u0e19","Est. reading time":"3 \u0e19\u0e32\u0e17\u0e35"},"schema":{"@context":"https:\/\/schema.org","@graph":[{"@type":"WebPage","@id":"https:\/\/statorials.org\/th\/%e0%b8%81%e0%b8%a3%e0%b8%ad%e0%b8%87%e0%b9%81%e0%b8%96%e0%b8%a7-r\/","url":"https:\/\/statorials.org\/th\/%e0%b8%81%e0%b8%a3%e0%b8%ad%e0%b8%87%e0%b9%81%e0%b8%96%e0%b8%a7-r\/","name":"\u0e27\u0e34\u0e18\u0e35\u0e01\u0e23\u0e2d\u0e07\u0e41\u0e16\u0e27\u0e43\u0e19 R \u2013 Statology","isPartOf":{"@id":"https:\/\/statorials.org\/th\/#website"},"datePublished":"2023-07-28T05:49:15+00:00","dateModified":"2023-07-28T05:49:15+00:00","author":{"@id":"https:\/\/statorials.org\/th\/#\/schema\/person\/7c9bb3d0f799d0f1b17883495e1de332"},"description":"\u0e04\u0e33\u0e2d\u0e18\u0e34\u0e1a\u0e32\u0e22\u0e07\u0e48\u0e32\u0e22\u0e46 \u0e40\u0e01\u0e35\u0e48\u0e22\u0e27\u0e01\u0e31\u0e1a\u0e27\u0e34\u0e18\u0e35\u0e01\u0e23\u0e2d\u0e07\u0e02\u0e49\u0e2d\u0e21\u0e39\u0e25\u0e43\u0e19 R \u0e42\u0e14\u0e22\u0e43\u0e0a\u0e49\u0e1f\u0e31\u0e07\u0e01\u0e4c\u0e0a\u0e31\u0e19 filter() \u0e08\u0e32\u0e01\u0e41\u0e1e\u0e47\u0e04\u0e40\u0e01\u0e08 dplyr","breadcrumb":{"@id":"https:\/\/statorials.org\/th\/%e0%b8%81%e0%b8%a3%e0%b8%ad%e0%b8%87%e0%b9%81%e0%b8%96%e0%b8%a7-r\/#breadcrumb"},"inLanguage":"th","potentialAction":[{"@type":"ReadAction","target":["https:\/\/statorials.org\/th\/%e0%b8%81%e0%b8%a3%e0%b8%ad%e0%b8%87%e0%b9%81%e0%b8%96%e0%b8%a7-r\/"]}]},{"@type":"BreadcrumbList","@id":"https:\/\/statorials.org\/th\/%e0%b8%81%e0%b8%a3%e0%b8%ad%e0%b8%87%e0%b9%81%e0%b8%96%e0%b8%a7-r\/#breadcrumb","itemListElement":[{"@type":"ListItem","position":1,"name":"\u0e1a\u0e49\u0e32\u0e19","item":"https:\/\/statorials.org\/th\/"},{"@type":"ListItem","position":2,"name":"\u0e27\u0e34\u0e18\u0e35\u0e01\u0e23\u0e2d\u0e07\u0e41\u0e16\u0e27\u0e43\u0e19 r"}]},{"@type":"WebSite","@id":"https:\/\/statorials.org\/th\/#website","url":"https:\/\/statorials.org\/th\/","name":"Statorials","description":"\u0e04\u0e33\u0e41\u0e19\u0e30\u0e19\u0e33\u0e02\u0e2d\u0e07\u0e04\u0e38\u0e13\u0e40\u0e01\u0e35\u0e48\u0e22\u0e27\u0e01\u0e31\u0e1a\u0e04\u0e27\u0e32\u0e21\u0e2a\u0e32\u0e21\u0e32\u0e23\u0e16\u0e17\u0e32\u0e07\u0e2a\u0e16\u0e34\u0e15\u0e34!","potentialAction":[{"@type":"SearchAction","target":{"@type":"EntryPoint","urlTemplate":"https:\/\/statorials.org\/th\/?s={search_term_string}"},"query-input":"required name=search_term_string"}],"inLanguage":"th"},{"@type":"Person","@id":"https:\/\/statorials.org\/th\/#\/schema\/person\/7c9bb3d0f799d0f1b17883495e1de332","name":"\u0e14\u0e23.\u0e40\u0e1a\u0e19\u0e08\u0e32\u0e21\u0e34\u0e19 \u0e41\u0e2d\u0e19\u0e40\u0e14\u0e2d\u0e23\u0e4c\u0e2a\u0e31\u0e19","image":{"@type":"ImageObject","inLanguage":"th","@id":"https:\/\/statorials.org\/th\/#\/schema\/person\/image\/","url":"https:\/\/statorials.org\/th\/wp-content\/uploads\/2023\/11\/Dr.-Benjamin-Anderson-96x96.jpg","contentUrl":"https:\/\/statorials.org\/th\/wp-content\/uploads\/2023\/11\/Dr.-Benjamin-Anderson-96x96.jpg","caption":"\u0e14\u0e23.\u0e40\u0e1a\u0e19\u0e08\u0e32\u0e21\u0e34\u0e19 \u0e41\u0e2d\u0e19\u0e40\u0e14\u0e2d\u0e23\u0e4c\u0e2a\u0e31\u0e19"},"description":"\u0e2a\u0e27\u0e31\u0e2a\u0e14\u0e35 \u0e09\u0e31\u0e19\u0e0a\u0e37\u0e48\u0e2d\u0e40\u0e1a\u0e19\u0e08\u0e32\u0e21\u0e34\u0e19 \u0e28\u0e32\u0e2a\u0e15\u0e23\u0e32\u0e08\u0e32\u0e23\u0e22\u0e4c\u0e2a\u0e16\u0e34\u0e15\u0e34\u0e40\u0e01\u0e29\u0e35\u0e22\u0e13\u0e2d\u0e32\u0e22\u0e38\u0e41\u0e25\u0e49\u0e27 \u0e41\u0e25\u0e30\u0e1c\u0e31\u0e19\u0e15\u0e31\u0e27\u0e21\u0e32\u0e40\u0e1b\u0e47\u0e19\u0e04\u0e23\u0e39\u0e2a\u0e2d\u0e19\u0e2a\u0e16\u0e34\u0e15\u0e34\u0e42\u0e14\u0e22\u0e40\u0e09\u0e1e\u0e32\u0e30 \u0e14\u0e49\u0e27\u0e22\u0e1b\u0e23\u0e30\u0e2a\u0e1a\u0e01\u0e32\u0e23\u0e13\u0e4c\u0e41\u0e25\u0e30\u0e04\u0e27\u0e32\u0e21\u0e40\u0e0a\u0e35\u0e48\u0e22\u0e27\u0e0a\u0e32\u0e0d\u0e17\u0e35\u0e48\u0e01\u0e27\u0e49\u0e32\u0e07\u0e02\u0e27\u0e32\u0e07\u0e43\u0e19\u0e2a\u0e32\u0e02\u0e32\u0e2a\u0e16\u0e34\u0e15\u0e34 \u0e09\u0e31\u0e19\u0e01\u0e23\u0e30\u0e15\u0e37\u0e2d\u0e23\u0e37\u0e2d\u0e23\u0e49\u0e19\u0e17\u0e35\u0e48\u0e08\u0e30\u0e41\u0e1a\u0e48\u0e07\u0e1b\u0e31\u0e19\u0e04\u0e27\u0e32\u0e21\u0e23\u0e39\u0e49\u0e02\u0e2d\u0e07\u0e09\u0e31\u0e19\u0e40\u0e1e\u0e37\u0e48\u0e2d\u0e40\u0e2a\u0e23\u0e34\u0e21\u0e28\u0e31\u0e01\u0e22\u0e20\u0e32\u0e1e\u0e19\u0e31\u0e01\u0e40\u0e23\u0e35\u0e22\u0e19\u0e1c\u0e48\u0e32\u0e19 Statorials. \u0e23\u0e39\u0e49\u0e40\u0e1e\u0e34\u0e48\u0e21\u0e40\u0e15\u0e34\u0e21","sameAs":["https:\/\/statorials.org\/th"]}]}},"yoast_meta":{"yoast_wpseo_title":"","yoast_wpseo_metadesc":"","yoast_wpseo_canonical":""},"_links":{"self":[{"href":"https:\/\/statorials.org\/th\/wp-json\/wp\/v2\/posts\/943","targetHints":{"allow":["GET"]}}],"collection":[{"href":"https:\/\/statorials.org\/th\/wp-json\/wp\/v2\/posts"}],"about":[{"href":"https:\/\/statorials.org\/th\/wp-json\/wp\/v2\/types\/post"}],"author":[{"embeddable":true,"href":"https:\/\/statorials.org\/th\/wp-json\/wp\/v2\/users\/1"}],"replies":[{"embeddable":true,"href":"https:\/\/statorials.org\/th\/wp-json\/wp\/v2\/comments?post=943"}],"version-history":[{"count":0,"href":"https:\/\/statorials.org\/th\/wp-json\/wp\/v2\/posts\/943\/revisions"}],"wp:attachment":[{"href":"https:\/\/statorials.org\/th\/wp-json\/wp\/v2\/media?parent=943"}],"wp:term":[{"taxonomy":"category","embeddable":true,"href":"https:\/\/statorials.org\/th\/wp-json\/wp\/v2\/categories?post=943"},{"taxonomy":"post_tag","embeddable":true,"href":"https:\/\/statorials.org\/th\/wp-json\/wp\/v2\/tags?post=943"}],"curies":[{"name":"wp","href":"https:\/\/api.w.org\/{rel}","templated":true}]}}
 \u0e04\u0e38\u0e13\u0e2a\u0e32\u0e21\u0e32\u0e23\u0e16\u0e14\u0e39\u0e40\u0e2d\u0e01\u0e2a\u0e32\u0e23\u0e09\u0e1a\u0e31\u0e1a\u0e40\u0e15\u0e47\u0e21\u0e2a\u0e33\u0e2b\u0e23\u0e31\u0e1a\u0e1f\u0e31\u0e07\u0e01\u0e4c\u0e0a\u0e31\u0e19 filter()<\/strong> \u0e44\u0e14\u0e49\u0e17\u0e35\u0e48\u0e19\u0e35\u0e48<\/a><\/em><\/span><\/p>\n","protected":false},"excerpt":{"rendered":"