我只写了一个,但我想知道是否已经存在于R.
这是BTW的功能(欢迎提出改进建议):
set.seed(50)
x <- sample(c(letters, LETTERS), 7)
is.lower <- function(x)
{
unlist(sapply(x, function(x2) {x2 %in% letters}))
}
is.lower(x)
Run Code Online (Sandbox Code Playgroud)
Jor*_*eys 13
grepl("[a-z]",x) 例如?
> grepl("[a-z]",x)
[1] FALSE TRUE TRUE FALSE TRUE TRUE FALSE
Run Code Online (Sandbox Code Playgroud)
为什么让它变得困难?
> x %in% letters
[1] FALSE TRUE TRUE FALSE TRUE TRUE FALSE
Run Code Online (Sandbox Code Playgroud)
无需自己动手.
| 归档时间: |
|
| 查看次数: |
4576 次 |
| 最近记录: |