OFFSET
1,3
LINKS
Jens Kruse Andersen, Table of n, a(n) for n = 1..10000
MATHEMATICA
Table[PrimeNu[Prime[n]^2 - 1], {n, 100}] (* Wesley Ivan Hurt, Aug 05 2014 *)
PROG
(PARI) vector(100, n, omega(prime(n)^2-1)) \\ Derek Orr, Aug 05 2014
(Magma) [#PrimeDivisors(NthPrime(n)^2 -1): n in [1..100]]; // Vincenzo Librandi, Apr 27 2019
CROSSREFS
KEYWORD
nonn
AUTHOR
R. J. Mathar, Aug 05 2014
STATUS
approved