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-10 of 22 results. Next

A167442 Prime numbers ending in the prime number 11.

Original entry on oeis.org

11, 211, 311, 811, 911, 1511, 1811, 2011, 2111, 2311, 2411, 2711, 3011, 3511, 3911, 4111, 4211, 5011, 5711, 6011, 6211, 6311, 6911, 7211, 7411, 8011, 8111, 8311, 9011, 9311, 9511, 9811, 10111, 10211, 10711, 11311, 11411, 12011, 12211, 12511, 12611
Offset: 1

Views

Author

Mark A. Thomas, Nov 03 2009

Keywords

Comments

Also primes of the form 100*n+11. - Vincenzo Librandi, Jul 07 2014

Links

Crossrefs

Cf. A101471.
Cf. similar sequences listed in A244763.

Programs

  • Magma
    [n: n in PrimesUpTo(15000) | n mod 100 eq 11]; // Vincenzo Librandi, Jul 07 2014
  • Mathematica
    Select[Prime[Range[5, 6000]], Take[IntegerDigits[#], -2]=={1, 1} &] (* Vincenzo Librandi, Jul 07 2014 *)
Select[Range[11,20011,100],PrimeQ] (* Harvey P. Dale, Nov 09 2014 *)
  • PARI
    select(x->(x % 100)==11, primes(2000)) \\ Michel Marcus, Jul 07 2014

A244773 Prime numbers ending in the prime number 67.

Original entry on oeis.org

67, 167, 367, 467, 967, 1367, 1567, 1667, 1867, 2267, 2467, 2767, 3067, 3167, 3467, 3767, 3967, 4567, 4967, 5167, 5867, 6067, 6367, 6967, 7867, 8167, 8467, 8867, 9067, 9467, 9767, 9967, 10067, 10267, 10567, 10667, 10867, 11467, 11867, 12967, 13267
Offset: 1

Views

Author

Vincenzo Librandi, Jul 07 2014

Keywords

Comments

Also primes of the form 100*n+67. Subsequence of A141882, A141940.

Links

Crossrefs

Cf. similar sequences listed in A244763.
Cf. A141882, A141940.

Programs

  • Magma
    [n: n in PrimesUpTo(14000) | n mod 100 eq 67];
  • Mathematica
    Select[Prime[Range[5, 6000]], Take[IntegerDigits[#], -2]=={6, 7} &]
  • PARI
    select(x->(x % 100)==67, primes(2000)) \\ Michel Marcus, Jul 07 2014

A244774 Prime numbers ending in the prime number 73.

Original entry on oeis.org

73, 173, 373, 673, 773, 1373, 1873, 1973, 2273, 2473, 3373, 3673, 4073, 4273, 4373, 4673, 4973, 5273, 5573, 6073, 6173, 6373, 6473, 6673, 7573, 7673, 7873, 8273, 8573, 9173, 9473, 9973, 10273, 10973, 11173, 11273, 12073, 12373, 12473, 12973, 13873
Offset: 1

Views

Author

Vincenzo Librandi, Jul 07 2014

Keywords

Comments

Also primes of the form 100*k+73. Subsequence of A141885, A141945.

Links

Crossrefs

Cf. A141885, A141945.
Cf. similar sequences listed in A244763.

Programs

  • Magma
    [n: n in PrimesUpTo(14000) | n mod 100 eq 73];
  • Mathematica
    Select[Prime[Range[5, 6000]], Take[IntegerDigits[#], -2]=={7, 3} &]
  • PARI
    select(x->(x % 100)==73, primes(2000)) \\ Michel Marcus, Jul 07 2014

A167441 Prime numbers ending in the prime number 71.

Original entry on oeis.org

71, 271, 571, 971, 1171, 1471, 1571, 1871, 2371, 2671, 2971, 3271, 3371, 3571, 3671, 4271, 4871, 5171, 5471, 6271, 6571, 6871, 6971, 8171, 8971, 9371, 9871, 10271, 10771, 11071, 11171, 11471, 11971, 12071, 12671, 13171, 14071, 14771, 15271
Offset: 1

Views

Author

Mark A. Thomas, Nov 03 2009

Keywords

Links

Crossrefs

Cf. similar sequences listed in A244763.

Programs

  • Magma
    [n: n in PrimesUpTo(16000) | n mod 100 eq 71]; // Vincenzo Librandi, Jul 07 2014
  • Mathematica
    Select[Prime[Range[5, 6000]], Take[IntegerDigits[#], -2]=={7, 1} &] (* Vincenzo Librandi, Jul 07 2014 *)
Select[Prime[Range[6000]],Mod[#,100]==71&] (* Harvey P. Dale, Jan 15 2024 *)

A167443 Prime numbers ending in the prime number 41.

Original entry on oeis.org

41, 241, 541, 641, 941, 1741, 2141, 2341, 2441, 2741, 3041, 3541, 4241, 4441, 5441, 5641, 5741, 6841, 7541, 7741, 7841, 8641, 8741, 8941, 9041, 9241, 9341, 9941, 10141, 11941, 12041, 12241, 12541, 12641, 12841, 12941, 13241, 13441, 13841, 14341
Offset: 1

Views

Author

Mark A. Thomas, Nov 03 2009

Keywords

Links

Crossrefs

Cf. similar sequences listed in A244763.

Programs

  • Magma
    [n: n in PrimesUpTo(15000) | n mod 100 eq 41]; // Vincenzo Librandi, Jul 07 2014
  • Mathematica
    Select[Prime[Range[5,1700]],Take[IntegerDigits[#],-2]=={4,1}&]  (* Harvey P. Dale, Mar 30 2011 *)
  • PARI
    select(x->(x % 100)==41, primes(2000)) \\ Michel Marcus, Jul 07 2014

A167445 Prime numbers ending in the prime number 61.

Original entry on oeis.org

61, 461, 661, 761, 1061, 1361, 1861, 2161, 2861, 3061, 3361, 3461, 3761, 4261, 4561, 4861, 5261, 5861, 6361, 6661, 6761, 6961, 7561, 8161, 8461, 8761, 8861, 9161, 9461, 9661, 10061, 10861, 11161, 11261, 12161, 14461, 14561, 15061, 15161, 15361, 15461
Offset: 1

Views

Author

Mark A. Thomas, Nov 03 2009

Keywords

Links

Crossrefs

Cf. similar sequence listed in A244763.

Programs

  • Magma
    [n: n in PrimesUpTo(16000) | n mod 100 eq 61]; // Vincenzo Librandi, Jul 07 2014
  • Mathematica
    Select[Prime[Range[5, 6000]], Take[IntegerDigits[#], -2]=={6, 1} &] (* Vincenzo Librandi, Jul 07 2014 *)
  • PARI
    select(x->(x % 100)==61, primes(2000)) \\ Michel Marcus, Jul 07 2014

A167626 Prime numbers ending in the prime number 101.

Original entry on oeis.org

101, 5101, 6101, 8101, 12101, 15101, 20101, 21101, 29101, 42101, 44101, 50101, 53101, 54101, 56101, 60101, 65101, 72101, 74101, 77101, 78101, 81101, 83101, 89101, 95101, 98101, 102101, 107101, 116101, 117101, 119101, 125101, 131101
Offset: 1

Views

Author

Mark A. Thomas, Nov 07 2009

Keywords

Links

Crossrefs

Cf. A105106.
Cf. similar sequences listed in A244763.

Programs

  • Magma
    [n: n in PrimesUpTo(160000) | n mod 1000 eq 101]; // Vincenzo Librandi, Jul 07 2014
  • Maple
    select(isprime,[seq(1000*k+101,k=0..1000)]); # Robert Israel, Jul 07 2014
  • Mathematica
    Select[Prime@Range[200000], Mod[#, 1000]==101 &] (* Vincenzo Librandi, Jul 07 2014 *)
Select[Table[1000n+101,{n,0,200}],PrimeQ] (* Harvey P. Dale, Mar 22 2020 *)

Formula

a(n) = 1000*A105106(n)+101. - R. J. Mathar, Nov 13 2009

A167627 Prime numbers ending in the prime number 163.

Original entry on oeis.org

163, 1163, 3163, 6163, 10163, 12163, 13163, 19163, 21163, 25163, 28163, 39163, 40163, 48163, 52163, 54163, 55163, 57163, 69163, 70163, 76163, 78163, 81163, 82163, 84163, 90163, 91163, 106163, 112163, 115163, 117163, 118163, 120163
Offset: 1

Views

Author

Mark A. Thomas, Nov 07 2009

Keywords

Links

Crossrefs

Cf. similar sequences listed in A244763.

Programs

  • Magma
    [n: n in PrimesUpTo(160000) | n mod 1000 eq 163]; // Vincenzo Librandi, Jul 07 2014
  • Mathematica
    Select[Prime@Range[ 200000], Mod[#, 1000]==163 &] (* Vincenzo Librandi, Jul 07 2014 *)
Select[Table[1000n+163,{n,0,150}],PrimeQ] (* This program is several hundred times more efficient that the program above. *) (* Harvey P. Dale, Jan 16 2023 *)

A244764 Prime numbers ending in the prime number 17.

Original entry on oeis.org

17, 317, 617, 1117, 1217, 2017, 2417, 2617, 2917, 3217, 3517, 3617, 3917, 4217, 4517, 4817, 5417, 5717, 6217, 6317, 6917, 7417, 7517, 7717, 7817, 8017, 8117, 8317, 9817, 11117, 11317, 11617, 11717, 12517, 12917, 13217, 13417, 14717, 15017, 15217, 15817
Offset: 1

Views

Author

Vincenzo Librandi, Jul 06 2014

Keywords

Comments

Also primes of the form 100*n+17. Subsequence of A166579.

Links

Crossrefs

Cf. similar sequences listed in A244763.

Programs

  • Magma
    [n: n in PrimesUpTo(16000) | n mod 100 eq 17];
  • Mathematica
    Select[Prime[Range[5, 6000]], Take[IntegerDigits[#], -2]=={1, 7} &]
Select[Prime[Range[2000]],Mod[#,100]==17&] (* Harvey P. Dale, Sep 20 2022 *)
  • PARI
    select(x->(x % 100)==17, primes(2000)) \\ Michel Marcus, Jul 06 2014

A244765 Prime numbers ending in the prime number 19.

Original entry on oeis.org

19, 419, 619, 719, 919, 1019, 1319, 1619, 2719, 2819, 3019, 3119, 3319, 3719, 3919, 4019, 4219, 4519, 4919, 5119, 5419, 5519, 6619, 6719, 7019, 7219, 7919, 8219, 8419, 8719, 8819, 9319, 9419, 9619, 9719, 11119, 11519, 11719, 12119, 12619, 12919, 13219
Offset: 1

Views

Author

Vincenzo Librandi, Jul 06 2014

Keywords

Comments

Also primes of the form 100*n+19. Subsequence of A141887, A141942.

Links

Crossrefs

Cf. A141887, A141942.
Cf. similar sequences listed in A244763.

Programs

  • Magma
    [n: n in PrimesUpTo(16000) | n mod 100 eq 19];
  • Mathematica
    Select[Prime[Range[5, 6000]], Take[IntegerDigits[#], -2]=={1, 9} &]
Select[Prime[Range[1600]],Mod[#,100]==19&] (* Harvey P. Dale, Jul 29 2018 *)
  • PARI
    select(x->(x % 100)==19, primes(2000)) \\ Michel Marcus, Jul 06 2014
Showing 1-10 of 22 results. Next

Started in 1964 by Neil J. A. Sloane | Maintained by The OEIS Foundation Inc.

Content is available under The OEIS End-User License Agreement.