cp's OEIS Frontend

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.

A181859 a(n) = gcd(n^2, n!) / gcd(n^2, n!/floor(n/2)!^2).

This page as a plain text file.
%I A181859 #22 Aug 02 2019 23:03:14
%S A181859 1,1,1,1,4,1,9,1,32,9,25,1,12,1,49,5,128,1,81,1,100,21,121,1,144,25,
%T A181859 169,27,98,1,5,1,512,11,289,7,108,1,361,13,80,1,147,1,242,3,529,1,64,
%U A181859 49,625,17,338,1,729,55,56,57
%N A181859 a(n) = gcd(n^2, n!) / gcd(n^2, n!/floor(n/2)!^2).
%F A181859 a(n) = A170826(n) / A181861(n).
%p A181859 A181859 := n -> igcd(n^2,n!)/igcd(n^2,n!/iquo(n,2)!^2);
%t A181859 a[n_] := GCD[n^2, n!]/GCD[n^2, n!/Quotient[n, 2]!^2];
%t A181859 Table[a[n], {n, 0, 57}] (* _Jean-François Alcover_, Jun 18 2019 *)
%o A181859 (PARI) a(n)=if(isprime(n), n, if(n==4, 8, n^2))/gcd(n^2,n!/(n\2)!^2) \\ _Charles R Greathouse IV_, Feb 01 2013
%Y A181859 Cf. A170826, A181860, A056040, A000290.
%K A181859 nonn
%O A181859 0,5
%A A181859 _Peter Luschny_, Nov 21 2010