A079086 Total number of prime factors of (prime(n)+1)*(prime(n+1)+1)/4.

1, 2, 3, 4, 3, 3, 4, 5, 5, 6, 5, 3, 4, 6, 7, 6, 4, 3, 6, 5, 5, 7, 6, 5, 4, 5, 7, 6, 4, 8, 9, 5, 5, 6, 6, 4, 3, 6, 6, 6, 6, 8, 7, 4, 7, 6, 7, 8, 5, 5, 8, 7, 6, 6, 6, 8, 8, 5, 3, 4, 5, 6, 7, 5, 3, 4, 4, 5, 6, 5, 7, 9, 6, 5, 10, 10, 4, 3, 4, 6, 5, 7, 8, 6, 7, 7, 5, 4, 7, 8, 10, 9, 6, 7, 9, 8, 6, 5, 3, 3, 5, 6, 6, 6

Offset: 1

Author

Reinhard Zumkeller, Dec 22 2002

Keywords

• nonn

Links

• Reinhard Zumkeller, Table of n, a(n) for n = 1..10000

Crossrefs

Cf. A001222, A079079, A079085.

Programs

Haskell

a079086 = a001222 . a079079  -- Reinhard Zumkeller, Oct 08 2012

Mathematica

a[n_] := PrimeOmega[(Prime[n]+1) * (Prime[n+1]+1) / 4]; Array[a, 100] (* Amiram Eldar, Apr 06 2025 *)

PARI

a(n) = bigomega((prime(n)+1)*(prime(n+1)+1)/4); \\ Amiram Eldar, Apr 06 2025

Formula

a(n) = A001222(A079079(n)).