如何在字符中插入分隔符（逗号）？
How to insert separator (comma) in a character?
如何使用 R 将 @ManuelaSchwesig@sigmargabriel@nahles 更改为 @ManuelaSchwesig、@sigmargabriel、@nahles？
我们可以尝试通过在小写字母和 @ 字符的连接处拆分来创建 vector 字符串来使用正则表达式环视。在这里，strsplit 的模式是一个正的正则表达式后视 ((?<=[a-z]))，然后是一个正的正则表达式前视 ((?=@))。在字符串中，有两个匹配的实例，即在 g 和 @ (Schweig@sigma) 之间以及在 (gabriel@nahles) 中的 l 和 @ 之间的拆分这些字符
strsplit(str1, "(?<=[a-z])(?=@)", perl = TRUE)[[1]]
#[1] "@ManuelaSchwesig" "@sigmargabriel" "@nahles"
如果我们需要将其保留为单个字符串并且objective是插入一个,
gsub("([a-z])@", "\1,@", str1)
#[1] "@ManuelaSchwesig,@sigmargabriel,@nahles"
数据
str1 <- "@ManuelaSchwesig@sigmargabriel@nahles"
如何使用 R 将 @ManuelaSchwesig@sigmargabriel@nahles 更改为 @ManuelaSchwesig、@sigmargabriel、@nahles？
我们可以尝试通过在小写字母和 @ 字符的连接处拆分来创建 vector 字符串来使用正则表达式环视。在这里，strsplit 的模式是一个正的正则表达式后视 ((?<=[a-z]))，然后是一个正的正则表达式前视 ((?=@))。在字符串中，有两个匹配的实例，即在 g 和 @ (Schweig@sigma) 之间以及在 (gabriel@nahles) 中的 l 和 @ 之间的拆分这些字符
strsplit(str1, "(?<=[a-z])(?=@)", perl = TRUE)[[1]]
#[1] "@ManuelaSchwesig" "@sigmargabriel" "@nahles"
如果我们需要将其保留为单个字符串并且objective是插入一个,
gsub("([a-z])@", "\1,@", str1)
#[1] "@ManuelaSchwesig,@sigmargabriel,@nahles"
数据
str1 <- "@ManuelaSchwesig@sigmargabriel@nahles"