login
A370663
Numbers k such that (9^k + 9*k)/9 is prime.
1
1, 2, 4, 8, 10, 28, 1348, 1424, 12838
OFFSET
1,2
COMMENTS
If it exists, a(10) > 50000.
MATHEMATICA
Select[Range[1, 13000], PrimeQ[((9^#+9*#) / 9)]&] (* Vincenzo Librandi, Jul 04 2025 *)
PROG
(PARI) is(n) = ispseudoprime(9^(n-1)+n)
(Magma) [n: n in [1..130] |IsPrime ((9^n + 9*n) div 9)]; // Vincenzo Librandi, Jul 04 2025
CROSSREFS
Sequence in context: A387522 A056654 A365002 * A020950 A056386 A331027
KEYWORD
nonn,hard,more
AUTHOR
Hugo Pfoertner, Feb 27 2024
STATUS
approved