login
A205171
The lesser of twin primes == 1 (mod 8).
1
17, 41, 137, 281, 521, 569, 617, 641, 809, 857, 881, 1049, 1289, 1481, 1697, 1721, 2081, 2129, 2657, 2729, 2801, 2969, 3257, 3329, 3929, 4001, 4049, 4217, 4241, 4337, 4481, 4649, 4721, 5009, 5417, 5441, 5657, 5849, 6089, 6449, 6569, 6689, 6761, 7457
OFFSET
1,1
MATHEMATICA
Select[ Prime@ Range@ 1000, Mod[#, 8] == 1 && PrimeQ[# + 2] &]
CROSSREFS
Intersection of A017077 and A001359.
Sequence in context: A145991 A139961 A188661 * A070183 A201705 A165668
KEYWORD
easy,nonn
AUTHOR
Robert G. Wilson v, Jan 22 2012
STATUS
approved