在R中，可以使用tm包中的stopwords()函数获取停用词列表。然后，可以使用正则表达式来删除停用词列表中的复合字母。

下面是一个示例代码：

library(tm)

# 获取停用词列表
stopwords_list <- stopwords()

# 定义要删除的复合字母的正则表达式
pattern <- "\\b\\w{2,}\\b"

# 删除停用词列表中的复合字母
filtered_stopwords <- grep(pattern, stopwords_list, value = TRUE, invert = TRUE)

# 打印过滤后的停用词列表
print(filtered_stopwords)

在上面的代码中，首先加载tm包。然后，使用stopwords()函数获取停用词列表并存储在stopwords_list变量中。接下来，使用正则表达式\\b\\w{2,}\\b定义要删除的复合字母模式，其中\\b表示单词边界，\\w{2,}表示匹配至少两个连续的字母。然后，使用grep()函数应用正则表达式，将满足正则表达式模式的停用词筛选出来，并将结果存储在filtered_stopwords变量中。最后，打印出过滤后的停用词列表。

请注意，上述代码示例仅适用于英文文本，如果需要处理其他语言的文本，可能需要调整正则表达式的模式。