|
Search: id:A063765
|
|
|
| A063765 |
|
Least integer m whose largest prime factor > m^(n/(n+1)). |
|
+0 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
(list; graph; listen)
|
|
|
OFFSET
|
1,1
|
|
|
COMMENT
|
a(n) > 2^(n+1); in fact a(n) = 2 * first prime which exceeds 2^n.
|
|
MATHEMATICA
|
k = 2; Do[ While[ PrimeQ[ k ] || FactorInteger[ k ] [[ -1, 1 ] ] <= k^(n/(n + 1)), k++ ]; Print[ k ], {n, 1, 35} ]
|
|
CROSSREFS
|
2*A014210(n).
Sequence in context: A157037 A082917 A108605 this_sequence A085712 A145351 A166305
Adjacent sequences: A063762 A063763 A063764 this_sequence A063766 A063767 A063768
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
Robert G. Wilson v (rgwv(AT)rgwv.com), Aug 14 2001
|
|
|
Search completed in 0.003 seconds
|