A387470 a(n) = n*(Omega(n) - 1), where Omega = A001222.

-1, 0, 0, 4, 0, 6, 0, 16, 9, 10, 0, 24, 0, 14, 15, 48, 0, 36, 0, 40, 21, 22, 0, 72, 25, 26, 54, 56, 0, 60, 0, 128, 33, 34, 35, 108, 0, 38, 39, 120, 0, 84, 0, 88, 90, 46, 0, 192, 49, 100, 51, 104, 0, 162, 55, 168, 57, 58, 0, 180, 0, 62, 126, 320, 65, 132, 0, 136, 69, 140, 0, 288, 0, 74, 150, 152

Offset

1,4

Links

Joshuva Srinath, Table of n, a(n) for n = 1..200

Formula

a(n) = n*(Omega(n) - 1) = n*A252736(n).

a(n) = A066959(n) - n.

a(p) = 0 for prime p.

Mathematica

a[n_] := n(PrimeOmega[n]-1); Array[a, 76]

Crossrefs

Cf. A001222, A066959, A252736.

Sequence in context: A023891 A075091 A132953 * A195207 A157721 A085968

Adjacent sequences: A387467 A387468 A387469 * A387471 A387472 A387473

Keyword

sign,easy

Author

Joshuva Srinath, Aug 30 2025

Status

approved