A140867 Start of the first run of exactly n integers in A014134.

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

Offset: 1

Author

David W. Wilson, Jan 05 2009

Keywords

• nonn

Links

• Donovan Johnson, Table of n, a(n) for n = 1..56 (terms < 10^12)

Programs

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]","))}

Extensions

More terms and PARI code from M. F. Hasler, Jan 05 2009

a(19)-a(30) from Donovan Johnson, Feb 07 2009