cp's OEIS Frontend

This is a front-end for the Online Encyclopedia of Integer Sequences, made by Christian Perfect. The idea is to provide OEIS entries in non-ancient HTML, and then to think about how they're presented visually. The source code is on GitHub.

Showing 1-4 of 4 results.

A094407 Primes of the form 16n+1.

Original entry on oeis.org

17, 97, 113, 193, 241, 257, 337, 353, 401, 433, 449, 577, 593, 641, 673, 769, 881, 929, 977, 1009, 1153, 1201, 1217, 1249, 1297, 1361, 1409, 1489, 1553, 1601, 1697, 1777, 1873, 1889, 2017, 2081, 2113, 2129, 2161, 2273, 2417, 2593, 2609, 2657, 2689, 2753
Offset: 1

Views

Author

Jun Mizuki (suzuki32(AT)sanken.osaka-u.ac.jp), Jun 03 2004

Keywords

Comments

Subsequence of A007519 (primes of form 8n+1). - Zak Seidov, May 16 2012
Primes p such that p XOR 14 = p + 14. - Brad Clardy, Jul 23 2012
A prime of the form 16n+1 is represented either by both x^2+32y^2 and x^2+64y^2 or by neither (see Kaplansky link). - Michel Marcus, Dec 23 2012
Odd primes p such that -1 is an 8th power mod p. - Eric M. Schmidt, Mar 27 2014

Crossrefs

Programs

  • Haskell
    a094407 n = a094407_list !! (n-1)
    a094407_list = filter ((== 1) . a010051) [1,17..]
    -- Reinhard Zumkeller, Mar 06 2012
  • Maple
    p:=proc(n) if isprime(16*n+1)=true then 16*n+1 else fi end:seq(p(n),n=1..200); # Emeric Deutsch, Dec 23 2004
  • Mathematica
    lst={};Do[p=16*n+1;If[PrimeQ[p],AppendTo[lst,p]],{n,6!}];lst (* Vladimir Joseph Stephan Orlovsky, Feb 26 2009 *)
    Select[16*Range[200]+1,PrimeQ] (* Harvey P. Dale, Nov 04 2017 *)

Extensions

More terms from Emeric Deutsch, Dec 23 2004

A141194 Primes of the form 16k+7.

Original entry on oeis.org

7, 23, 71, 103, 151, 167, 199, 263, 311, 359, 439, 487, 503, 599, 631, 647, 727, 743, 823, 839, 887, 919, 967, 983, 1031, 1063, 1223, 1303, 1319, 1367, 1399, 1447, 1511, 1543, 1559, 1607, 1783, 1831, 1847, 1879, 2039, 2087, 2311, 2423, 2503, 2551, 2647
Offset: 1

Views

Author

T. D. Noe, Jun 12 2008

Keywords

Crossrefs

Programs

A141195 Primes of the form 16k+11.

Original entry on oeis.org

11, 43, 59, 107, 139, 251, 283, 331, 347, 379, 443, 491, 523, 571, 587, 619, 683, 811, 827, 859, 907, 971, 1019, 1051, 1163, 1259, 1291, 1307, 1451, 1483, 1499, 1531, 1579, 1627, 1723, 1787, 1867, 1931, 1979, 2011, 2027, 2203, 2251, 2267, 2347, 2411, 2459
Offset: 1

Views

Author

T. D. Noe, Jun 12 2008

Keywords

Crossrefs

Programs

A228228 Primes congruent to {3, 5, 13, 15} mod 16.

Original entry on oeis.org

3, 5, 13, 19, 29, 31, 37, 47, 53, 61, 67, 79, 83, 101, 109, 127, 131, 149, 157, 163, 173, 179, 181, 191, 197, 211, 223, 227, 229, 239, 269, 271, 277, 293, 307, 317, 349, 367, 373, 383, 389, 397, 419, 421, 431, 461, 463, 467, 479, 499, 509, 541, 547, 557, 563
Offset: 1

Views

Author

Arkadiusz Wesolowski, Aug 16 2013

Keywords

Comments

Union of A091968, A127589, A141196, and A127576.
Let p be a prime number and let E(p) denote the elliptic curve y^2 = x^3 + p*x. If p is in the sequence, then the rank of E(p) is 0 or 1. Therefore, A060953(a(n)) must be one of only two values: 0 or 1.

References

  • J. H. Silverman, The arithmetic of elliptic curves, Springer, NY, 1986, p. 311.

Crossrefs

Programs

  • Magma
    [p: p in PrimesUpTo(563) | p mod 16 in {3, 5, 13, 15}];
  • Mathematica
    Select[Prime@Range[103], MemberQ[{3, 5, 13, 15}, Mod[#, 16]] &]
Showing 1-4 of 4 results.