|
|
A065525
|
|
The (6^n)-th composite number.
|
|
0
|
|
|
4, 12, 52, 275, 1539, 8883, 51974, 306464, 1815791, 10791313, 64266028, 383289080, 2288430270, 13674181949, 81759268145, 489087871679, 2926904894187, 17521456528700, 104917324472297, 628377368081285, 3764220848092978, 22552713068921032, 135139349515525416
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
0,1
|
|
LINKS
|
|
|
FORMULA
|
a[n] = PrimePi[a[n]]+6^n+1.
|
|
EXAMPLE
|
a[4] = 1539 = PrimePi[1539]+6^4+1 = 242+1296+1.
|
|
MATHEMATICA
|
Composite[n_Integer] := Block[ {k = n + PrimePi[n] + 1 }, While[ k != n + PrimePi[k] + 1, k = n + PrimePi[k] + 1]; Return[ k ]]; Table[ Composite[6^n], {n, 0, 17} ]
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
|
|
EXTENSIONS
|
|
|
STATUS
|
approved
|
|
|
|