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

A260125 Primes having only {0, 2, 3} as digits.

Original entry on oeis.org

2, 3, 23, 223, 233, 2003, 2203, 2333, 3023, 3203, 3323, 20023, 20233, 20323, 20333, 22003, 22303, 23003, 23203, 23333, 30203, 30223, 30323, 32003, 32203, 32233, 32303, 32323, 33023, 33203, 33223, 200003, 200023, 200033, 200323, 203023, 203233, 203323
Offset: 1

Views

Author

Vincenzo Librandi, Jul 17 2015

Keywords

Links

Crossrefs

Cf. Primes that contain only the digits (2,3,k): this sequence (k=0), A062350 (k=1), A199342 (k=4), A214703 (k=5), A260126 (k=6), A214704 (k=7), A260127 (k=8), A260128 (k=9).
Cf. A020458 (a subsequence).

Programs

  • Magma
    [p: p in PrimesUpTo(300000) | Intseq(p) subset {2,3,0}];
  • Mathematica
    Select[Prime[Range[2 10^4]], Complement[IntegerDigits[#], {2, 3, 0}]=={} &]
Select[FromDigits/@Tuples[{0,2,3},6],PrimeQ] (* Harvey P. Dale, Mar 06 2020 *)

A199306 Palindromic primes in the sense of A007500 with digits '0', '1' and '6' only.

Original entry on oeis.org

11, 101, 1061, 1601, 10061, 10601, 11161, 16001, 16061, 16111, 16661, 101611, 106661, 116101, 166601, 1011601, 1016011, 1016611, 1061101, 1066111, 1106101, 1110611, 1111661, 1116601, 1160111, 1160611, 1166101, 1600061, 1611161, 1616161, 1660661, 1661111, 10011101, 10100161, 10106111
Offset: 1

Views

Author

M. F. Hasler, Nov 06 2011

Keywords

Comments

All terms start and end with the digit '1'. This fact is used in the given PARI program.

Crossrefs

Cf. A020449 - A020472, A062350, A087510 - A087515, A199325 - A199329.

Programs

  • Magma
    [p: p in PrimesUpTo(10^8) | Set(Intseq(p)) subset [0,1,6] and IsPrime(Seqint(Reverse(Intseq(p))))]; // Bruno Berselli, Nov 07 2011
  • PARI
    a(n=50,list=0,L=[0,1,6])={ for(d=1,1e9, my(t,u=vector(d-1,i,10^(d-i))~,o=10^d+1);forvec(v=vector(#u,i,[1,#L]),isprime(t=o+vector(#u,i,L[v[i]])*u) || next; isprime(A004086(t)) || next; list & print1(t", "); n-- || return(t)))}  \\ M. F. Hasler, Nov 07 2011

A386085 Primes having only {1, 2, 3, 4} as digits.

Original entry on oeis.org

2, 3, 11, 13, 23, 31, 41, 43, 113, 131, 211, 223, 233, 241, 311, 313, 331, 421, 431, 433, 443, 1123, 1213, 1223, 1231, 1321, 1423, 1433, 2111, 2113, 2131, 2141, 2143, 2213, 2221, 2243, 2311, 2333, 2341, 2411, 2423, 2441, 3121, 3221, 3313, 3323, 3331, 3343, 3413
Offset: 1

Views

Author

Jason Bard, Jul 16 2025

Keywords

Links

Crossrefs

Subsequence of A036956, A036958.
Supersequence of A062350, A199341, A199342, A260267.
Cf. A000040, A385776.

Programs

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

A386086 Primes having only {1, 2, 3, 5} as digits.

Original entry on oeis.org

2, 3, 5, 11, 13, 23, 31, 53, 113, 131, 151, 211, 223, 233, 251, 311, 313, 331, 353, 521, 523, 1123, 1151, 1153, 1213, 1223, 1231, 1321, 1511, 1523, 1531, 1553, 2111, 2113, 2131, 2153, 2213, 2221, 2251, 2311, 2333, 2351, 2521, 2531, 2551, 3121, 3221, 3251, 3253
Offset: 1

Views

Author

Jason Bard, Jul 16 2025

Keywords

Links

Crossrefs

Subsequence of A190222.
Supersequence of A062350, A214703, A385773.
Cf. A000040, A385776.

Programs

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

A386087 Primes having only {1, 2, 3, 6} as digits.

Original entry on oeis.org

2, 3, 11, 13, 23, 31, 61, 113, 131, 163, 211, 223, 233, 263, 311, 313, 331, 613, 631, 661, 1123, 1163, 1213, 1223, 1231, 1321, 1361, 1613, 1621, 1663, 2111, 2113, 2131, 2161, 2213, 2221, 2311, 2333, 2621, 2633, 2663, 3121, 3163, 3221, 3313, 3323, 3331, 3361, 3613
Offset: 1

Views

Author

Jason Bard, Jul 16 2025

Keywords

Links

Crossrefs

Supersequence of A062350, A260126, A385774, A385777.
Cf. A000040, A385776.

Programs

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

A386088 Primes having only {1, 2, 3, 7} as digits.

Original entry on oeis.org

2, 3, 7, 11, 13, 17, 23, 31, 37, 71, 73, 113, 127, 131, 137, 173, 211, 223, 227, 233, 271, 277, 311, 313, 317, 331, 337, 373, 727, 733, 773, 1117, 1123, 1171, 1213, 1217, 1223, 1231, 1237, 1277, 1321, 1327, 1373, 1721, 1723, 1733, 1777, 2111, 2113, 2131, 2137
Offset: 1

Views

Author

Jason Bard, Jul 16 2025

Keywords

Links

Crossrefs

Supersequence of A062350, A214704, A260379, A260889.
Cf. A000040, A385776.

Programs

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

A386089 Primes having only {1, 2, 3, 8} as digits.

Original entry on oeis.org

2, 3, 11, 13, 23, 31, 83, 113, 131, 181, 211, 223, 233, 281, 283, 311, 313, 331, 383, 811, 821, 823, 881, 883, 1123, 1181, 1213, 1223, 1231, 1283, 1321, 1381, 1811, 1823, 1831, 2111, 2113, 2131, 2213, 2221, 2281, 2311, 2333, 2381, 2383, 2833, 3121, 3181, 3221
Offset: 1

Views

Author

Jason Bard, Jul 16 2025

Keywords

Links

Crossrefs

Supersequence of A062350, A260127, A385775, A385778.
Cf. A000040, A385776.

Programs

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

A386090 Primes having only {1, 2, 3, 9} as digits.

Original entry on oeis.org

2, 3, 11, 13, 19, 23, 29, 31, 113, 131, 139, 191, 193, 199, 211, 223, 229, 233, 239, 293, 311, 313, 331, 911, 919, 929, 991, 1123, 1129, 1193, 1213, 1223, 1229, 1231, 1291, 1319, 1321, 1399, 1913, 1931, 1933, 1993, 1999, 2111, 2113, 2129, 2131, 2213, 2221, 2239
Offset: 1

Views

Author

Jason Bard, Jul 16 2025

Keywords

Links

Crossrefs

Supersequence of A062350, A260128, A329761, A385776.
Cf. A000040, A385776.

Programs

  • Magma
    [p: p in PrimesUpTo(10^6) | Set(Intseq(p)) subset [1, 2, 3, 9]];
  • Mathematica
    Flatten[Table[Select[FromDigits /@ Tuples[{1, 2, 3, 9}, n], PrimeQ], {n, 7}]]
  • PARI
    primes_with(, 1, [1, 2, 3, 9]) \\ uses function in A385776
  • Python
    print(list(islice(primes_with("1239"), 41))) # uses function/imports in A385776
Showing 1-8 of 8 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.