OFFSET
0,2
LINKS
Alois P. Heinz, Table of n, a(n) for n = 0..1000
FORMULA
Solutions to {x : binomial(3x,x) mod (x+1) != 0 } are given in A022341. The corresponding values of binomial(3x,x) mod (x+1) are given here.
MAPLE
F:= combinat[fibonacci]:
b:= proc(n) local j;
if n=0 then 0
else for j from 2 while F(j+1)<=n do od;
b(n-F(j))+2^(j-2)
fi
end:
a:= n-> 2*b(n)+1:
seq(a(n), n=0..70); # Alois P. Heinz, Aug 03 2012
MATHEMATICA
Select[Table[Mod[Binomial[3*k, k], k+1], {k, 1200}], #>0&]
CROSSREFS
KEYWORD
nonn
AUTHOR
Labos Elemer, Apr 13 2006
EXTENSIONS
New definition from T. D. Noe, Dec 19 2006
STATUS
approved