A321868 Fermat pseudoprimes to base 2 that are octagonal.
341, 645, 2465, 2821, 4033, 5461, 8321, 15841, 25761, 31621, 68101, 83333, 162401, 219781, 282133, 348161, 530881, 587861, 653333, 710533, 722261, 997633, 1053761, 1082401, 1193221, 1246785, 1333333, 1357441, 1398101, 1489665, 1584133, 1690501, 1735841
Offset: 1
Keywords
Links
- Amiram Eldar, Table of n, a(n) for n = 1..10000
- Andrzej Rotkiewicz, On some problems of W. Sierpinski, Acta Arithmetica, Vol. 21 (1972), pp. 251-259.
- Wikipedia, Schinzel's Hypothesis H.
Programs
-
Mathematica
oct[n_]:=n(3n-2); Select[oct[Range[1, 1000]], PowerMod[2, (# - 1), #]==1 &]
-
PARI
isok(n) = (n>1) && ispolygonal(n, 8) && !isprime(n) && (Mod(2, n)^n==2); \\ Daniel Suteu, Nov 29 2018
Comments