login

Year-end appeal: Please make a donation to the OEIS Foundation to support ongoing development and maintenance of the OEIS. We are now in our 61st year, we have over 378,000 sequences, and we’ve reached 11,000 citations (which often say “discovered thanks to the OEIS”).

A364560
Numbers k for which A156552(k) < k.
8
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, 48, 49, 50, 54, 55, 60, 63, 64, 70, 72, 75, 77, 80, 81, 84, 90, 91, 96, 98, 99, 100, 105, 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
OFFSET
1,2
COMMENTS
Numbers k such that A005941(k) <= k.
Sequence A005940(A364542(.)) sorted into ascending order.
If k is a term, then also 2*k is present in this sequence, and vice versa.
PROG
(PARI)
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 };
isA364560(n) = (A156552(n) < n);
CROSSREFS
Positions of nonpositive terms in A364559.
Cf. A005941, A156552, A364542, A364562 (complement).
Subsequences: A029747, A364550, A364561 (odd terms).
Sequence in context: A233461 A010432 A187041 * A097752 A014866 A051661
KEYWORD
nonn
AUTHOR
Antti Karttunen, Jul 28 2023
STATUS
approved