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

A353441 Integers m such that the decimal expansion of 1/m contains the digit 5.

Original entry on oeis.org

2, 4, 7, 8, 14, 16, 17, 18, 19, 20, 22, 23, 26, 28, 29, 31, 32, 34, 35, 38, 39, 40, 42, 43, 46, 47, 49, 51, 53, 54, 56, 57, 58, 59, 61, 62, 63, 64, 65, 66, 67, 68, 69, 70, 71, 74, 76, 78, 79, 80, 81, 82, 83, 85, 86, 87, 89, 92, 93, 94, 95, 97, 98, 102, 103, 104, 105, 106, 107, 108, 109
Offset: 1

Views

Author

Bernard Schott and Robert G. Wilson v, Apr 25 2022

Keywords

Comments

If m is a term, 10*m is also a term, so terms with no trailing zeros are all primitive terms.

Examples

			m = 7 is a term since 1/7 = 0.142857142857...
m = 22 is a term since 1/22 = 0.04545454545... (here, 5 is the largest digit).
m = 132 is a term since 1/693 = 0.00757575... (here, 5 is the smallest digit).

Links

Crossrefs

A351471 (largest digit=5) and A352159 (smallest digit=5) are subsequences.
Similar with digit k: A352154 (k=0), A353437 (k=1), A353438 (k=2), A353439 (k=3), A353440 (k=4), this sequence (k=5), A353442 (k=6), A353443 (k=7), A353444 (k=8), A333237 (k=9).
Complement of A362579.

Programs

  • Maple
    filter:= proc(n) local q;
  q:= NumberTheory:-RepeatingDecimal(1/n);
  member(5,RepeatingPart(q)) or member(5, NonRepeatingPart(q))
