检查当前单词之前是否有多个单词。-checkifmultiplewordsprecedecurrentword

3  

\w matches a word character, but in this case it seems you need to account for the hyphen and use a quantifier.

\w匹配一个单词字符，但在这种情况下，似乎需要考虑连字符并使用量词。

x <- c('Random Inc', 'A Non-Random Inc', 'Another Inc', 'A Random other Inc')
sub('[\\w-]+ [\\w-]+\\K *Inc', '', x, perl=TRUE)
# [1] "Random Inc"     "A Non-Random"   "Another Inc"    "A Random other"

First we match any character of word characters, hyphen "one or more" times followed by whitespace followed by word characters, hyphen "one or more" times. The \K escape sequence resets the starting point of the reported match and any previously consumed characters are no longer included. Then we match whitespace "zero or more" times followed by the word Inc. Since we use \K, we use an empty replacement because \K acts as a zero-width assertion.

首先，我们匹配任何字符的字，连字符“一个或多个”时间，然后是空格，然后是单词字符，连字符“一个或多个”时间。\K转义序列重新设置所报告的匹配的起始点，不再包含以前使用的任何字符。然后我们匹配空格“0或更多”的时间，后面跟着单词Inc。由于我们使用了\K，我们使用了一个空的替换，因为\K充当了一个零宽度断言。

1  

You can use a regex like this:

您可以使用这样的regex:

([-\w]+\s+[-\w]+)\s+Inc

Working demo

演示工作

0  

I think you mean one or more non-space characters as complete word. If yes, then you could use \S+.

我想你的意思是一个或多个非空格字符作为完整的单词。如果是的话，你可以用\S+。

> x <- c('Random Inc', 'A Non-Random Inc', 'Another Inc', 'A Random other Inc')
> sub("^\\S+(?:\\s+\\S+)?$(*SKIP)(*F)|\\s+Inc\\b", "", x, perl=T)
[1] "Random Inc"     "A Non-Random"   "Another Inc"    "A Random other"

• ^\\S+(?:\\s+\\S+)?$ Matches the line which has exactly one or two words.
• ^ \ \ S +(?:\ \ S + \ \ S +)?$匹配正好有一两个字的行。
• (*SKIP)(*F) Causes the match to Fail.
• (*SKIP)(*F)导致匹配失败。
• | OR (ie, consider only the remaining part of the string)
• |或(即，只考虑字符串的其余部分)
• \\s+Inc\\b Matche Inc and also the preceding one or more space characters.
• \s+ \b \b Matche Inc以及前面的一个或多个空格字符。