OFFSET
1,1
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 *)
CROSSREFS
KEYWORD
nonn,base
AUTHOR
Patrick De Geest, May 15 1998
STATUS
approved