OFFSET
1,1
COMMENTS
Numbers k such that 2^k == 2 (mod k) and k is divisible by 3511^2.
Unless there are other Wieferich primes (A001220) besides 1093 and 3511, the intersection and the union of this sequence with A247830 are given by A219346 and A158358, respectively, and the even terms are given by A295740. - Max Alekseyev, Nov 26 2017 [The indices of the even terms in this sequence are 430, 525, 543, 701, 811, 826, 937, 1235, 1277, 1388, ... - Jianing Song, Feb 08 2019]
LINKS
Jianing Song, Table of n, a(n) for n = 1..1470
R. G. E. Pinch, The pseudoprimes up to 10^13, Lecture Notes in Computer Science, 1838 (2000), 459-473.
C. Pomerance, J. L. Selfridge, and S. S. Wagstaff, Jr., The pseudoprimes to 25*10^9, Mathematics of Computation 35 (1980), pp. 1003-1026.
PROG
(PARI) vi=readvec("b158358.txt")
for(n=1, #vi, if(Mod(vi[n], 3511^2)==0, print1(vi[n], ", ")))
(PARI) list(N)=select(k->Mod(2, k)^k==2, 3511^2*vector(N\3511^2\2, i, i)) \\ Jianing Song, Feb 07 2019
CROSSREFS
KEYWORD
nonn
AUTHOR
Felix Fröhlich, Sep 24 2014
EXTENSIONS
Name changed by Jianing Song, Feb 07 2019 to include the even pseudoprimes to base 2 (A006935) at the suggestion of Max Alekseyev.
STATUS
approved