OFFSET
1,2
PROG
(PARI) lista(nn) = my(v = apply(f, [1..nn^2]), cols = vector(nn, i, select(x->(x==i), v, 1))); vector(nn, i, sum(j=1, i, cols[j][i-j+1])); \\ Michel Marcus, Jan 23 2023
CROSSREFS
KEYWORD
nonn
AUTHOR
Omar E. Pol, Aug 08 2009
EXTENSIONS
More terms from Michel Marcus, Jan 23 2023
Definition corrected by Omar E. Pol, Jan 24 2023
STATUS
approved