OFFSET
1
LINKS
Reinhard Zumkeller, Rows n = 1..1000 of triangle, flattened
FORMULA
EXAMPLE
. ---+--------------------+-------------------------+------------
. 1 | 1 | 1 | 1
. 2 | 1 0 | 1 2 | 2
. 3 | 1 1 | 1 3 | 2
. 4 | 1 0 0 | 1 2 4 | 3
. 5 | 1 1 | 1 5 | 2
. 6 | 1 0 1 0 | 1 2 3 6 | 4
. 7 | 1 1 | 1 7 | 2
. 8 | 1 0 0 0 | 1 2 4 8 | 4
. 9 | 1 1 1 | 1 3 9 | 3
. 10 | 1 0 1 0 | 1 2 5 10 | 4
. 11 | 1 1 | 1 11 | 2
. 12 | 1 0 1 0 0 0 | 1 2 3 4 6 12 | 6
. 13 | 1 1 | 1 13 | 2
. 14 | 1 0 1 0 | 1 2 7 14 | 4
. 15 | 1 1 1 1 | 1 3 5 15 | 4
. 16 | 1 0 0 0 0 | 1 2 4 8 16 | 5
. 17 | 1 1 | 1 17 | 2
. 18 | 1 0 1 0 1 0 | 1 2 3 6 9 18 | 6
. 19 | 1 1 | 1 19 | 2
. 20 | 1 0 0 1 0 0 | 1 2 4 5 10 20 | 6 .
PROG
(Haskell)
a247795 n k = a247795_tabf !! (n-1) !! (k-1)
a247795_row n = a247795_tabf !! (n-1)
a247795_tabf = map (map (flip mod 2)) a027750_tabf
(PARI) row(n) = apply(x->x%2, divisors(n)); \\ Michel Marcus, Jan 23 2022
CROSSREFS
KEYWORD
nonn,tabf
AUTHOR
Reinhard Zumkeller, Sep 28 2014
STATUS
approved