A372546 Number of distinct prime factors of n^n+n.

1, 2, 3, 3, 3, 5, 5, 4, 3, 7, 4, 4, 4, 8, 6, 5, 5, 6, 10, 6, 6, 10, 6, 5, 6, 8, 8, 11, 6, 7, 11, 7, 7, 13, 7, 9, 8, 7, 5, 10, 7, 7, 12, 7, 9, 18, 6, 7, 10, 10, 11, 11, 10, 9, 14, 12, 12, 11, 7, 9, 13, 6, 7, 16, 5, 14, 10, 7, 7, 15, 11, 7, 13, 7, 8, 16, 9, 13

Offset

1,2

Links

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

Formula

a(n) = A001221(A066068(n)).

Mathematica

a[n_] := PrimeNu[n^n + n]; Array[a, 40] (* Amiram Eldar, Oct 29 2024 *)

Prog

(PARI) a(n) = omega(n^n+n);
(Python)
from sympy.ntheory.factor_ import primenu
def A372546(n): return primenu(n*(n**(n-1)+1)) # Chai Wah Wu, May 07 2024

Crossrefs

Cf. A001221, A066068, A372599, A372228, A344870, A344869, A377671.

Sequence in context: A339310 A361159 A184995 * A136348 A353710 A284397

Adjacent sequences: A372543 A372544 A372545 * A372547 A372548 A372549

Keyword

nonn

Author

Tyler Busby, May 06 2024

Status

approved