將配對數據讀入 R

Question

我有一堆配對數據，我想讀入 R 中的變量，但我無法弄清楚語法。 數據是以下格式的文本：

(dist1, time1) (dist2, time2) (dist3, time3) ... etc.

我試過將其作為 data.frame、data.table 或 list 讀入。 但是，當我嘗試這樣的事情時

x <- data.frame((dist1, time1), (dist2, time2), (dist3, time3))

我收到錯誤：錯誤：意外的 ',' in "x <- data.frame((0.10,"

感謝您的任何/所有幫助。

Answer 1

我們可以使用mget來獲取list的對象，然后與Map連接在一起

x <- do.call(cbind, Map(cbind, 
       mget(ls(pattern= '^dist\\d+$')), 
       mget(ls(pattern = '^time\\d+$'))))

---

它也可以用

data.frame(mget(c(rbind(paste0('dist', 1:3), paste0('time', 1:3)))))

更新

如果我們想從字符串中讀取，請使用readLines

v1 <- readLines(textConnection('(0.010, 0.570) (0.017, 0.677) (0.224, 0.705)'))
df1 <- read.csv(text = gsub("[()]", "", 
      gsub("\\) \\(", "\n", v1)), header = FALSE)

-輸出

df1
#     V1    V2
#1 0.010 0.570
#2 0.017 0.677
#3 0.224 0.705