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 A152678 #13 Dec 26 2024 03:55:19 %S A152678 4,6,12,8,18,12,28,14,24,24,18,20,42,32,36,24,60,42,40,56,30,72,32,48, %T A152678 54,48,38,60,56,90,42,96,44,84,78,72,48,124,72,98,54,120,72,120,80,90, %U A152678 60,168,62,96,104,84,144,68,126,96,144 %N A152678 Even members of A000203. %H A152678 Amiram Eldar, <a href="/A152678/b152678.txt">Table of n, a(n) for n = 1..10000</a> %F A152678 a(n) = sigma(A028983(n)) = A000203(A028983(n)). - _Jaroslav Krizek_, Oct 06 2009 %t A152678 Select[DivisorSigma[1,Range[100]],EvenQ] (* _Harvey P. Dale_, Jun 18 2017 *) %o A152678 (PARI) list(lim) = select(x -> !(x % 2), vector(lim, i, sigma(i))); \\ _Amiram Eldar_, Dec 26 2024 %Y A152678 Cf. A000203, A028983, A152677, A152679. %K A152678 easy,nonn %O A152678 1,1 %A A152678 _Omar E. Pol_, Dec 10 2008