A349065 Odd numbers k such that A183097(k) > 2*k.

3472875, 10418625, 17364375, 24310125, 31255875, 52093125, 72930375, 86821875, 93767625, 121550625, 156279375, 170170875, 202145625, 218791125, 260465625, 281302875, 364651875, 420217875, 434109375, 468838125, 510512625, 586915875, 606436875, 607753125, 656373375

Offset

1,1

Comments

The odd terms of A349064.

Links

Amiram Eldar, Table of n, a(n) for n = 1..100

Example

3472875 is a term since A183097(3472875) = 7002474 > 2*3472875 = 6945750.

Mathematica

f[p_, e_] := (p^(e + 1) - 1)/(p - 1) - p; s[1] = 1; s[n_] := Times @@ f @@@ FactorInteger[n]; q[n_] := s[n] > 2*n; Select[Range[1, 2.5*10^7, 2], q]

Crossrefs

Subsequence of A005101, A005231 and A349064.

Cf. A001694, A183097.

Sequence in context: A036473 A154871 A206107 * A204335 A365888 A240105

Adjacent sequences: A349062 A349063 A349064 * A349066 A349067 A349068

Keyword

nonn

Author

Amiram Eldar, Nov 07 2021

Status

approved