Using substring
is the best approach:
substring(x, seq(1, nchar(x), 2), seq(2, nchar(x), 2))
But here’s a solution with plyr:
library("plyr")
laply(seq(1, nchar(x), 2), function(i) substr(x, i, i+1))
Using substring
is the best approach:
substring(x, seq(1, nchar(x), 2), seq(2, nchar(x), 2))
But here’s a solution with plyr:
library("plyr")
laply(seq(1, nchar(x), 2), function(i) substr(x, i, i+1))