r - 如何在R中反转字符串

Question

我正在尝试自学 R，在做一些示例问题时，我遇到了反转字符串的需要。

这是我到目前为止所尝试过的，但粘贴操作似乎没有任何效果。

一定有一些我不理解列表的地方？ (我也不明白为什么在 strsplit 之后需要 [[1]]。)

test <- strsplit("greg", NULL)[[1]]
test
# [1] "g" "r" "e" "g"

test_rev <- rev(test)
test_rev
# [1] "g" "e" "r" "g"

paste(test_rev)
# [1] "g" "e" "r" "g"

Answer 1

来自 ?strsplit，一个函数，它将反转字符串向量中的每个字符串:

## a useful function: rev() for strings
strReverse <- function(x)
        sapply(lapply(strsplit(x, NULL), rev), paste, collapse="")
strReverse(c("abc", "Statistics"))
# [1] "cba"        "scitsitatS"