A065606 The (7^n)-th composite number.

4, 14, 69, 426, 2811, 18964, 129796, 894425, 6189788, 42955634, 298658894, 2079246204, 14489671674, 101048453166, 705093892472, 4922191483150, 34373676895999, 240115703266097, 1677722277599685, 11724848294191033, 81953661525423276, 572918021989157017

Offset

0,1

Links

Table of n, a(n) for n=0..21.

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[7^n], {n, 0, 16} ]

Crossrefs

Sequence in context: A274804 A294222 A005501 * A049372 A050549 A222980

Adjacent sequences: A065603 A065604 A065605 * A065607 A065608 A065609

Keyword

nonn

Author

Robert G. Wilson v, Nov 27 2001

Extensions

Corrected and extended by Chai Wah Wu, Apr 20 2018

Status

approved