login
A174268
Primes p such that 11^p - 10 is also prime.
0
3, 17, 23, 79, 79133
OFFSET
1,1
COMMENTS
a(5) > 15000. - Michael S. Branicky, Jul 26 2022
a(6) > 100000. - Michael S. Branicky, Oct 15 2024
EXAMPLE
For p=3, 11^3-10=1321;
for p=17, 11^17-10=505447028499293761;
for p=23, 11^23-10=895430243255237372246521.
MATHEMATICA
Select[Range[10^4], PrimeQ[#] && PrimeQ[11^# - 10] &] (* Vincenzo Librandi, May 18 2015 *)
Select[Prime[Range[25]], PrimeQ[11^#-10]&] (* Harvey P. Dale, Jul 18 2022 *)
PROG
(Magma) [ p: p in PrimesUpTo(2500)| IsPrime(11^p-10)];
CROSSREFS
Sequence in context: A128107 A154620 A175385 * A273834 A273850 A060860
KEYWORD
nonn,more
AUTHOR
Vincenzo Librandi, Mar 14 2010
EXTENSIONS
a(5) from Michael S. Branicky, Oct 14 2024
STATUS
approved