拆分包含多个电话号码的数据框列

Question

例如，其中一行包含9343435445/9433445532。我想拆分它们并将各个单独的粘贴在一个新列中。 我尝试了以下内容。

bookings <- read.csv(file = 'bookings.csv', header = T)
bookings$set1 <- as.character(bookings$set1)
bookings$set3 <- gsub('\\/..........', '',bookings$set1)
bookings$set4 <- gsub('\\d{10}\\/', ' ',bookings$set1)

但是没有提供所需的输出。

Answer 1

您可以使用基础r（var indices = [0, 1, 2, 3, 4, 5, 6, 7, 8, 9], parts = 2; console.log(indices.map((i, _, a) => Math.floor(i * parts / a.length)));≥3.4.0）

中的strcapture

R

Answer 2

查看http://tidyr.tidyverse.org/reference/separate.html

这样的事情： separate(data = data, col = phonenumber, into = c("phonenumber1", "phonenumber2", sep = "/"))