OFFSET
1,2
LINKS
Y. More, Problem 11165, Amer. Math. Monthly, 112 (2005), 568.
FORMULA
Equivalently, numbers k such that base-3 expansion of k+1 contains a 2.
MATHEMATICA
Select[ Range[ 100], Mod[ Sum[(2 n)!/n!/(n + 1)!, {n, #}], 3] == 1 &] (* Robert G. Wilson v, Jun 14 2005 *)
Position[Accumulate[CatalanNumber[Range[100]]], _?(Mod[#, 3]==1&)]//Flatten (* Harvey P. Dale, Aug 26 2022 *)
CROSSREFS
KEYWORD
nonn,easy
AUTHOR
N. J. A. Sloane, Jun 11 2005
STATUS
approved