|
Search: id:A152446
|
|
|
| A152446 |
|
a(0) = 1. a(1) = 2. For n >= 2, a(n) = the largest prime <= a(n-1)*a(n-2). |
|
+0
2
|
|
| 1, 2, 2, 3, 5, 13, 61, 787, 47981, 37761019, 1811811452611, 68415846686461570603, 123956614566609409301849965194431, 8480596737961958410971738003633556174455988528911421
(list; graph; listen)
|
|
|
OFFSET
|
0,2
|
|
|
LINKS
|
Leroy Quet, Home Page (listed in lieu of email address)
|
|
MATHEMATICA
|
a = {1, 2}; Do[AppendTo[a, Prime[PrimePi[a[[ -1]]*a[[ -2]]]]], {9}]; a [From Stefan Steinerberger (stefan.steinerberger(AT)gmail.com), Dec 06 2008]
|
|
CROSSREFS
|
A152445
Sequence in context: A065843 A111264 A065994 this_sequence A055937 A090255 A080669
Adjacent sequences: A152443 A152444 A152445 this_sequence A152447 A152448 A152449
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
Leroy Quet Dec 04 2008
|
|
EXTENSIONS
|
Extended by Ray Chandler (rayjchandler(AT)sbcglobal.net) and Stefan Steinerberger (stefan.steinerberger(AT)gmail.com), Dec 05 2008
|
|
|
Search completed in 0.002 seconds
|
