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.

A176471 Duplicate of A136404.

This page as a plain text file.
%I A176471 #20 May 30 2025 20:10:22
%S A176471 1,4,16,36,144,576,900,3600,14400,32400,44100,129600,176400,705600,
%T A176471 1587600,2822400,6350400,21344400,57153600,85377600,192099600,
%U A176471 341510400,768398400,3073593600,6915585600,12294374400,14428814400,32464832400,57715257600,129859329600
%N A176471 Duplicate of A136404.
%C A176471 Same as A136404. - _Georg Fischer_, Oct 12 2018
%C A176471 Previous name was: Highly composite square numbers for which the number of divisors increases to a record.
%t A176471 With[{sqs=Range[10000]^2},Union[Flatten[Table[Select[sqs, DivisorSigma[ 0,#]>n&,1],{n,500}]]]] (* _Harvey P. Dale_, Apr 28 2012 *)
%t A176471 t = {1}; sig = {1}; n = 1; Do[While[n++; d = DivisorSigma[0, n^2]; d <= sig[[-1]]]; AppendTo[sig, d]; AppendTo[t, n^2], {30}]; t (* _T. D. Noe_, Apr 30 2012 *)
%Y A176471 Cf. A126098 (square root of these terms).
%Y A176471 Cf. A136404. - _Georg Fischer_, Oct 12 2018
%K A176471 dead
%O A176471 1,2
%A A176471 Ethan Ward (etkewa(AT)gmail.com), Apr 18 2010
%E A176471 Corrected and extended by _Harvey P. Dale_, Apr 28 2012