将字符串拆分为R中的数据帧

Question

我有以下格式的数据字符串str1 ；

str1 <- "([0.1,0.2,0.3,......],[timestamp('2019-03-09'),timestamp('2019-03-09'),timestamp('2019-03-09'), .....],[0.1,0.2,0.3,......],[true,false,true,false,.....])"

我需要将此字符串转换为数据帧df ，其中每个变量的值都是[ ]的子字符串。 例子如下图，

df

 A              B                 C         D
0.1  timestamp('2019-03-09')     0.1       True
0.2  timestamp('2019-03-09')     0.2       False
0.3  timestamp('2019-03-09')     0.3       True
0.4  timestamp('2019-03-09')     0.4       False

Answer 1

这似乎是Python代码...也许最好在Python中初始化并导出为csv或类似格式？

使用R在这里的任何地方有点原始：

library(magrittr)
strsplit(str1, "],[", fixed = TRUE)[[1]] %>% 
  gsub("^\\(\\[|\\]\\)$", "", .) %>% 
  lapply(strsplit, ",") %>% 
  as.data.frame() %>% 
  setNames(LETTERS[1:4])

#     A                        B   C     D
# 1 0.1  timestamp('2019-03-09') 0.1  true
# 2 0.2  timestamp('2019-03-09') 0.2 false
# 3 0.3  timestamp('2019-03-09') 0.3  true
# 4 0.4  timestamp('2019-03-09') 0.4 false

数据

str1 <- "([0.1,0.2,0.3,0.4],[timestamp('2019-03-09'),timestamp('2019-03-09'),timestamp('2019-03-09'), timestamp('2019-03-09')],[0.1,0.2,0.3,0.4],[true,false,true,false])"