|
|
A134793
|
|
Concatenation of next n nonprime numbers.
|
|
0
|
|
|
1, 46, 8910, 12141516, 1820212224, 252627283032, 33343536383940, 4244454648495051, 525455565758606263, 64656668697072747576, 7778808182848586878890, 9192939495969899100102104105, 106108110111112114115116117118119120121
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,2
|
|
LINKS
|
Table of n, a(n) for n=1..13.
|
|
MATHEMATICA
|
Module[{upto=35, comps, nn}, nn=(upto(upto+1))/2; comps=Select[Range[nn], !PrimeQ[#]&]; Table[FromDigits[Flatten[IntegerDigits/@Take[comps, {((i-1)(i))/2+1, (i(i+1))/2}]]], {i, 25}]] (* Harvey P. Dale, Sep 10 2013 *)
|
|
CROSSREFS
|
Cf. A053067, A133013. Nonprime numbers: A018252.
Sequence in context: A243648 A302114 A159380 * A177639 A222097 A152501
Adjacent sequences: A134790 A134791 A134792 * A134794 A134795 A134796
|
|
KEYWORD
|
base,easy,nonn
|
|
AUTHOR
|
Omar E. Pol, Nov 26 2007
|
|
EXTENSIONS
|
More terms from Harvey P. Dale, Sep 10 2013
|
|
STATUS
|
approved
|
|
|
|