A230433 Numbers k such that 43^k + 4 is prime.
1, 7, 13, 17, 33, 43, 205, 287, 669, 1161, 1166, 3753, 6095, 18123, 28041
Offset: 1
Crossrefs
Cf. A058958.
Programs
-
Mathematica
Do[If[PrimeQ[43^k + 4], Print[k]], {k, 50000}]
This is a front-end for the Online Encyclopedia of Integer Sequences, made by Christian Perfect. The idea is to provide OEIS entries in non-ancient HTML, and then to think about how they're presented visually. The source code is on GitHub.
Comments