OFFSET
1,3
PROG
(PARI) lista(nn)={my(v=[1]); for(n=2, nn, a=0; q=n*(n+1)/2; for(j=1, n-1, if(gcd(v[j], q)==1, a++)); v=concat(v, a)); v} \\ Klaus Brockhaus, Aug 15 2006
CROSSREFS
KEYWORD
nonn,changed
AUTHOR
Leroy Quet, Aug 03 2006
EXTENSIONS
More terms from Klaus Brockhaus, Aug 15 2006
STATUS
approved