|
Search: id:A134486
|
|
|
| A134486 |
|
a(0)=1. For n>=1, a(n) = the largest prime dividing n*a(n-1) + 1. |
|
+0
2
|
|
| 1, 2, 5, 2, 3, 2, 13, 23, 37, 167, 557, 383, 4597, 29881, 167, 179, 191, 29, 523, 4969, 211, 277, 53, 61, 293, 37, 107, 17, 53, 769, 23071, 661, 641, 1511, 137, 109, 157, 83, 631, 107, 1427, 14627, 122867, 103, 1511, 191, 101, 1187, 251, 41, 293, 467, 1619
(list; graph; listen)
|
|
|
OFFSET
|
0,2
|
|
|
LINKS
|
Leroy Quet, Home Page (listed in lieu of email address)
|
|
MATHEMATICA
|
a = {1, 2}; Do[AppendTo[a, FactorInteger[Length[a]*a[[ -1]] + 1][[ -1, 1]]], {70}]; a - Stefan Steinerberger (stefan.steinerberger(AT)gmail.com), Oct 30 2007
|
|
CROSSREFS
|
Similar to A134487 but with different value of a(0).
Sequence in context: A100955 A049413 A102707 this_sequence A088006 A078311 A132743
Adjacent sequences: A134483 A134484 A134485 this_sequence A134487 A134488 A134489
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
Leroy Quet Oct 28 2007
|
|
EXTENSIONS
|
More terms from Stefan Steinerberger (stefan.steinerberger(AT)gmail.com), Oct 30 2007
|
|
|
Search completed in 0.002 seconds
|
