|
| |
|
|
A140867
|
|
Start of the first run of exactly n integers in A014134.
|
|
2
| |
|
|
8, 33, 88, 132, 1265, 768, 2657, 11413, 8755, 50965, 8453, 57258, 124486, 609703, 791190, 955961, 826855, 984638, 2095061, 4196516, 5776666, 6481631, 22355042, 42972320, 11873562, 70956435, 47737822, 57344057, 57651771, 191061462
(list; graph; refs; listen; history; internal format)
|
|
|
|
OFFSET
| 1,1
|
|
|
LINKS
| Donovan Johnson, Table of n, a(n) for n = 1..56 (terms < 10^12)
|
|
|
PROG
| (PARI) is_A014134(n)=for(k=0, sqrtint(n*2), issquare(n-k*(k+1)/2)&return); 1
/* length of run starting at n */
rl(n)=local(t=n); while(is_A014134(n++), ); n-t
/* print [ k, a[k] ] as defined above */
{s=0; for(n=1, 10^6, is_A014134(n)|next; t=n; while(is_A014134(n++), ); bittest(s, n-t)&next; s+=1<<(n-t); print1([n-t, t]", "))}
|
|
|
CROSSREFS
| Sequence in context: A022274 A118312 A204468 * A114105 A014820 A070736
Adjacent sequences: A140864 A140865 A140866 * A140868 A140869 A140870
|
|
|
KEYWORD
| nonn
|
|
|
AUTHOR
| David W. Wilson (davidwwilson(AT)comcast.net), Jan 05 2009
|
|
|
EXTENSIONS
| More terms and PARI code from M. F. Hasler, Jan 05 2009
a(19)-a(30) from Donovan Johnson (donovan.johnson(AT)yahoo.com), Feb 07 2009
|
| |
|
|
