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 A152679 #10 Dec 26 2024 02:14:56
%S A152679 2,3,6,4,9,6,14,7,12,12,9,10,21,16,18,12,30,21,20,28,15,36,16,24,27,
%T A152679 24,19,30,28,45,21,48,22,42,39,36,24,62,36,49,27,60,36,60,40,45,30,84,
%U A152679 31,48,52,42,72,34,63,48,72
%N A152679 Even members of A000203, divided by 2.
%H A152679 Ivan Neretin, <a href="/A152679/b152679.txt">Table of n, a(n) for n = 1..10000</a>
%F A152679 a(n) = A152678(n)/2.
%t A152679 Select[Table[DivisorSigma[1, n]/2, {n, 1, 70}], IntegerQ](* _Ivan Neretin_, May 09 2015 *)
%o A152679 (PARI) list(lim) = select(x -> denominator(x) == 1, vector(lim, i, sigma(i)/2)); \\ _Amiram Eldar_, Dec 26 2024
%Y A152679 Cf. A000203, A152677, A152678.
%K A152679 easy,nonn
%O A152679 1,1
%A A152679 _Omar E. Pol_, Dec 10 2008