我有字符矢量c("Mark Twain", "Phil Hall", "Michael Paul O'Connor", " ",...)
我想知道我的矢量中每个值的max
个字数是多少。
答案 0 :(得分:3)
这个怎么样:
test <- c("Mark Twain", "Phil Hall", "Michael Paul O'Connor")
max(sapply(gregexpr("\\W+", test), length))
[1] 3
答案 1 :(得分:3)
这有用吗?
d = c("Mark Twain", "Phil Hall", "Michael Paul O'Connor")
max(sapply(strsplit(d, ' '), length))
答案 2 :(得分:2)
这是使用qdap的wc
(字数)函数的方法:
test <- c("Mark Twain", "Phil Hall", "Michael Paul O'Connor")
library(qdap)
max(wc(test))
## > max(wc(test))
## [1] 3