OFFSET
1,3
EXAMPLE
Triangle begins:
1;
1,2;
1,2,4;
1,2,3,5;
1,2,3,4,7;
1,2,3,4,5,8;
PROG
(PARI) row(n) = {my(m=n*(n-1)/2, v); for(k=m+n, oo, v=List([1]); for(i=2, k-m, if(gcd(k, i)==1, listput(v, i))); if(#v>=n, forsubset([#v, n], w, if(sum(i=1, n, v[w[i]])==k, return(vector(n, i, v[w[i]])))))); } \\ Jinyuan Wang, May 23 2020
CROSSREFS
KEYWORD
nonn,tabl
AUTHOR
Amarnath Murthy, Mar 27 2003
EXTENSIONS
More terms from R. J. Mathar, Mar 23 2007
More terms from Jinyuan Wang, May 23 2020
STATUS
approved