效果如下:
原数据
新数据
library(tidyr)
df <- read.csv("RGB_GO_background.csv",header=T)
df2 <-df %>% as_tibble() %>%
separate_rows(SprotGO, sep = "; ")
效果如下:
library(tidyr)
df <- read.csv("RGB_GO_background.csv",header=T)
df2 <-df %>% as_tibble() %>%
separate_rows(SprotGO, sep = "; ")
本文标题:R中一对多转换至一对一的格式
本文链接:https://www.haomeiwen.com/subject/fiopartx.html
网友评论