使用data.table，您可以执行以下操作：

dt[, c("type", "color") := tstrsplit(label, " || ", fixed = TRUE)]

     category            label count    type color
1: Nagivation Product || Green     2 Product Green
2: Navigation  Survey || Green     5  Survey Green

样本数据：

dt <- data.table(category = c("Nagivation", "Navigation"),
                 label = c("Product || Green", "Survey || Green"),
                 count = c(2, 5))

我们可以使用tidyr::separate：

library(data.table)

dt1 <- fread("category     label            count
              Navigation   Product || Green     2
              Navigation   Survey || Green      5
              Navigation   Product || Red      10
              Navigation   Survey || Red       10")

tidyr::separate(dt1, label, sep = "\\|\\|", into = c("Type","Color"))

#>      category    Type   Color count
#> 1: Navigation Product   Green     2
#> 2: Navigation  Survey   Green     5
#> 3: Navigation Product     Red    10
#> 4: Navigation  Survey     Red    10

cbind(d, setNames(data.frame(do.call(rbind, strsplit(d$label, " || ", fixed = TRUE))),
         c("Type", "Color")))
#    category            label count     Type  Color
#1 Navigation Product || Green     2 Product   Green
#2 Navigation  Survey || Green     5  Survey   Green
#3 Navigation   Product || Red    10 Product     Red
#4 Navigation    Survey || Red    10  Survey     Red

数据

d = structure(list(category = c("Navigation", "Navigation", "Navigation", 
"Navigation"), label = c("Product || Green", "Survey || Green", 
"Product || Red", "Survey || Red"), count = c(2L, 5L, 10L, 10L
)), class = "data.frame", row.names = c(NA, -4L))