|
| |
|
|
A007521
|
|
Primes of form 8n+5.
(Formerly M3828)
|
|
36
|
|
|
|
5, 13, 29, 37, 53, 61, 101, 109, 149, 157, 173, 181, 197, 229, 269, 277, 293, 317, 349, 373, 389, 397, 421, 461, 509, 541, 557, 613, 653, 661, 677, 701, 709, 733, 757, 773, 797, 821, 829, 853, 877, 941, 997, 1013, 1021, 1061, 1069, 1093, 1109
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
|
OFFSET
|
1,1
|
|
|
COMMENTS
|
Primes of the form 4x^2-4xy+5y^2 with x and y nonnegative. - T. D. Noe, May 08 2005
|
|
|
REFERENCES
|
M. Abramowitz and I. A. Stegun, eds., Handbook of Mathematical Functions, National Bureau of Standards Applied Math. Series 55, 1964 (and various reprintings), p. 870.
N. J. A. Sloane and Simon Plouffe, The Encyclopedia of Integer Sequences, Academic Press, 1995 (includes this sequence).
|
|
|
LINKS
|
T. D. Noe, Table of n, a(n) for n=1..1000
M. Abramowitz and I. A. Stegun, eds., Handbook of Mathematical Functions, National Bureau of Standards, Applied Math. Series 55, Tenth Printing, 1972 [alternative scanned copy].
|
|
|
MATHEMATICA
|
Select[Prime[Range[500]], IntegerQ[(#-5)/8]&]
Select[8Range[0, 160]+5, PrimeQ] (* From Harvey P. Dale, Apr 22 2011 *)
|
|
|
PROG
|
(PARI) list(lim)=select(n->n%8==5, primes(primepi(lim))) \\ Charles R Greathouse IV, Jul 25 2011
(Haskell)
a007521 n = a007521_list !! (n-1)
a007521_list = filter ((== 1). a010051) a004770_list
-- Reinhard Zumkeller, Aug 17 2012
|
|
|
CROSSREFS
|
Cf. A010051.
Subsequence of A004770; see also A045323.
Sequence in context: A207040 A152658 A100877 * A213050 A216822 A217466
Adjacent sequences: A007518 A007519 A007520 * A007522 A007523 A007524
|
|
|
KEYWORD
|
nonn,easy,nice,changed
|
|
|
AUTHOR
|
N. J. A. Sloane, Robert G. Wilson v
|
|
|
STATUS
|
approved
|
| |
|
|
