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 A332217 #14 May 25 2020 10:00:30 %S A332217 2,8,18,49,50,72,128,162,169,196,200,242,361,441,450,512,578,648,676, %T A332217 784,961,968,1058,1152,1225,1250,1369,1444,1458,1521,1682,1764,1800, %U A332217 1849,2178,2312,2704,3136,3200,3249,3362,3721,3844,3969,4050,4225,4232,4418,4489,4608,4802,4900,5000 %N A332217 Numbers k for which the 2-adic valuation of sigma(k) is zero and its 3-adic valuation is 1 (so that sigma(k) is an odd multiple of 3, but not of 9). %H A332217 Antti Karttunen, <a href="/A332217/b332217.txt">Table of n, a(n) for n = 1..10000</a> %H A332217 <a href="/index/Si#SIGMAN">Index entries for sequences related to sigma(n)</a> %F A332217 {n: A000035(A000203(n))*A007949(A000203(n))==1}. %t A332217 Select[Range[5*10^3], IntegerExponent[DivisorSigma[1, #], {2, 3}] === {0, 1} &] (* _Michael De Vlieger_, Feb 12 2020 *) %o A332217 (PARI) isA332217(n) = ((sigma(n)%2)&&(valuation(sigma(n),3)==1)); %Y A332217 Subsequence of A067051, which is a subsequence of A028982. %Y A332217 Cf. A332218 (a subsequence). %Y A332217 Cf. A000203, A007949, A332216. %K A332217 nonn %O A332217 1,1 %A A332217 _Antti Karttunen_, Feb 11 2020