login
A219618
Numbers k such that 3^k + 100 is prime.
1
0, 1, 2, 3, 4, 6, 7, 8, 10, 18, 24, 26, 54, 63, 90, 91, 97, 156, 172, 230, 262, 344, 406, 435, 556, 630, 644, 667, 978, 1178, 1189, 1645, 1768, 2362, 2578, 2701, 2724, 2804, 2928, 3082, 3202, 3276, 4429, 12036, 15280, 19212, 19642, 21250, 25224, 37674, 52946, 66972
OFFSET
1,3
MATHEMATICA
Select[Range[5000], PrimeQ[3^# + 100] &]
PROG
(PARI) is(n)=ispseudoprime(3^n+100) \\ Charles R Greathouse IV, Jun 13 2017
CROSSREFS
Cf. A176929 (associated primes).
Sequence in context: A091199 A093452 A082103 * A328592 A175413 A192048
KEYWORD
nonn,changed
AUTHOR
Vincenzo Librandi, Dec 01 2012
EXTENSIONS
a(44)-a(50) from Michael S. Branicky, Jul 14 2023
a(1)=0 inserted and a(51)-a(52) from Michael S. Branicky, Oct 24 2024
STATUS
approved