This is a front-end for the Online Encyclopedia of Integer Sequences, made by Christian Perfect. The idea is to provide OEIS entries in non-ancient HTML, and then to think about how they're presented visually. The source code is on GitHub.
%I A129906 #17 Sep 21 2024 02:25:37 %S A129906 1,20,630,4480,36288,3326400,444787200,5811886080,81729648000, %T A129906 19760412672000,6082255020441600,115852476579840000, %U A129906 2322315553259520000,1077167364120207360000,24817936069329577574400,596585001666576384000000,14936720782466875392000000 %N A129906 n!/(n^2) when an integer. %C A129906 Also see comments in A046022 = primes together with 1 and 4. %H A129906 Alois P. Heinz, <a href="/A129906/b129906.txt">Table of n, a(n) for n = 1..150</a> %F A129906 a(n) = A000142(m)/A000290(m) where m = A056653(n). - _Jason Yuen_, Sep 20 2024 %t A129906 f[n_]:=If[PrimeQ[n]||n == 4,0,n!/n^2];Select[Table[f[n],{n,1,40}],#>0&] (* _Geoffrey Critzer_, Oct 26 2012 *) %t A129906 Select[#!/#^2&/@Range[30],IntegerQ] (* _Harvey P. Dale_, Jul 17 2024 *) %Y A129906 Cf. A000142, A000290, A046022, A056653. %K A129906 easy,nonn %O A129906 1,2 %A A129906 _Jonathan Vos Post_, Jun 09 2007 %E A129906 More terms from _Alois P. Heinz_, Oct 26 2012