|
| |
|
|
A101445
|
|
Numbers n such that n is the largest prime factor of 1 + prime(n).
|
|
0
| | |
|
|
|
OFFSET
| 1,1
|
|
|
EXAMPLE
| 3 = the largest factor of 1 + prime(3) = 6, so 3 belongs to the sequence.
|
|
|
MATHEMATICA
| Select[ Prime[ Range[ 10^7]], Transpose[ FactorInteger[ Prime[ # ] + 1]][[1, -1]] == # &]
|
|
|
CROSSREFS
| Sequence in context: A115640 A197635 A171161 * A128668 A038537 A120313
Adjacent sequences: A101442 A101443 A101444 * A101446 A101447 A101448
|
|
|
KEYWORD
| nonn
|
|
|
AUTHOR
| Joseph L. Pe (joseph_l_pe(AT)hotmail.com), Jan 18 2005
|
|
|
EXTENSIONS
| No more terms below the 10^7-th prime or 179424673. - Robert G. Wilson v Jan 21 2005.
|
| |
|
|