[go: up one dir, main page]

login
Concatenation of n and n + 3.
2

%I #17 Feb 17 2024 10:29:43

%S 14,25,36,47,58,69,710,811,912,1013,1114,1215,1316,1417,1518,1619,

%T 1720,1821,1922,2023,2124,2225,2326,2427,2528,2629,2730,2831,2932,

%U 3033,3134,3235,3336,3437,3538,3639,3740,3841,3942,4043,4144,4245

%N Concatenation of n and n + 3.

%t Table[FromDigits[Join[IntegerDigits[n],IntegerDigits[n+3]]],{n,50}] (* _Harvey P. Dale_, Jul 11 2011 *)

%t #[[1]]*10^IntegerLength[#[[2]]]+#[[2]]&/@Table[{n,n+3},{n,50}] (* _Harvey P. Dale_, May 21 2018 *)

%Y Cf. A001704, A020338.

%K nonn,base

%O 1,1

%A _Patrick De Geest_, May 15 1998