不管你成不承认，R的文字处理不如Python好，尽管也能用。
R可以创建字符向量，

> character(length = )

对于字符串，我们常需要合并、取出部分、统计长度，R中都需要函数。

# 合并
paste(x, y, sep = '')
# 统计长度
nchar(x)
# 取子串
substr(x, start = , stop = )

正则表达式的使用套路：

m <- regexpr('/art/[0-9]*/[0-9]*/[0-9]*/art_[0-9]*_[0-9]*.html', c[j])
c[j] <- substr(c[j], m, attr(m, "match.length") - 1 + m)