login
A064424
Record high values in A064413.
3
1, 2, 4, 6, 9, 12, 15, 18, 21, 24, 33, 35, 39, 51, 57, 69, 70, 87, 93, 111, 123, 129, 141, 159, 177, 183, 201, 213, 219, 237, 249, 267, 291, 303, 309, 321, 327, 339, 381, 393, 411, 417, 447, 453, 471, 489, 501, 519, 537, 543, 573, 579, 591, 597
OFFSET
1,2
COMMENTS
RECORDS transform of A064413.
LINKS
J. C. Lagarias, E. M. Rains and N. J. A. Sloane, The EKG sequence, Exper. Math. 11 (2002), 437-446.
N. J. A. Sloane, Transforms
PROG
(PARI) A064424(N, show=0)={ my(a=min(N, 2), u=0, L=3, m); show & print1(1); for( k=3, N, m=a; show & print1(", "m); for( i=0, 1e9, bittest(u, i) & next; gcd(a, L+i)>1 | next; a=L+i; if( i, u+=1<<i, while( bittest(u, i++), ); u>>=i; L+=i); a>m & break; i=-1)); a } \\ - M. F. Hasler, Nov 28 2010
CROSSREFS
Sequence in context: A256393 A130664 A014011 * A067850 A130240 A143118
KEYWORD
nonn,easy
AUTHOR
N. J. A. Sloane, Sep 30 2001
EXTENSIONS
More terms from Naohiro Nomoto, Apr 21 2002
STATUS
approved