login
A068356
Numbers k such that bigomega(k) = tau(prime(k)+1) where tau(k) = A000005(k).
1
88, 100, 198, 260, 306, 375, 384, 459, 540, 585, 714, 798, 825, 856, 864, 960, 1012, 1062, 1148, 1278, 1312, 1484, 1725, 1784, 1924, 1988, 2125, 2130, 2160, 2204, 2210, 2240, 2241, 2250, 2346, 2480, 2516, 2619, 2662, 2776, 2814, 2826, 2889, 2892, 2910
OFFSET
1,1
LINKS
MATHEMATICA
Select[Range[3000], PrimeOmega[#]==DivisorSigma[0, Prime[#]+1]&] (* Harvey P. Dale, Aug 18 2013 *)
PROG
(PARI) isok(k) = bigomega(k) == numdiv(prime(k)+1); \\ Michel Marcus, May 10 2022
CROSSREFS
KEYWORD
easy,nonn
AUTHOR
Benoit Cloitre, Feb 28 2002
STATUS
approved