A118508
Triangle read by rows: R(n,k) = A002808(n) mod A002808(k), 0
0, 2, 0, 0, 2, 0, 1, 3, 1, 0, 2, 4, 2, 1, 0, 0, 0, 4, 3, 2, 0, 2, 2, 6, 5, 4, 2, 0, 3, 3, 7, 6, 5, 3, 1, 0, 0, 4, 0, 7, 6, 4, 2, 1, 0, 2, 0, 2, 0, 8, 6, 4, 3, 2, 0, 0, 2, 4, 2, 0, 8, 6, 5, 4, 2, 0, 1, 3, 5, 3, 1, 9, 7, 6, 5, 3, 1, 0, 2, 4, 6, 4, 2
Offset: 1
Crossrefs
Cf. A002808.
Programs
-
Maple
A118508 := proc(n,k) A002808(n) mod A002808(k) ; end proc: seq(seq(A118508(n,k),k=1..n),n=1..15) ; # R. J. Mathar, Nov 26 2010