R - 基于文本模式拆分列

Question

我想在 R 中拆分一列，其中包含服装产品的尺寸、颜色和客户描述。

该列看起来像这样

尺码：AS - Adult Small, 颜色：黑色，销售者：Elmwood 尺寸：YS - Youth Small，颜色：黑色，销售者：Rosemary Brown PS 颜色 - 黑色，销售者：Rosemary Brown PS

所以，有些列有大小，有些以颜色开头

我需要制作三列 - 1. 尺寸 2. Colors 3. 销售者 尺寸 - 我只需要两个字母的尺寸代码，颜色 - 需要颜色描述 销售者：我需要解析它，直到找到任何“逗号” '

谢谢你的帮助

Answer 1

对于您给出的特定示例，这应该可以解决问题：

library(tidyverse)

df <- tribble(
  ~col1, 
  'Size: AS - Adult Small, Colours: Black , Sold By: Elmwood , Some Other Column: Other Data ',   
  'Size:YS - Youth Small, Colours: Black, Sold By: Rosemary Brown, Some Other Column: Other Data ',   
  'Colours: Black, Sold By: Rosemary Brown, Some Other Column: Other Data '
) %>% 
  mutate(
    size = str_trim(str_extract(col1, "(?<=Size:)[^,]*(?= -)")),
    colours = str_trim(str_extract(col1, "(?<=Colours:)[^,]*(?=,)")),
    sold_by = str_trim(str_extract(col1, "(?<=Sold By:)[^,]*(?=,)"))
  ) %>% 
  select(-col1)

OUTPUT：

# A tibble: 3 × 3
  size  colours sold_by       
  <chr> <chr>   <chr>         
1 AS    Black   Elmwood       
2 YS    Black   Rosemary Brown
3 NA    Black   Rosemary Brown