|
|
A104207
|
|
Concatenation of consecutive twin primes.
|
|
0
|
|
|
3557, 11131719, 29314143, 59617173, 101103107109, 137139149151, 179181191193, 197199227229, 239241269271, 281283311313, 347349419421, 431433461463, 521523569571, 599601617619, 641643659661, 809811821823, 827829857859, 88188310191021, 1031103310491051
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
0,1
|
|
LINKS
|
|
|
EXAMPLE
|
3557 is obtained by concatenating the consecutive pair of twin primes (3,5) and (5,7).
11131719 is obtained by concatenating the consecutive pair of twin primes (11,13) and (17,19).
|
|
MATHEMATICA
|
With[{ll=Select[Partition[Prime[Range[200]], 2, 1], Last[#]-First[#] == 2&]}, Table[FromDigits[Flatten[IntegerDigits/@Take[ll, {2n-1, 2n}]]], {n, 20}]] (* Harvey P. Dale, Oct 25 2011 *)
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn,base
|
|
AUTHOR
|
|
|
EXTENSIONS
|
|
|
STATUS
|
approved
|
|
|
|