OFFSET
0,1
COMMENTS
Partial sums of the sequence 3,1,1,1,1,5,1,1,1,6,1,1,3,4,1,3,1,4,3,1,1,6,1,1,1,5,1,1,1,1,4,1,1,1,1,1,4, ... which has period 36.
FORMULA
G.f.: g(x)=3/(1-x)+ x/(1-x)^2+(4x^5+5x^9+2x^12+3x^13+2x^15+3x^17+2x^18+5x^21+3x^26+3x^32) /((1-x^36)(1-x)).
G.f.: g(x)=(3-2x+4x^5+5x^9+2x^12+3x^13+2x^15+3x^17+2x^18+5x^21+3x^26+3x^32-x^37) /((1-x^36)(1-x)^2).
MATHEMATICA
Select[Range[140], Mod[Binomial[# + 6, #], 6] == 0&] (* Jean-François Alcover, Nov 12 2017 *)
PROG
(PARI) isok(n) = !(binomial(n+6, n) % 6); \\ Michel Marcus, Nov 12 2017
CROSSREFS
KEYWORD
nonn
AUTHOR
Hieronymus Fischer, Oct 20 2007
STATUS
approved