login
A100860
Lesser of two consecutive primes of forms 4k+3 and 4k+1 respectively.
1
3, 11, 23, 31, 47, 59, 71, 83, 107, 131, 139, 151, 167, 179, 191, 227, 239, 251, 263, 271, 283, 311, 331, 347, 367, 383, 419, 431, 443, 503, 523, 547, 563, 571, 587, 599, 607, 631, 647, 659, 691, 727, 751, 787, 811, 827, 839, 863, 919, 947, 971, 991, 1019, 1031
OFFSET
1,1
MATHEMATICA
Prime[Select[Range[200], Mod[Prime[ # ], 4] == 3 && Mod[Prime[ # + 1], 4] == 1 &]]
CROSSREFS
Cf. A100877.
Sequence in context: A049491 A000355 A163769 * A018630 A163780 A094379
KEYWORD
nonn,easy
AUTHOR
Giovanni Teofilatto, Jan 13 2005
EXTENSIONS
Edited and corrected by Ray Chandler, Jan 19 2005
STATUS
approved