|
| |
| |
|
|
|
2, 3, 7, 37, 149, 853, 1361, 1597, 1861, 4391, 4919, 10487, 12037, 15991, 27581, 334421
(list; graph; refs; listen; history; internal format)
|
|
|
|
OFFSET
| 1,1
|
|
|
COMMENTS
| RECORDS transform of A079387.
|
|
|
LINKS
| N. J. A. Sloane, Transforms
|
|
|
PROG
| (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: A135907 A165744 A034900 * A183605 A000317 A047024
Adjacent sequences: A079385 A079386 A079387 * A079389 A079390 A079391
|
|
|
KEYWORD
| nonn
|
|
|
AUTHOR
| N. J. A. Sloane (njas(AT)research.att.com), 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
|
| |
|
|