Xi'*_*'an 2 r digits number-theory
我已经看过过去的解决方案,但忘了哪里:是否有一个R函数将x = 1234变成其数字(1,2,3,4),反之亦然?
a <- c("1234")
res <- strsplit(a,"")
res
#[[1]]
#[1] "1" "2" "3" "4"
Run Code Online (Sandbox Code Playgroud)
请注意,如果a是数字向量,则应首先将其强制转换为字符串.如果需要,您可以稍后将结果重新转换为数字.只要您res在最初返回的列表表单中留下,以下命令就会为您执行此操作.
lapply(res,as.numeric)
#[[1]]
#[1] 1 2 3 4
Run Code Online (Sandbox Code Playgroud)
res将包含一个列表,每个输入字符串包含一个项目,每个字符在向量中分配给它自己的元素.在这种情况下,只有一个输入字符串,因此输出中只有一个列表项(包含向量).
可以使用以下paste()功能执行反向操作:
a<-c(5,2,8,0)
paste(a,collapse="")
Run Code Online (Sandbox Code Playgroud)
你可能想要把它包paste起来as.numeric()