OFFSET
0,5
LINKS
Rémy Sigrist, Table of n, a(n) for n = 0..8192
FORMULA
a(n) <= A048967(n).
a(2^k - 1) = 0 for any k >= 0.
EXAMPLE
The first terms, alongside the corresponding rows in A307239, are:
n a(n) Row n of A307239
-- ---- ------------------------------------------
0 0 1
1 0 1 1
2 1 1 2 1
3 0 1 3 3 1
4 2 1 2 6 2 1
5 2 1 3 2 2 3 1
6 3 1 2 5 2 5 2 1
7 0 1 3 7 7 7 7 3 1
8 2 1 2 10 14 14 14 10 2 1
9 0 1 3 6 6 14 14 6 6 3 1
10 2 1 2 3 6 10 14 10 6 3 2 1
PROG
(PARI) rad(n) = my (p=factor(n)[, 1]~); prod(i=1, #p, p[i])
{ for (r=0, 72, row = vector(r+1, k, if ( k==1||k==r+1, 1, rad(row[k-1]+row[k]))); print1 (sum(k=1, r+1, row[k]==2) ", ")) }
CROSSREFS
KEYWORD
nonn
AUTHOR
Rémy Sigrist, Apr 03 2019
STATUS
approved