end proc:
select(filter, [$1..200]); # Robert Israel, Apr 25 2023
  • Mathematica
    f[n_] := Union[ Flatten[ RealDigits[ 1/n][[1]] ]]; Select[ Range@ 125, MemberQ[f@#, 5] &]
  • Python
    from itertools import count, islice
from sympy import multiplicity, n_order
def A353441_gen(startvalue=1): # generator of terms >= startvalue
    for a in count(max(startvalue,1)):
        m2, m5 = (~a&a-1).bit_length(), multiplicity(5,a)
        k, m = 10**max(m2,m5), 10**n_order(10,a//(1<A353441_list = list(islice(A353441_gen(),20)) # Chai Wah Wu, May 01 2023

A353437 Integers m such that the decimal expansion of 1/m contains the digit 1.

Original entry on oeis.org

1, 6, 7, 8, 9, 10, 14, 17, 19, 21, 23, 24, 26, 28, 29, 31, 32, 34, 35, 38, 39, 43, 46, 47, 49, 51, 52, 53, 54, 55, 56, 57, 58, 59, 60, 61, 62, 63, 64, 65, 66, 67, 68, 69, 70, 71, 72, 73, 74, 75, 76, 77, 78, 79, 80, 81, 82, 83, 84, 85, 86, 87, 88, 89, 90, 91, 92, 93, 94, 95, 96, 97, 98, 99, 100
Offset: 1

Views

Author

Bernard Schott and Robert G. Wilson v, Apr 19 2022

Keywords

Comments

If m is a term, 10*m is also a term, so terms with no trailing zeros are all primitive terms.

Examples

			m = 7 is a term since 1/7 = 0.142857142857... (here, 1 is the smallest digit).
m = 17 is a term since 1/17 = 0.05882352941176470588235294117647...
m = 99 is a term since 1/99 = 0.0101010101... (here, 1 is the largest digit).

Crossrefs

A333402 (largest digit=1) and A352155 (smallest digit=1) are subsequences.
Similar with digit k: A352154 (k=0), this sequence (k=1), A353438 (k=2), A353439 (k=3), A353440 (k=4), A353441 (k=5), A353442 (k=6), A353443 (k=7), A353444 (k=8), A333237 (k=9).

Programs

  • Mathematica
    f[n_] := Union[ Flatten[ RealDigits[ 1/n][[1]] ]]; Select[ Range@ 125, MemberQ[f@#, 1] &]

A353438 Integers m such that the decimal expansion of 1/m contains the digit 2.

Original entry on oeis.org

4, 5, 7, 8, 13, 14, 16, 17, 19, 23, 28, 29, 31, 32, 34, 35, 36, 37, 38, 39, 40, 41, 42, 43, 44, 45, 46, 47, 48, 49, 50, 51, 52, 53, 56, 57, 58, 59, 61, 62, 64, 67, 68, 69, 70, 71, 76, 77, 78, 79, 80, 81, 82, 83, 85, 86, 87, 89, 92, 93, 94, 95, 97, 98, 102, 103, 105, 106, 107, 108, 109
Offset: 1

Views

Author

Bernard Schott and Robert G. Wilson v, Apr 22 2022

Keywords

Comments

If m is a term, 10*m is also a term, so terms with no trailing zeros are all primitive terms.

Examples

			m = 8 is a term since 1/8 = 0.125.
m = 44 is a term since 1/44 = 0.022727272727... (here, 2 is the smallest digit).
m = 495 is a term since 1/495 = 0.002020202... (here, 2 is the largest digit).

Crossrefs

A341383 (largest digit=2) and A352156 (smallest digit=2) are subsequences.
Similar with digit k: A352154 (k=0), A353437 (k=1), this sequence (k=2), A353439 (k=3), A353440 (k=4), A353441 (k=5), A353442 (k=6), A353443 (k=7), A353444 (k=8), A333237 (k=9).

Programs

  • Mathematica
    f[n_] := Union[ Flatten[ RealDigits[ 1/n][[1]] ]]; Select[ Range@ 125, MemberQ[f@#, 2] &]

A353439 Integers m such that the decimal expansion of 1/m contains the digit 3.

Original entry on oeis.org

3, 12, 13, 17, 19, 23, 26, 27, 28, 29, 30, 31, 32, 33, 34, 38, 41, 42, 43, 46, 47, 48, 49, 51, 52, 53, 57, 58, 59, 61, 62, 63, 65, 67, 68, 69, 71, 72, 73, 74, 75, 76, 81, 83, 85, 87, 88, 89, 92, 93, 94, 95, 97, 98, 102, 103, 104, 105, 106, 107, 109, 113, 114, 115, 116
Offset: 1

Views

Author

Bernard Schott and Robert G. Wilson v, Apr 22 2022

Keywords

Comments

If m is a term, 10*m is also a term, so terms with no trailing zeros are all primitive terms.

Examples

			m = 12 is a term since 1/12 = 0.083333333333... (here, 3 is the smallest digit).
m = 13 is a term since 1/13 = 0.076923076923...
m = 75 is a term since 1/15 = 0.013333333333... (here, 3 is the largest digit).

Crossrefs

A350814 (largest digit=3) and A352157 (smallest digit=3) are subsequences.
Similar with digit k: A352154 (k=0), A353437 (k=1), A353438 (k=2), this sequence (k=3), A353440 (k=4), A353441 (k=5), A353442 (k=6), A353443 (k=7), A353444 (k=8), A333237 (k=9).

Programs

  • Mathematica
    f[n_] := Union[ Flatten[ RealDigits[ 1/n][[1]] ]]; Select[ Range@ 125, MemberQ[f@#, 3] &]

A353440 Integers m such that the decimal expansion of 1/m contains the digit 4.

Original entry on oeis.org

7, 14, 17, 19, 21, 22, 23, 24, 25, 26, 28, 29, 31, 34, 35, 38, 39, 41, 43, 46, 47, 49, 51, 53, 56, 57, 58, 59, 61, 62, 65, 67, 68, 69, 70, 71, 76, 79, 81, 83, 84, 85, 86, 87, 89, 92, 93, 94, 95, 96, 97, 98, 102, 103, 104, 106, 107, 109, 112, 113, 114, 115, 116, 117, 118
Offset: 1

Views

Author

Bernard Schott and Robert G. Wilson v, Apr 24 2022

Keywords

Comments

If m is a term, 10*m is also a term, so terms with no trailing zeros are all primitive terms.

Examples

			m = 14 is a term since 1/14 = 0.0714285714285...
m = 22 is a term since 1/22 = 0.04545454545... (here, 4 is the smallest digit).
m = 693 is a term since 1/693 = 0.001443001443... (here, 4 is the largest digit).

Links

Crossrefs

A351470 (largest digit=4) and A352158 (smallest digit=4) are subsequences.
Similar with digit k: A352154 (k=0), A353437 (k=1), A353438 (k=2), A353439 (k=3), this sequence (k=4), A353441 (k=5), A353442 (k=6), A353443 (k=7), A353444 (k=8), A333237 (k=9).

Programs

  • Mathematica
    f[n_] := Union[ Flatten[ RealDigits[ 1/n][[1]] ]]; Select[ Range@ 125, MemberQ[f@#, 4] &]

A353442 Integers m such that the decimal expansion of 1/m contains the digit 6.

Original entry on oeis.org

6, 13, 15, 16, 17, 19, 21, 23, 24, 26, 29, 31, 34, 38, 39, 46, 47, 49, 51, 52, 53, 57, 58, 59, 60, 61, 62, 64, 65, 68, 69, 71, 73, 76, 79, 81, 83, 84, 85, 86, 87, 88, 89, 92, 93, 94, 95, 96, 97, 98, 102, 103, 104, 106, 107, 109, 113, 114, 115, 116, 118, 119, 121, 122, 124, 126
Offset: 1

Views

Author

Bernard Schott and Robert G. Wilson v, Apr 25 2022

Keywords

Comments

If m is a term, 10*m is also a term, so terms with no trailing zeros are all primitive terms.

Examples

			m = 6 is a term since 1/6 = 0.16666666666...
m = 13 is a term since 1/13 = 0.076923076923...
m = 103125 is a term since 1/103125 = 0.00000969696...

Links

Crossrefs

A351472 (largest digit=6) and A352160 (smallest digit=6) are subsequences.
Similar with digit k: A352154 (k=0), A353437 (k=1), A353438 (k=2), A353439 (k=3), A353440 (k=4), A353441 (k=5), this sequence (k=6), A353443 (k=7), A353444 (k=8), A333237 (k=9).

Programs

  • Mathematica
    f[n_] := Union[ Flatten[ RealDigits[ 1/n][[1]] ]]; Select[ Range@ 150, MemberQ[f@#, 6] &]

A353443 Integers m such that the decimal expansion of 1/m contains the digit 7.

Original entry on oeis.org

7, 13, 14, 17, 19, 21, 23, 27, 28, 29, 34, 35, 36, 37, 38, 43, 44, 46, 47, 49, 51, 52, 53, 56, 57, 58, 59, 61, 63, 67, 68, 69, 70, 71, 76, 77, 79, 81, 83, 84, 85, 86, 87, 89, 92, 93, 94, 95, 97, 98, 102, 103, 107, 109, 112, 113, 114, 115, 116, 117, 118, 119, 121, 122, 126, 127
Offset: 1

Views

Author

Bernard Schott and Robert G. Wilson v, Apr 25 2022

Keywords

Comments

If m is a term, 10*m is also a term, so terms with no trailing zeros are all primitive terms.

Examples

			m = 7 is a term since 1/7 = 0.142857142857...
m = 27 is a term since 1/27 = 0.037037037... (here, 7 is the largest digit).

Links

Crossrefs

A351473 (largest digit=7) is a subsequence.
Similar with digit k: A352154 (k=0), A353437 (k=1), A353438 (k=2), A353439 (k=3), A353440 (k=4), A353441 (k=5), A353442 (k=6), this sequence (k=7), A353444 (k=8), A333237 (k=9).

Programs

  • Mathematica
    f[n_] := Union[ Flatten[ RealDigits[ 1/n][[1]] ]]; Select[ Range@ 150, MemberQ[f@#, 7] &]
Showing 1-7 of 7 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.