|
Search: id:A079388
|
|
| |
|
| 2, 3, 7, 37, 149, 853, 1361, 1597, 1861, 4391, 4919, 10487, 12037, 15991, 27581, 334421
(list; graph; listen)
|
|
|
OFFSET
|
1,1
|
|
|
COMMENT
|
RECORDS transform of A079387.
|
|
LINKS
|
N. J. A. Sloane, Transforms
|
|
PROGRAM
|
(PARI) \p20000 P(x)=local(y); y=ceil(1/x); if(isprime(y), y, nextprime(y)); F(x)=local(y, i, t1); y=x; t1=vector(10000); for(i=1, 10000, p=P(y); t1[i]=p; y=p*y-1); t1 v=F(sqrt(3)-1); m=0; for(i=1, length(v), if(v[i]>m, print1(v[i], ", "); m=v[i])) (Herrgesell)
|
|
CROSSREFS
|
Cf. A079387, A079389, A079366-A079368.
Sequence in context: A004026 A135907 A034900 this_sequence A000317 A047024 A037843
Adjacent sequences: A079385 A079386 A079387 this_sequence A079389 A079390 A079391
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
njas, Feb 16 2003
|
|
EXTENSIONS
|
More terms from Lambert Herrgesell (zero815(AT)googlemail.com), Dec 06 2005
Corrected by T. D. Noe (noe(AT)sspectra.com), Nov 15 2006
|
|
|
Search completed in 0.002 seconds
|
