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 A060676 #12 Nov 18 2024 05:25:06
%S A060676 1512,1872,2352,3192,3780,4104,4560,4752,5880,6120,8160,8424,8820,
%T A060676 11424,13056,15264,16464,16704,17160,17360,17760,18648,19680,19800,
%U A060676 20880,22752,23616,24552,24864,27432,30336,30492,31200,32448,35328
%N A060676 Numbers k such that sigma (x) = k has exactly 12 solutions.
%H A060676 Amiram Eldar, <a href="/A060676/b060676.txt">Table of n, a(n) for n = 1..10000</a>
%H A060676 Max Alekseyev, <a href="https://oeis.org/wiki/User:Max_Alekseyev/gpscripts">PARI/GP Scripts for Miscellaneous Math Problems</a> (invphi.gp).
%e A060676 1512 = sigma(480) = sigma(636) = sigma(736) = sigma(748) = sigma(830) = sigma(902) = sigma(1006) = sigma(1105) = sigma(1255) = sigma(1391) = sigma(1411) = sigma(1511).
%t A060676 a = Table[ 0, {50000} ]; Do[ s = DivisorSigma[ 1, n ]; If[ s < 50001, a[ [ s ] ]++ ], {n, 1, 50000} ]; Select[ Range[ 50000 ], a[ [ # ] ] == 12 & ]
%t A060676 Take[Sort[Transpose[Select[Tally[DivisorSigma[1,Range[100000]]],#[[2]] == 12&]][[1]]],50] (* _Harvey P. Dale_, Jan 18 2013 *)
%o A060676 (PARI) is(k) = invsigmaNum(k) == 12 \\ _Amiram Eldar_, Nov 18 2024, using _Max Alekseyev_'s invphi.gp
%Y A060676 Cf. A000203.
%Y A060676 Number of solutions: A007369 (0), A007370 (1), A007371 (2), A007372 (3), A060660 (4), A060661 (5), A060662 (6), A060663 (7), A060664 (8), A060665 (9), A060666 (10), A060678 (11), this sequence (12).
%K A060676 nonn
%O A060676 1,1
%A A060676 _Robert G. Wilson v_, Apr 18 2001