OFFSET
1,1
MATHEMATICA
Select[Range[500], IntegerQ[3! (2 # - 4)!/(#! (# - 1)!)] &] (* Arkadiusz Wesolowski, Sep 06 2011 *)
CROSSREFS
KEYWORD
nonn
AUTHOR
EXTENSIONS
Offset corrected and 2 initial terms added by Arkadiusz Wesolowski, Sep 06 2011
STATUS
approved