A273598
Numbers k such that (11^k - 6^k)/5 is prime.
Original entry on oeis.org
2, 3, 11, 163, 191, 269, 1381, 1493, 38453
Offset: 1
-
Select[Range[1, 10000], PrimeQ[(11^# - 6^#)/5] &]
-
for(n=1, 10000, if(isprime((11^n - 6^n)/5), print1(n, ", ")))
A273599
Numbers k such that (11^k - 7^k)/4 is prime.
Original entry on oeis.org
5, 19, 67, 107, 593, 757, 1801, 2243, 2383, 6043, 10181, 11383, 15629
Offset: 1
-
Select[Range[1, 10000], PrimeQ[(11^# - 7^#)/4] &]
-
for(n=1, 10000, if(isprime((11^n - 7^n)/4), print1(n, ", ")))
A273600
Numbers k such that (11^k - 8^k)/3 is prime.
Original entry on oeis.org
2, 7, 11, 17, 37, 521, 877, 2423
Offset: 1
-
Select[Range[1, 10000], PrimeQ[(11^# - 8^#)/3] &]
-
for(n=1, 10000, if(isprime((11^n - 8^n)/3), print1(n, ", ")))
Showing 1-3 of 3 results.
Comments