Question

我有字母和数字混合的字符串。我想分开他们并从他们那里判刑。

a<-"DiabetesTestInPast12months"
b<-"SmokingMorethan12PackYears"
c<-"30MinsOrLessExercise"

我想得到：

a<-"Diabetes test in past 12 months"
b<-"Smoking more than 12 pack years"
c<-"30 mins or less exercise"

我无法找到一种方法，可以使用stringr＆＃39; str_extract_all来提取矢量中的数字。

Answer 1

我试试：

#combine all the string in a vector
a<-c(a,b,c)
gsub("(?<=[0-9])(?=[A-Za-z])","\\1 \\2",
     gsub("(?<=[a-z])(?=[A-Z0-9])","\\1 \\2",a,perl=TRUE),
     perl=TRUE)
#[1] "Diabetes Test In Past 12 months" "Smoking Morethan 12 Pack Years" 
#[3] "30 Mins Or Less Exercise"

简化一点：

gsub("(?<=[a-z])(?=[A-Z0-9])|(?<=[0-9])(?=[A-Za-z])"," ",a,perl=TRUE)

得到相同的输出。

请注意Morethan无法拆分，因为无法知道单独的单词（MoreThan会）。

Answer 2

我正在研究c＃。请使用以下代码，您可以根据您的要求拆分字符串。

       `if (str.IsAllUpper()) return str;
        return Regex.Replace(str, "([A-Z]{1,2}|[0-9]+)", " $1").TrimStart();`

用数字和字母拆分字符串

2 个答案: