![](/img/trans.png)
[英]How to separate a column of strings into multiple columns, each containing a single char of a string, with strings of unequal length and no separator?
[英]split column containing strings of unequal length into multiple columns in R
我有一個這樣的數據框-
uniq = data.frame(Freq = c(172,4,50,3),
seq = c("G","G G T G T","G G T T","T G T T A T T"))
我想將第二列拆分為多個列,而無需重復。 字符串之間用空格分隔。
我嘗試使用下面的代碼,但這會將值從較小的字符串復制到較長的字符串的長度-
within(uniq, uniq_seq <-data.frame(do.call('rbind', strsplit(as.character(uniq[,2]), ' '))))
謝謝你的幫助!
絕對是一個奇怪的要求,但是使用tidyverse絕對可以。
library(tidyverse)
df <- uniq %>%
mutate(n = row_number()) %>%
separate_rows(seq, sep = ' ') %>%
group_by(n, Freq) %>%
mutate(n2 = row_number()) %>%
spread(n2, seq) %>%
select(-n)
Freq `1` `2` `3` `4` `5` `6` `7`
<dbl> <chr> <chr> <chr> <chr> <chr> <chr> <chr>
1 3 T G T T A T T
2 4 G G T G T NA NA
3 50 G G T T NA NA NA
4 172 G NA NA NA NA NA NA
聲明:本站的技術帖子網頁,遵循CC BY-SA 4.0協議,如果您需要轉載,請注明本站網址或者原文地址。任何問題請咨詢:yoyou2525@163.com.