login
The OEIS is supported by the many generous donors to the OEIS Foundation.

 

Logo
Hints
(Greetings from The On-Line Encyclopedia of Integer Sequences!)
A108583 Primes of the form 1 + Product_{j=1..k} b(j), where b(n) = b(n-1) + 2*A005185(n) and b(1) = 2. 2
3, 13, 2593, 2426113 (list; graph; refs; listen; history; text; internal format)
OFFSET
0,1
COMMENTS
Next term contains 886 digits. - G. C. Greubel, Dec 19 2022
LINKS
MATHEMATICA
Hofstadter[n_]:= Hofstadter[n]= If[n<2, 1, Hofstadter[n-Hofstadter[n- 1]] +Hofstadter[n-Hofstadter[n-2]]]; (* A005185 *)
b[n_]:= b[n]= If[n==1, 2, b[n-1] +2*Hofstadter[n]]; (* A108585 *)
p[n_]:= p[n]= Product[b[j], {j, n}];
Select[Table[p[n] +1, {n, 500}], PrimeQ]
CROSSREFS
Sequence in context: A177362 A138487 A022507 * A127855 A087333 A320041
KEYWORD
nonn,less
AUTHOR
Roger L. Bagula, Jul 05 2005
EXTENSIONS
Edited by G. C. Greubel, Dec 19 2022
STATUS
approved

Lookup | Welcome | Wiki | Register | Music | Plot 2 | Demos | Index | Browse | More | WebCam
Contribute new seq. or comment | Format | Style Sheet | Transforms | Superseeker | Recents
The OEIS Community | Maintained by The OEIS Foundation Inc.

License Agreements, Terms of Use, Privacy Policy. .

Last modified March 28 05:02 EDT 2024. Contains 371235 sequences. (Running on oeis4.)