|
%I #15 Jan 27 2023 08:10:56
%S 3,4,5,211,461,562,947,990,991,1223,1378,1458,1600,1892,2015,2069,
%T 2147,2185,2333,2480,2481,2666,2994,3011,3017,3356,3418,3433,3442,
%U 3478,3479,3485,3521,3554,3566,3571,3620,3628,3725,3809,3997,4090,4096
%N Numbers k such that 4!*(2k-5)!/(k!*(k-1)!) is an integer.
%t Select[Range[16^3], IntegerQ[4! (2 # - 5)!/(#! (# - 1)!)] &] (* _Arkadiusz Wesolowski_, Sep 06 2011 *)
%K nonn
%O 1,1
%A _R. K. Guy_
%E Offset corrected and 2 initial terms added by _Arkadiusz Wesolowski_, Sep 06 2011
|
