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 A364560 #13 Jul 29 2023 15:59:18
%S A364560 1,2,3,4,5,6,8,9,10,12,15,16,18,20,21,24,25,27,30,32,35,36,40,42,45,
%T A364560 48,49,50,54,55,60,63,64,70,72,75,77,80,81,84,90,91,96,98,99,100,105,
%U A364560 108,110,120,121,125,126,128,135,140,143,144,147,150,154,160,162,165,168,169,175,180,182,187,189,192,195,196
%N A364560 Numbers k for which A156552(k) < k.
%C A364560 Numbers k such that A005941(k) <= k.
%C A364560 Sequence A005940(A364542(.)) sorted into ascending order.
%C A364560 If k is a term, then also 2*k is present in this sequence, and vice versa.
%o A364560 (PARI)
%o A364560 A156552(n) = { my(f = factor(n), p, p2 = 1, res = 0); for(i = 1, #f~, p = 1 << (primepi(f[i, 1]) - 1); res += (p * p2 * (2^(f[i, 2]) - 1)); p2 <<= f[i, 2]); res };
%o A364560 isA364560(n) = (A156552(n) < n);
%Y A364560 Positions of nonpositive terms in A364559.
%Y A364560 Cf. A005941, A156552, A364542, A364562 (complement).
%Y A364560 Subsequences: A029747, A364550, A364561 (odd terms).
%K A364560 nonn
%O A364560 1,2
%A A364560 _Antti Karttunen_, Jul 28 2023