利用给定的stringr::words中的常用单词语料库，创建正则表达式以找出满足下列条件的所有单词。 1. 以 y 开头的单词。 2. 以 x 结尾的单词。 3. 长度正好为 2 个字符的单词。 4. 具有 10 个或更多字符的单词。 5. 有连续 3 个或更多元音字母的单词

在R语言中，可以使用`stringr`包中的`str_extract_all()`函数结合正则表达式来完成这个任务。首先，我们需要加载`stringr`包并准备一个包含常用单词的语料库。然后，我们可以构造五个相应的正则表达式规则来匹配上述条件。

以下是每个规则对应的正则表达式：

1. 以 'y' 开头的单词: `^y`
2. 以 'x' 结尾的单词: `$x`
3. 长度为 2 的单词: `[a-z]{2}`
4. 有 10 或更多个字符的单词: `[a-zA-Z]{10,}`
5. 连续 3 个或更多元音字母: `(.)\1{2}` (这里假设元音字母包括'a', 'e', 'i', 'o', 'u')

接下来，将这些正则表达式组合成一个大正则表达式，并应用到实际的单词语料库上：

library(stringr)

# 假设我们有一个叫做word_corpus的词典
word_corpus <- c(...) # 用实际的单词列表替换...

# 创建正则表达式
regex <- paste(c("^y", "$x", "[a-z]{2}", "[a-zA-Z]{10,}", "(.)\\1{2}"), collapse = "|")

# 提取满足所有条件的单词
matched_words <- str_extract_all(word_corpus, regex)

最后，`matched_words`是一个list，其中包含了所有满足条件的单词列表。你可以通过遍历这个列表来查看结果。