Разделение столбца в соответствии с разделителем и создание нового столбца

Question

Требуется помощь для разделения столбцов в соответствии с различными разделителями, с которыми я сталкиваюсь при использовании нескольких разделителей. Ниже приведены примеры данных и ожидаемый результат.

Пример данных

ContractCd <- c(9940099251,9940080497,9940099251,9940014221)

WBSElementNbr <- c("N1075001,N1075013,MT842001,N1128001,NN480001,N1142001,N1147001","IV768001&IU775001","NN480001;N1147001","D6268001/D6268005")

Sample Data
Data <- data.frame(ContractCd,WBSElementNbr)

Ожидаемый результат

ContractCd <- c(9940099251,
                9940099251,
                9940099251,
                9940099251,
                9940099251,
                9940099251,
                9940099251,
                9940080497,
                9940080497,
                9940099251,
                9940099251,
                9940014221,
                9940014221)

WBSElementNbr <- c("N1075001",
                   "N1075013",
                   "MT842001",
                   "N1128001",
                   "NN480001",
                   "N1142001",
                   "N1147001",
                   "IV768001",
                   "IU775001",
                   "NN480001",
                   "N1147001",
                   "D6268001",
                   "D6268005")

Expected Output
Data1 <- data.frame(ContractCd,WBSElementNbr)

Answer 1

Мы можем использовать separate_rows

library(tidyverse)
Data %>%
   separate_rows(WBSElementNbr)