|
|
A101445
|
|
Numbers n such that n is the largest prime factor of 1 + prime(n).
|
|
0
|
|
|
|
OFFSET
|
1,1
|
|
COMMENTS
|
No more terms below the (10^7)-th prime, i.e., 179424673. - Robert G. Wilson v, Jan 21 2005
|
|
LINKS
|
|
|
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
|
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
|
|
STATUS
|
approved
|
|
|
|