<\/p>\n
Mo\u017cesz u\u017cy\u0107 jednej z dw\u00f3ch metod, aby podzieli\u0107 kolumn\u0119 na wiele kolumn w R:<\/span><\/p>\n Metoda 1: U\u017cyj str_split_fixed()<\/strong><\/span><\/p>\n Metoda 2: U\u017cyj oddzielnej()<\/strong><\/span><\/p>\n Poni\u017csze przyk\u0142ady pokazuj\u0105, jak zastosowa\u0107 ka\u017cd\u0105 metod\u0119 w praktyce.<\/span><\/p>\n Za\u0142\u00f3\u017cmy, \u017ce mamy nast\u0119puj\u0105c\u0105 ramk\u0119 danych:<\/span><\/p>\n Mo\u017cemy u\u017cy\u0107 funkcji str_split_fixed()<\/strong> z pakietu stringr<\/strong> , aby podzieli\u0107 kolumn\u0119 \u201eplayer\u201d na dwie nowe kolumny zwane \u201eFirst\u201d i \u201eLast\u201d w nast\u0119puj\u0105cy spos\u00f3b:<\/span><\/p>\n Nale\u017cy zwr\u00f3ci\u0107 uwag\u0119, \u017ce na ko\u0144cu ramki danych dodano dwie nowe kolumny.<\/span><\/p>\n Je\u015bli chcesz, mo\u017cesz zmieni\u0107 uk\u0142ad kolumn i usun\u0105\u0107 oryginalne kolumny \u201egracz\u201d:<\/span><\/p>\n Poni\u017cszy kod pokazuje, jak u\u017cy\u0107 funkcji Separate()<\/strong> pakietu Tidyr<\/strong> do rozdzielenia kolumny \u201eplayer\u201d na kolumny \u201epierwsz\u0105\u201d i \u201eostatni\u0105\u201d:<\/span><\/p>\n Nale\u017cy pami\u0119ta\u0107, \u017ce funkcja Separate()<\/strong> oddziela ci\u0105gi na podstawie dowolnej warto\u015bci innej ni\u017c alfanumeryczna.<\/span><\/p>\n Na przyk\u0142ad, je\u015bli imi\u0119 i nazwisko zostan\u0105 oddzielone przecinkiem, funkcja Separate()<\/strong> zostanie automatycznie podzielona na podstawie po\u0142o\u017cenia przecinka:<\/span><\/p>\n Pe\u0142n\u0105 dokumentacj\u0119 online dotycz\u0105c\u0105 funkcji Separate()<\/strong> mo\u017cna znale\u017a\u0107 tutaj<\/a> .<\/span><\/p>\n Poni\u017csze samouczki wyja\u015bniaj\u0105, jak wykonywa\u0107 inne typowe operacje w j\u0119zyku R:<\/span><\/p>\n Jak po\u0142\u0105czy\u0107 dwie kolumny w jedn\u0105 w R<\/a> Mo\u017cesz u\u017cy\u0107 jednej z dw\u00f3ch metod, aby podzieli\u0107 kolumn\u0119 na wiele kolumn w R: Metoda 1: U\u017cyj str_split_fixed() library (stringr) df[c(’ col1 ’, ’ col2 ’)] <- str_split_fixed(df$original_column, ’ sep ’, 2) Metoda 2: U\u017cyj oddzielnej() library (dplyr) library (tidyr) df %>% separate(original_column, c(’ col1 ’, ’ col2 ’)) Poni\u017csze przyk\u0142ady pokazuj\u0105, jak zastosowa\u0107 ka\u017cd\u0105 […]<\/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-2218","post","type-post","status-publish","format-standard","hentry","category-przewodnik"],"yoast_head":"\n library<\/span> (stringr)\n\ndf[c(' col1<\/span> ', ' col2<\/span> ')] <- str_split_fixed(df$original_column, ' sep<\/span> ', 2)\n<\/strong><\/pre>\n library<\/span> (dplyr)\nlibrary<\/span> (tidyr)\n\ndf %>% separate(original_column, c(' col1<\/span> ', ' col2<\/span> '))\n<\/strong><\/pre>\n Metoda 1: U\u017cyj str_split_fixed()<\/strong><\/span><\/h3>\n
#create data frame<\/span>\ndf <- data. frame<\/span> (player=c('John_Wall', 'Dirk_Nowitzki', 'Steve_Nash'),\n dots=c(22, 29, 18),\n assists=c(8, 4, 15))\n\n#view data frame\n<\/span>df\n\n player points assists\n1 John_Wall 22 8\n2 Dirk_Nowitzki 29 4\n3 Steve_Nash 18 15<\/strong><\/span><\/pre>\n library<\/span> (stringr)<\/span>\n\n#split 'player' column using '_' as the separator<\/span>\ndf[c(' First<\/span> ', ' Last<\/span> ')] <- str_split_fixed(df$player, ' _<\/span> ', 2)\n\n#view updated data frame\n<\/span>df\n\n player points assists First Last\n1 John_Wall 22 8 John Wall\n2 Dirk_Nowitzki 29 4 Dirk Nowitzki\n3 Steve_Nash 18 15 Steve Nash<\/strong><\/span><\/pre>\n #rearrange columns and leave out original 'player' column\ndf_final <- df[c('First', 'Last', 'points', 'assists')]\n\n#view updated data frame<\/span>\ndf_final\n\n First Last points assists\n1 John Wall 22 8\n2 Dirk Nowitzki 29 4\n3 Steve Nash 18 15<\/span><\/span><\/strong><\/pre>\n Metoda 2: U\u017cyj oddzielnej()<\/strong><\/span><\/h3>\n
library<\/span> (dplyr)<\/span>\nlibrary<\/span> (tidyr)<\/span>\n\n#create data frame<\/span>\ndf <- data. frame<\/span> (player=c('John_Wall', 'Dirk_Nowitzki', 'Steve_Nash'),\n dots=c(22, 29, 18),\n assists=c(8, 4, 15))\n\n#separate 'player' column into 'First' and 'Last'\n<\/span>df %>% separate(player, c(' First<\/span> ', ' Last<\/span> '))\n\n First Last points assists\n1 John Wall 22 8\n2 Dirk Nowitzki 29 4\n3 Steve Nash 18 15\n<\/strong><\/span><\/pre>\n library<\/span> (dplyr)\nlibrary<\/span> (tidyr)<\/span>\n\n#create data frame<\/span>\ndf <- data. frame<\/span> (player=c('John,Wall', 'Dirk,Nowitzki', 'Steve,Nash'),\n dots=c(22, 29, 18),\n assists=c(8, 4, 15))\n\n#separate 'player' column into 'First' and 'Last'\n<\/span>df %>% separate(player, c(' First<\/span> ', ' Last<\/span> '))\n\n First Last points assists\n1 John Wall 22 8\n2 Dirk Nowitzki 29 4\n3 Steve Nash 18 15<\/strong><\/span><\/pre>\n Dodatkowe zasoby<\/strong><\/span><\/h3>\n
Jak posortowa\u0107 ramk\u0119 danych wed\u0142ug kolumny w R<\/a>
Jak doda\u0107 kolumny do ramki danych w R<\/a><\/p>\n","protected":false},"excerpt":{"rendered":"