我有一个类似于以下示例的数据框df它由一个字符变量组成VAR.
df<-data.frame(ID = 1:2,
VAR = c("VAL1\r\nVAL2\r\nVAL8","VAL2\r\nVAL5"),
stringsAsFactors = FALSE)
# ID VAR
# 1 1 VAL1\r\nVAL2\r\nVAL8
# 2 2 VAL2\r\nVAL5
我想用回车符分隔字符变量 - 换行符\r\n并获取下面所需的数据框：
# ID VAR
# 1 1 VAL1
# 2 1 VAL2
# 3 1 VAL8
# 4 2 VAL2
# 5 2 VAL5
我编写了如下代码，但我不知何故迷失了gather函数，同时尝试将数据帧的格式更改为长格式。
library(tidyverse)
df <- df %>%
bind_cols(as.data.frame(str_split(df$VAR,"\r\n",simplify = TRUE))) %>%
select(-VAR) %>%
gather(key,value)
请指教。
我们可以这样做separate_rows
library(tidyr)
separate_rows(df, VAR, sep='\\s+')
本文内容由网友自发贡献，版权归原作者所有，本站不承担相应法律责任。如您发现有涉嫌抄袭侵权的内容，请联系:hwhale#tublm.com(使用前将#替换为@)
