OFFSET
1,2
LINKS
Michel Marcus, Antidiagonals n = 1..100, flattened
FORMULA
EXAMPLE
Triangle begins:
1;
4,4;
1,16,1;
4,4,4,4;
...
Array begins:
1 4 1 4 2 ...
4 16 4 16 8 ...
1 4 1 4 2 ...
4 16 4 16 8 ...
2 8 2 8 4 ...
...
PROG
(PARI) sqrt2(nn) = {my(r=0, x=2, list = List(), d); for(digits=1, nn, d=0; while((20*r+d)*d <= x, d++); d--; listput(list, d); x=100*(x-(20*r+d)*d); r=10*r+d; ); Vec(list); } \\ A002193
lista(nn) = {my(dd = sqrt2(nn)); for (n=1, nn, for (k=1, n, print1(dd[k]*dd[n-k+1], ", "))); } \\ Michel Marcus, Nov 11 2021
CROSSREFS
KEYWORD
AUTHOR
Douglas Stones (dssto1(AT)student.monash.edu.au), Sep 04 2004
EXTENSIONS
Offset changed to 1 and a(34)=1 inserted by Georg Fischer, Nov 02 2021
STATUS
approved