regex - 文字列の最後から 2 番目の単語を抽出する

Question

Python で行う方法は知っていますが、R で動作させることはできません。

> string  <- "this is a sentence"
> pattern <- "\b([\w]+)[\s]+([\w]+)[\W]*?$"
Error: '\w' is an unrecognized escape in character string starting "\b([\w"
> match   <- regexec(pattern, string)
> words   <- regmatches(string, match)
> words
[[1]]
character(0)

Answer 1

非正規表現ソリューション:

string  <- "this is a sentence"
split <- strsplit(string, " ")[[1]]
split[length(split)-1]