A032608 Concatenation of n and n + 3.
14, 25, 36, 47, 58, 69, 710, 811, 912, 1013, 1114, 1215, 1316, 1417, 1518, 1619, 1720, 1821, 1922, 2023, 2124, 2225, 2326, 2427, 2528, 2629, 2730, 2831, 2932, 3033, 3134, 3235, 3336, 3437, 3538, 3639, 3740, 3841, 3942, 4043, 4144, 4245
Offset: 1
Programs
-
Mathematica
Table[FromDigits[Join[IntegerDigits[n],IntegerDigits[n+3]]],{n,50}] (* Harvey P. Dale, Jul 11 2011 *) #[[1]]*10^IntegerLength[#[[2]]]+#[[2]]&/@Table[{n,n+3},{n,50}] (* Harvey P. Dale, May 21 2018 *)