OFFSET
1,1
COMMENTS
The prime numbers congruent to +1 or -1 modulo 8 of this sequence appear exactly once. For a proof see the W. Lang link under A001132. - Wolfdieter Lang, Feb 17 2015
LINKS
Ray Chandler, Table of n, a(n) for n = 1..10000
MATHEMATICA
A[s_Integer] := With[{s6 = StringPadLeft[ToString[s], 6, "0"]}, Cases[ Import["https://oeis.org/A" <> s6 <> "/b" <> s6 <> ".txt", "Table"], {_, _}][[All, 2]]];
A046086 = A@046086;
A046087 = A@046087;
a /@ Range[10000] (* Jean-François Alcover, Mar 07 2020 *)
CROSSREFS
KEYWORD
nonn
AUTHOR
Lekraj Beedassy, Jun 24 2006
EXTENSIONS
Edited and corrected by Ray Chandler, Apr 10 2010
STATUS
approved