login
A097539
Subtract 4 from primes == 1 (mod 4).
2
1, 9, 13, 25, 33, 37, 49, 57, 69, 85, 93, 97, 105, 109, 133, 145, 153, 169, 177, 189, 193, 225, 229, 237, 253, 265, 273, 277, 289, 309, 313, 333, 345, 349, 369, 385, 393, 397, 405, 417, 429, 445, 453, 457, 505, 517, 537, 553, 565, 573, 589, 597, 609, 613, 637, 649, 657
OFFSET
1,2
LINKS
MATHEMATICA
Select[Prime[Range[150]], Mod[#, 4]==1&]-4 (* Harvey P. Dale, Apr 29 2020 *)
CROSSREFS
Sequence in context: A291351 A338220 A242919 * A107913 A175532 A098074
KEYWORD
nonn
AUTHOR
N. J. A. Sloane, Aug 27 2004
STATUS
approved