自动字符串“子集”

Question

如果我有这样的东西：

paste0(1:3,sep=",")[3]

我想到了这样的东西：

paste0(1:3,sep=",")[length(.)] 

这显然是行不通的，但其想法是在不保存结果的情况下自动捕获结果。

问题 如何根据长度自动选择？我将范围缩小，因为我想解决的问题（删除paste0引入的最后一个逗号）可以使用类似gsub的解决方案来更好地解决。

预期产量

"3,"

或者更好，简单地：

"1,","2,","3"

谢谢。

Answer 1

如果我们要使用%>%

library(magrittr)
paste0(1:3,sep=",") %>%
        last
#[1] "3,"

或针对任何索引

paste0(1:3, sep=",") %>%
          magrittr::extract(., length(.))
#[1] "3,"

此外，要获取最后的输出

paste0(1:3,sep=",") %>% 
  replace(., length(.), substring(.[length(.)], 1, nchar(.[length(.)]) -1))
#[1] "1," "2," "3"