OFFSET
1,2
LINKS
Harry J. Smith, Table of n, a(n) for n = 1..400
MATHEMATICA
With[{cats=CatalanNumber[Range[70]]}, Flatten[Table[Select[cats, Divisible[ #, n]&, 1], {n, 40}]]] (* Harvey P. Dale, May 11 2014 *)
PROG
(PARI) a(n) = { for (x=0, oo, my(c=(2*x)!/x!/(x+1)!); if (c%n == 0, return(c))) } \\ Harry J. Smith, Mar 05 2010
CROSSREFS
KEYWORD
nonn,changed
AUTHOR
Amarnath Murthy, Dec 17 2001
EXTENSIONS
Corrected and extended by Robert G. Wilson v, Dec 17 2001
Errors corrected by N. J. A. Sloane, Oct 04 2010
STATUS
approved