login
A175412
Those primes p where p+{the number of divisors of (p+1)} is prime.
1
7, 11, 13, 17, 23, 29, 31, 37, 53, 59, 67, 71, 79, 89, 97, 101, 139, 173, 179, 193, 199, 227, 251, 271, 277, 313, 331, 347, 359, 397, 401, 419, 449, 457, 479, 491, 557, 607, 613, 619, 653, 659, 673, 683, 727, 739, 751, 757, 761, 809, 811, 821, 863, 877, 1093
OFFSET
1,1
LINKS
MATHEMATICA
Select[Prime[Range[200]], PrimeQ[#+DivisorSigma[0, #+1]]&] (* Harvey P. Dale, Nov 30 2014 *)
CROSSREFS
Sequence in context: A086843 A260714 A049481 * A173700 A067557 A103485
KEYWORD
nonn
AUTHOR
Leroy Quet, May 07 2010
EXTENSIONS
Extended by D. S. McNeil and Jon E. Schoenfield, May 10 2010
STATUS
approved