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 12 results. Next

A260831 Primes having only {5, 7, 9} as digits.

Original entry on oeis.org

5, 7, 59, 79, 97, 557, 577, 599, 757, 797, 977, 997, 5557, 5779, 7559, 7577, 7757, 7759, 55579, 55799, 55997, 57557, 57559, 57977, 59557, 59779, 59797, 59957, 59999, 75557, 75577, 75797, 75979, 75997, 77557, 77797, 77977, 77999, 79559, 79579, 79757, 79777
Offset: 1

Views

Author

Vincenzo Librandi, Aug 03 2015

Keywords

Comments

A020467, A020468 and A020471 are subsequences.
Subsequence of A030096.

Crossrefs

Cf. similar sequences listed in A260827.

Programs

  • Magma
    [p: p in PrimesUpTo(2*10^5) | Set(Intseq(p)) subset [5, 7, 9]];
  • Mathematica
    Select[Prime[Range[2 10^5]], Complement[IntegerDigits[#], {5, 7, 9}] == {} &]

A020467 Primes that contain digits 5 and 7 only.

Original entry on oeis.org

5, 7, 557, 577, 757, 5557, 7577, 7757, 57557, 75557, 75577, 77557, 555557, 575557, 575777, 577757, 757577, 775757, 775777, 5555777, 5557757, 5575777, 5577577, 5755577, 5775557, 5777557, 7575577, 7577777, 55555777, 55575757, 55755757, 55757777, 57557557
Offset: 1

Views

Author

Keywords

Crossrefs

Subsequence of A030096, A260827-A260831, and A284380.

Programs

  • Magma
    [p: p in PrimesUpTo(55755757 ) | Set(Intseq(p)) subset [5, 7]];// Vincenzo Librandi, Jul 27 2012
    
  • Mathematica
    Flatten[Table[Select[FromDigits/@Tuples[{5,7},n],PrimeQ],{n,8}]]
  • Python
    from sympy import isprime
    from sympy.utilities.iterables import multiset_permutations
    def aupton(terms):
      n, digits, alst = 0, 1, []
      while len(alst) < terms:
        mpstr = "".join(d*digits for d in "57")
        for mp in multiset_permutations(mpstr, digits):
          t = int("".join(mp))
          if isprime(t): alst.append(t)
          if len(alst) == terms: break
        else: digits += 1
      return alst
    print(aupton(33)) # Michael S. Branicky, May 07 2021

A260828 Primes having only {1, 5, 7} as digits.

Original entry on oeis.org

5, 7, 11, 17, 71, 151, 157, 557, 571, 577, 751, 757, 1117, 1151, 1171, 1511, 1571, 1777, 5171, 5557, 5711, 5717, 7151, 7177, 7517, 7577, 7717, 7757, 11117, 11171, 11177, 11551, 11717, 11777, 15511, 15551, 17117, 17551, 51151, 51157, 51511, 51517, 51551, 51577
Offset: 1

Views

Author

Vincenzo Librandi, Aug 02 2015

Keywords

Crossrefs

Subsequence of A030096. A020453, A020455 and A020467 are subsequences.
Cf. similar sequences listed in A260827.
Cf. A000040.

Programs

  • Magma
    [p: p in PrimesUpTo(2*10^5) | Set(Intseq(p)) subset [1,5,7]];
    
  • Mathematica
    Select[Prime[Range[2 10^4]], Complement[IntegerDigits[#], {1, 5, 7}] == {} &]
  • Python
    from sympy import isprime
    from sympy.utilities.iterables import multiset_permutations
    def aupton(terms):
      n, digits, alst = 0, 1, []
      while len(alst) < terms:
        mpstr = "".join(d*digits for d in "157")
        for mp in multiset_permutations(mpstr, digits):
          t = int("".join(mp))
          if isprime(t): alst.append(t)
          if len(alst) == terms: break
        else: digits += 1
      return alst
    print(aupton(44)) # Michael S. Branicky, May 07 2021

A260829 Primes having only {5, 6, 7} as digits.

Original entry on oeis.org

5, 7, 67, 557, 577, 677, 757, 5557, 5657, 6577, 7577, 7757, 55667, 56767, 57557, 57667, 65557, 65657, 65677, 65777, 67567, 67577, 67757, 67777, 75557, 75577, 75767, 76667, 76757, 76777, 77557, 555557, 555677, 555767, 557567, 565567, 565667, 566557, 566567
Offset: 1

Views

Author

Vincenzo Librandi, Aug 02 2015

Keywords

Comments

A020467 and A020469 are subsequences.

Crossrefs

Cf. similar sequences listed in A260827.

Programs

  • Magma
    [p: p in PrimesUpTo(2*10^6) | Set(Intseq(p)) subset [5,6,7]];
  • Mathematica
    Select[Prime[Range[2 10^5]], Complement[IntegerDigits[#], {5, 6, 7}] == {} &]

A260830 Primes having only {5, 7, 8} as digits.

Original entry on oeis.org

5, 7, 557, 577, 587, 757, 787, 857, 877, 887, 5557, 5857, 7577, 7757, 7877, 8887, 55787, 57557, 57587, 57787, 58757, 58787, 75557, 75577, 75787, 77557, 77587, 78577, 78787, 78857, 78877, 78887, 85577, 87557, 87587, 87877, 87887, 555557, 555857, 557857, 558587
Offset: 1

Views

Author

Vincenzo Librandi, Aug 02 2015

Keywords

Comments

A020467 and A020470 are subsequences.

Crossrefs

Cf. similar sequences listed in A260827.

Programs

  • Magma
    [p: p in PrimesUpTo(2*10^6) | Set(Intseq(p)) subset [5,7,8]];
  • Mathematica
    Select[Prime[Range[2 10^5]], Complement[IntegerDigits[#], {5, 7, 8}] == {} &]
    Select[Flatten[Table[FromDigits/@Tuples[{5,7,8},n],{n,6}]],PrimeQ] (* Harvey P. Dale, Oct 06 2017 *)

A384449 Primes having only {0, 4, 7} as digits.

Original entry on oeis.org

7, 47, 4007, 4447, 7477, 44777, 47407, 47777, 74047, 74077, 74707, 74747, 77047, 77447, 77477, 77747, 407047, 407707, 407747, 440047, 444007, 444047, 470077, 470447, 474077, 474707, 477047, 477077, 704447, 704477, 704747, 704777, 707407, 707747, 740477, 744077, 744407, 744707, 747407, 770047
Offset: 1

Views

Author

Jason Bard, May 29 2025

Keywords

Crossrefs

Subsequence of A030432.
Supersequence of A020465.
Cf. Primes that contain only the digits (0,k,7): A199327 (k=1), A261267 (k=2), A260378 (k=3), this sequence (k=4), A260827 (k=5), A261181 (k=9).
Cf. A000040.

Programs

  • Magma
    [p: p in PrimesUpTo(2*10^6) | Set(Intseq(p)) subset [0, 4, 7]];
    
  • Mathematica
    Select[FromDigits/@Tuples[{0, 4, 7}, 6], PrimeQ]
  • Python
    from sympy import sieve
    A384449 = [p for p in sieve.primerange(10**6) if all(n in ['0','4','7'] for n in str(p))] # Jwalin Bhatt,  Jun 02 2025
    
  • Python
    from itertools import count, islice
    from gmpy2 import digits, is_prime
    def A384449_gen(): # generator of terms
        for i in count(1):
            if is_prime(m:=int(digits(i,3).replace('1','4').replace('2','7'))):
                yield m
    A384449_list = list(islice(A384449_gen(),40)) # Chai Wah Wu, Jun 07 2025

A386049 Primes having only {0, 2, 5, 7} as digits.

Original entry on oeis.org

2, 5, 7, 227, 257, 277, 557, 577, 727, 757, 2027, 2207, 2557, 2707, 2777, 5077, 5227, 5507, 5527, 5557, 7027, 7057, 7207, 7507, 7577, 7727, 7757, 20507, 20707, 22027, 22277, 22727, 22777, 25057, 25577, 27077, 27277, 27527, 50077, 50207, 50227, 50527, 50707, 50777
Offset: 1

Views

Author

Jason Bard, Jul 15 2025

Keywords

Comments

Primes with decimal digits only in the set {0,2} mod 5.

Crossrefs

Supersequence of A214705, A260827, A261267.

Programs

  • Magma
    [p: p in PrimesUpTo(10^6) | Set(Intseq(p)) subset [0, 2, 5, 7]];
    
  • Mathematica
    Select[FromDigits /@ Tuples[{0, 2, 5, 7}, n], PrimeQ]
  • PARI
    primes_with(, 1, [0, 2, 5, 7]) \\ uses function in A385776
  • Python
    print(list(islice(primes_with("0257"), 41))) # uses function/imports in A385776
    

A386062 Primes having only {0, 3, 5, 7} as digits.

Original entry on oeis.org

3, 5, 7, 37, 53, 73, 307, 337, 353, 373, 503, 557, 577, 733, 757, 773, 3037, 3307, 3373, 3533, 3557, 3733, 5003, 5077, 5303, 5333, 5503, 5507, 5557, 5573, 5737, 7057, 7307, 7333, 7507, 7537, 7573, 7577, 7703, 7753, 7757, 30307, 30553, 30557, 30577, 30703, 30707
Offset: 1

Views

Author

Jason Bard, Jul 15 2025

Keywords

Crossrefs

Supersequence of A087363, A260223, A260378, A260827.

Programs

  • Magma
    [p: p in PrimesUpTo(10^6) | Set(Intseq(p)) subset [0, 3, 5, 7]];
    
  • Mathematica
    Select[FromDigits /@ Tuples[{0, 3, 5, 7}, n], PrimeQ]
  • PARI
    primes_with(, 1, [0, 3, 5, 7]) \\ uses function in A385776
  • Python
    print(list(islice(primes_with("0357"), 41))) # uses function/imports in A385776
    

A386070 Primes having only {0, 4, 5, 7} as digits.

Original entry on oeis.org

5, 7, 47, 457, 547, 557, 577, 757, 4007, 4057, 4447, 4457, 4507, 4547, 5077, 5407, 5477, 5507, 5557, 7057, 7457, 7477, 7507, 7547, 7577, 7757, 40507, 40577, 44507, 44777, 45007, 45077, 45557, 45707, 45757, 47057, 47407, 47507, 47777, 50047, 50077, 50707, 50777
Offset: 1

Views

Author

Jason Bard, Jul 16 2025

Keywords

Crossrefs

Supersequence of A217039, A260827, A384449.

Programs

  • Magma
    [p: p in PrimesUpTo(10^6) | Set(Intseq(p)) subset [0, 4, 5, 7]];
    
  • Mathematica
    Select[FromDigits /@ Tuples[{0, 4, 5, 7}, n], PrimeQ]
  • PARI
    primes_with(, 1, [0, 4, 5, 7]) \\ uses function in A385776
  • Python
    print(list(islice(primes_with("0457"), 41))) # uses function/imports in A385776
    

A386077 Primes having only {0, 5, 6, 7} as digits.

Original entry on oeis.org

5, 7, 67, 557, 577, 607, 677, 757, 5077, 5507, 5557, 5657, 6007, 6067, 6577, 6607, 7057, 7507, 7577, 7607, 7757, 50077, 50707, 50767, 50777, 55057, 55667, 56767, 57077, 57557, 57667, 60077, 60607, 60757, 65557, 65657, 65677, 65707, 65777, 66067, 67057, 67567
Offset: 1

Views

Author

Jason Bard, Jul 16 2025

Keywords

Crossrefs

Supersequence of A260827, A260829, A385770.

Programs

  • Magma
    [p: p in PrimesUpTo(10^6) | Set(Intseq(p)) subset [0, 5, 6, 7]];
    
  • Mathematica
    Select[FromDigits /@ Tuples[{0, 5, 6, 7}, n], PrimeQ]
  • PARI
    primes_with(, 1, [0, 5, 6, 7]) \\ uses function in A385776
  • Python
    print(list(islice(primes_with("0567"), 41))) # uses function/imports in A385776
    
Showing 1-10 of 12 results. Next