%I #14 Dec 07 2019 12:18:29

%S 1,2,3,4,0,3,7,0,5,10,11,0,0,0,3,16,0,0,8,5,21,22,0,0,0,0,0,3,29,0,0,

%T 0,12,0,14,36,37,0,0,0,0,0,8,0,10,46,0,0,0,0,17,0,0,5,21,56,0,0,0,0,0,

%U 0,0,0,0,3,67,0,0,0,0,0,23,0,12,19,27,78,79,0,0,0,0,0,0,0,0,0,0,0,3,92,0,0,0,0,0,0,30,0,0,0,0,5,21,106,0,0,0,0,0,0,0,0,0,17,0,8,0,21

%N Triangle A286249 reversed.

%C See A286249.

%H Antti Karttunen, <a href="/A286248/b286248.txt">Table of n, a(n) for n = 1..10585; the first 145 rows of triangle/antidiagonals of array</a>

%F T(n,k) = A286249(k,n).

%o (Scheme) (define (A286248 n) (A286249tr (A002024 n) (A004736 n))) ;; For A286249tr, see A286249.

%o (Python)

%o from sympy import factorint

%o import math

%o def T(n, m): return ((n + m)**2 - n - 3*m + 2)/2

%o def P(n):

%o f = factorint(n)

%o return sorted([f[i] for i in f])

%o def a046523(n):

%o x=1

%o while True:

%o if P(n) == P(x): return x

%o else: x+=1

%o def t(n, k): return 0 if n%k!=0 else T(a046523(n/k), k)

%o for n in range(1, 21): print [t(n, k) for k in range(1, n + 1)][::-1] # _Indranil Ghosh_, May 08 2017

%Y Transpose: A286249 (triangle reversed).

%K nonn,tabl

%O 1,2

%A _Antti Karttunen_, May 06 2017