%I #8 Jul 01 2018 16:29:43
%S 11,17,19,23,26,27,29,31,34,35,39,41,43,44,47,48,49,51,53,54,55,59,62,
%T 63,64,65,67,69,71,74,75,76,77,79,80,83,84,87,89,90,91,94,95,97,98,99,
%U 101,103,104,107,109,111,113,114,115,116,118,119,120,123,124,125,127
%N Numbers k such that k! is divisible by (k+1)^3.
%H Harry J. Smith, <a href="/A061751/b061751.txt">Table of n, a(n) for n = 1..2000</a>
%t Select[Range[150], IntegerQ[ #!/(# + 1)^3] &]
%o (PARI) { n=0; f=1; for (a=1, 2784, f*=a; if (f%(a + 1)^3 == 0, write("b061751.txt", n++, " ", a)) ) } \\ _Harry J. Smith_, Jul 27 2009
%K nonn
%O 1,1
%A _Robert G. Wilson v_, Jun 21 2001