OFFSET
1,7
LINKS
Wikipedia, Integer Triangle
FORMULA
MATHEMATICA
Table[Sum[Sum[(1 - KroneckerDelta[PrimeOmega[i], 2] KroneckerDelta[PrimeOmega[k], 2] KroneckerDelta[PrimeOmega[n - i - k], 2])*Sign[Floor[(i + k)/(n - i - k + 1)]], {i, k, Floor[(n - k)/2]}], {k, Floor[n/3]}], {n, 100}]
CROSSREFS
KEYWORD
nonn
AUTHOR
Wesley Ivan Hurt, May 19 2019
STATUS
approved