|
|
A111875
|
|
Concatenate the consecutive increasing numbers starting with prime(n) and ending with prime(n+1).
|
|
6
|
|
|
23, 345, 567, 7891011, 111213, 1314151617, 171819, 1920212223, 23242526272829, 293031, 31323334353637, 3738394041, 414243, 4344454647, 47484950515253, 53545556575859, 596061, 61626364656667, 6768697071, 717273, 73747576777879
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,1
|
|
LINKS
|
|
|
EXAMPLE
|
a(4)=7891011 because the 4th prime is 7 and the 5th is 11 and we concatenate those with the increasing numbers between.
|
|
MATHEMATICA
|
ccd[{a_, b_}]:=FromDigits[Flatten[IntegerDigits/@Range[a, b]]]; ccd/@ Partition[ Prime[ Range[30]], 2, 1] (* Harvey P. Dale, Jun 08 2015 *)
|
|
CROSSREFS
|
|
|
KEYWORD
|
easy,nonn,base
|
|
AUTHOR
|
|
|
STATUS
|
approved
|
|
|
|