A063765 Least integer m whose largest prime factor > m^(n/(n+1)).

6, 10, 22, 34, 74, 134, 262, 514, 1042, 2062, 4106, 8198, 16418, 32822, 65542, 131074, 262202, 524294, 1048618, 2097166, 4194338, 8388638, 16777234, 33554518, 67108934, 134217758, 268435514, 536870918, 1073741846, 2147483654

Offset

1,1

Comments

a(n) > 2^(n+1); in fact a(n) = 2 * first prime which exceeds 2^n.

Links

Table of n, a(n) for n=1..30.

Formula

a(n) = 2 * A014210(n).

Mathematica

k = 2; Do[ While[ PrimeQ[ k ] || FactorInteger[ k ] [[ -1, 1 ] ] <= k^(n/(n + 1)), k++ ]; Print[ k ], {n, 1, 35} ]

Crossrefs

Cf. A014210.

Sequence in context: A339437 A108605 A216049 * A085712 A337190 A179875

Adjacent sequences: A063762 A063763 A063764 * A063766 A063767 A063768

Keyword

nonn

Author

Robert G. Wilson v, Aug 14 2001

Status

approved