A111875 Concatenate the consecutive increasing numbers starting with prime(n) and ending with prime(n+1).
23, 345, 567, 7891011, 111213, 1314151617, 171819, 1920212223, 23242526272829, 293031, 31323334353637, 3738394041, 414243, 4344454647, 47484950515253, 53545556575859, 596061, 61626364656667, 6768697071, 717273, 73747576777879
Offset: 1
Examples
a(4)=7891011 because the 4th prime is 7 and the 5th is 11 and we concatenate those with the increasing numbers between.
Links
- Harvey P. Dale, Table of n, a(n) for n = 1..1000
Programs
-
Mathematica
ccd[{a_,b_}]:=FromDigits[Flatten[IntegerDigits/@Range[a,b]]]; ccd/@ Partition[ Prime[ Range[30]],2,1] (* Harvey P. Dale, Jun 08 2015 *)