#R, 34 bytes function(n)strtoi(paste0(1:n+n:1)) Uses strtoi to coerce to integer.