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.

A328560 Numbers whose product of digits is a power of 10.

Original entry on oeis.org

1, 11, 25, 52, 111, 125, 152, 215, 251, 455, 512, 521, 545, 554, 1111, 1125, 1152, 1215, 1251, 1455, 1512, 1521, 1545, 1554, 2115, 2151, 2255, 2511, 2525, 2552, 4155, 4515, 4551, 5112, 5121, 5145, 5154, 5211, 5225, 5252, 5415, 5451, 5514, 5522, 5541, 5558, 5585
Offset: 1

Views

Author

Keywords

Comments

All terms must have only 1, 2, 4, 5, 8 as digits.
A subsequence of A328095.

Crossrefs

Programs

  • Maple
    q:= n-> (m-> m>0 and m=10^ilog[10](m))(mul(i, i=convert(n, base, 10))):
    select(q, [$1..6000])[];

A284295 Numbers n such that product of digits of n is a power of 9.

Original entry on oeis.org

1, 9, 11, 19, 33, 91, 99, 111, 119, 133, 191, 199, 313, 331, 339, 393, 911, 919, 933, 991, 999, 1111, 1119, 1133, 1191, 1199, 1313, 1331, 1339, 1393, 1911, 1919, 1933, 1991, 1999, 3113, 3131, 3139, 3193, 3311, 3319, 3333, 3391, 3399, 3913, 3931, 3939, 3993
Offset: 1

Views

Author

Jaroslav Krizek, Mar 25 2017

Keywords

Comments

Supersequence of A284294.

Examples

			1111 is in the sequence because 1*1*1*1 = 1 = 9^0.
		

Crossrefs

Cf. Numbers n such that product of digits of n is a power of k for k = 0 - 9: A284375 (k = 0), A002275 (k = 1), A028846 (k = 2), A174813 (k = 3), A284323 (k = 4), A276037 (k = 5), A276038 (k = 6), A276039 (k = 7), A284324 (k = 8), this sequence (k = 9).

Programs

  • Magma
    Set(Sort([n: n in [1..10000], k in [0..20] | &*Intseq(n) eq 9^k]))
  • Mathematica
    FromDigits /@ Select[Join @@ Map[Tuples[{1, 3, 9}, #] &, Range@ 4], IntegerQ@ Log[9, Times @@ #] &] (* Michael De Vlieger, Mar 25 2017 *)

A284324 Numbers k such that product of digits of k is a power of 8.

Original entry on oeis.org

1, 8, 11, 18, 24, 42, 81, 88, 111, 118, 124, 142, 181, 188, 214, 222, 241, 248, 284, 412, 421, 428, 444, 482, 811, 818, 824, 842, 881, 888, 1111, 1118, 1124, 1142, 1181, 1188, 1214, 1222, 1241, 1248, 1284, 1412, 1421, 1428, 1444, 1482, 1811, 1818, 1824, 1842
Offset: 1

Views

Author

Jaroslav Krizek, Mar 26 2017

Keywords

Comments

There are (2 + 4^d)/3 terms with d digits, for each d >= 1. - Robert Israel, Mar 31 2017

Examples

			1111 is in the sequence because 1*1*1*1 = 1 = 8^0.
		

Crossrefs

Supersequence of A213084.
Cf. Numbers n such that product of digits of n is a power of k for k = 0 - 9: A284375 (k = 0), A002275 (k = 1), A028846 (k = 2), A174813 (k = 3), A284323 (k = 4), A276037 (k = 5), A276038 (k = 6), A276039 (k = 7), this sequence (k = 8), A284295 (k = 9).

Programs

  • Magma
    Set(Sort([n: n in [1..10000], k in [0..20] | &*Intseq(n) eq 8^k]));
  • Maple
    dmax:= 4: # to get all terms with at most dmax digits
    B[0,1]:= {1,8}:
    B[1,1]:= {2}:
    B[2,1]:= {4}:
    for d from 2 to dmax do
      for j from 0 to 2 do
        B[j,d]:= map(t -> (10*t+1,10*t+8), B[j,d-1])
            union map(t -> 10*t+4, B[(j+1) mod 3, d-1])
            union map(t->10*t+2, B[(j+2) mod 3, d-1])
    od od:
    seq(op(sort(convert(B[0,d],list))),d=1..dmax); # Robert Israel, Mar 31 2017

A284323 Numbers k such that product of digits of k is a power of 4.

Original entry on oeis.org

1, 4, 11, 14, 22, 28, 41, 44, 82, 88, 111, 114, 122, 128, 141, 144, 182, 188, 212, 218, 221, 224, 242, 248, 281, 284, 411, 414, 422, 428, 441, 444, 482, 488, 812, 818, 821, 824, 842, 848, 881, 884, 1111, 1114, 1122, 1128, 1141, 1144, 1182, 1188, 1212, 1218
Offset: 0

Views

Author

Jaroslav Krizek, Mar 25 2017

Keywords

Examples

			1111 is in the sequence because 1*1*1*1 = 1 = 4^0.
		

Crossrefs

Supersequence of A032822.
Cf. Numbers n such that product of digits of n is a power of k for k = 0 - 9: A284375 (k = 0), A002275 (k = 1), A028846 (k = 2), A174813 (k = 3), this sequence (k = 4), A276037 (k = 5), A276038 (k = 6), A276039 (k = 7), A284324 (k = 8), A284295 (k = 9).

Programs

  • Magma
    Set(Sort([n: n in [1..10000], k in [0..20] | &*Intseq(n) eq 4^k]));
  • Mathematica
    FromDigits /@ Select[Join @@ Map[Tuples[2^Range[0, 3], #] &, Range@ 4], IntegerQ@ Log[4, Times @@ #] &] (* Michael De Vlieger, Mar 25 2017 *)

A316315 Numbers k such that the product of digits of k is a power of 12.

Original entry on oeis.org

1, 11, 26, 34, 43, 62, 111, 126, 134, 143, 162, 216, 223, 232, 261, 289, 298, 314, 322, 341, 368, 386, 413, 431, 449, 466, 494, 612, 621, 638, 646, 664, 683, 829, 836, 863, 892, 928, 944, 982, 1111, 1126, 1134, 1143, 1162, 1216, 1223, 1232, 1261, 1289, 1298
Offset: 1

Views

Author

Isaac Weiss and Henry Potts-Rubin, Jun 29 2018

Keywords

Examples

			466 is in the sequence because 4*6*6 = 144 = 12^2.
		

Crossrefs

Programs

  • Mathematica
    FromDigits /@ Select[Join @@ Map[Tuples[{1, 2, 3, 4, 6, 8, 9}, #] &, Range@4], IntegerQ@Log[12, Times @@ #] &]

Extensions

Two duplicate terms removed by Alois P. Heinz, Oct 20 2019
Showing 1-5 of 5 results.