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-5 of 5 results.

A364147 Prime numbers that are the exact average of five consecutive odd semiprimes.

Original entry on oeis.org

101, 677, 743, 811, 907, 1039, 1109, 1129, 1301, 1373, 1381, 1567, 1789, 1931, 1949, 1979, 2029, 2447, 2621, 2663, 2731, 2879, 2909, 2971, 3119, 3187, 3221, 3319, 3529, 3631, 3677, 3803, 3823, 3943, 4201, 4253, 4549, 4597, 4637, 4643, 4649, 4801, 4951, 5119, 5189, 5431, 5987, 6053, 6151, 6311
Offset: 1

Views

Author

Elmo R. Oliveira, Jul 10 2023

Keywords

Examples

			101 is a term because (91 + 93 + 95 + 111 + 115)/5 = 101 is prime.
743 is a term because (737 + 737 + 745 + 749 + 753)/5 = 743 is prime.

Links

Crossrefs

Cf. A000040, A046315.
Cf. A363074, A363187, A363188, A364148, A364149.

Programs

  • Maple
    N:= 10^4: # for terms involving semiprimes up to N
OSP:= select(t -> numtheory:-bigomega(t) = 2, [seq(i,i=1..N,2)]):
select(t -> t::integer and isprime(t), add(OSP[i..-6+i],i=1..5)/5); # Robert Israel, Aug 11 2023
  • Mathematica
    Select[Mean /@ Partition[Select[Range[1, 6500, 2], PrimeOmega[#] == 2 &], 5, 1], PrimeQ] (* Amiram Eldar, Jul 11 2023 *)

A364148 Prime numbers that are the exact average of six consecutive odd semiprimes.

Original entry on oeis.org

23, 79, 109, 491, 599, 797, 809, 853, 953, 1021, 1171, 1289, 1361, 1531, 1543, 1559, 1811, 1951, 1987, 2143, 2179, 2239, 2273, 2309, 2381, 2399, 3169, 3271, 3343, 3371, 3433, 3613, 3701, 4051, 4157, 4297, 4327, 4357, 4457, 4603, 4789, 4871, 5227, 5233, 5443, 5479, 5623, 5711, 5737, 5927, 6073
Offset: 1

Views

Author

Elmo R. Oliveira, Jul 10 2023

Keywords

Examples

			23 is a term because (9 + 15 + 21 + 25 + 33 + 35)/6 = 23 is prime.
109 is a term because (93 + 95 + 111 + 115 + 119 + 121)/6 = 109 is prime.

Crossrefs

Cf. A000040, A046315.
Cf. A363074, A363187, A363188, A364147, A364149.

Programs

  • Mathematica
    Select[Mean /@ Partition[Select[Range[1, 6000, 2], PrimeOmega[#] == 2 &], 6, 1], PrimeQ] (* Amiram Eldar, Jul 11 2023 *)

A364320 Prime numbers that are the exact average of eight consecutive odd semiprimes.

Original entry on oeis.org

43, 317, 607, 719, 853, 887, 919, 1231, 1237, 1283, 1303, 1951, 2179, 2609, 3001, 3271, 3389, 3491, 3547, 3643, 3889, 3931, 4241, 4297, 4447, 4517, 4567, 4621, 4817, 4831, 4871, 4909, 5479, 5623, 5647, 5653, 5953, 6211, 6301, 6869, 7019, 7559, 8011, 8191, 8297, 8311, 8317, 8369, 8447
Offset: 1

Views

Author

Elmo R. Oliveira, Sep 25 2023

Keywords

Examples

			43 is a term because (25 + 33 + 35 + 39 + 49 + 51 + 55 + 57)/8 = 43 is prime.
719 is a term because (703 + 707 + 713 + 717 + 721 + 723 + 731 + 737)/8 = 719 is prime.

Crossrefs

Cf. A000040, A046315.
Cf. A363074, A363187, A363188, A364147, A364148, A364149, A364321, A364689.

Programs

  • Mathematica
    Select[Mean /@ Partition[Select[Range[1, 9000, 2], PrimeOmega[#] == 2 &], 8, 1], PrimeQ] (* Amiram Eldar, Sep 25 2023 *)

A364321 Prime numbers that are the exact average of nine consecutive odd semiprimes.

Original entry on oeis.org

97, 191, 293, 347, 401, 409, 479, 727, 1823, 1931, 2063, 2089, 2897, 2903, 2999, 3061, 3083, 3119, 3571, 3617, 3673, 3727, 3967, 4339, 4373, 4583, 4639, 4703, 4813, 5297, 5347, 5437, 5639, 5821, 6047, 6053, 6311, 6421, 6491, 6529, 6761, 6883, 7283, 7417, 7451, 7949, 8059, 8123, 8237
Offset: 1

Views

Author

Elmo R. Oliveira, Sep 25 2023

Keywords

Examples

			97 is a term because (77 + 85 + 87 + 91 + 93 + 95 + 111 + 115 + 119)/9 = 97 is prime.
401 is a term because (381 + 391 + 393 + 395 + 403 + 407 + 411 + 413 + 415)/9 = 401 is prime.

Crossrefs

Cf. A000040, A046315.
Cf. A363074, A363187, A363188, A364147, A364148, A364149, A364320, A364689.

Programs

  • Mathematica
    Select[Mean /@ Partition[Select[Range[1, 9000, 2], PrimeOmega[#] == 2 &], 9, 1], PrimeQ] (* Amiram Eldar, Sep 25 2023 *)

A364689 Prime numbers that are the exact average of ten consecutive odd semiprimes.

Original entry on oeis.org

43, 53, 73, 83, 113, 373, 449, 577, 971, 1259, 1327, 1381, 1499, 1543, 1847, 2239, 2311, 2339, 2351, 2383, 2953, 3109, 3257, 3389, 4021, 4297, 4919, 5101, 5227, 5591, 5701, 5737, 5927, 6733, 6907, 7109, 7253, 7823, 8011, 9137, 9403, 9613, 10177, 11471, 11621, 11677, 12251, 12479, 12671, 12781
Offset: 1

Views

Author

Elmo R. Oliveira, Sep 25 2023

Keywords

Examples

			43 is a term because (21 + 25 + 33 + 35 + 39 + 49 + 51 + 55 + 57 + 65)/10 = 43 is prime.
449 is a term because (417 + 427 + 437 + 445 + 447 + 451 + 453 + 469 + 471 + 473)/10 = 449 is prime.

Crossrefs

Cf. A000040, A046315.
Cf. A363074, A363187, A363188, A364147, A364148, A364149, A364320, A364321.

Programs

  • Mathematica
    Select[Mean /@ Partition[Select[Range[1, 13000, 2], PrimeOmega[#] == 2 &], 10, 1], PrimeQ] (* Amiram Eldar, Sep 25 2023 *)
Showing 1-5 of 5 results.

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

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