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

A294663 Cubes whose largest digit is 4.

Original entry on oeis.org

343, 314432, 343000, 34012224, 314432000, 343000000, 34012224000, 314432000000, 343000000000, 442102433032, 30304210142233, 34012224000000, 143121324002112, 314432000000000, 333014302331144, 343000000000000, 442102433032000, 30304210142233000, 34012224000000000
Offset: 1

Views

Author

M. F. Hasler, Nov 12 2017

Keywords

Comments

For any term a(n), all numbers of the form a(n)*10^3k, k >= 0, are in this sequence. Primitive terms, i.e., not of this form (or equivalently: without trailing '0'), are 343, 314432, 34012224, 442102433032, 30304210142233, 143121324002112, 333014302331144, ...

Examples

			343 is in the sequence because it is a cube, 343 = 7^3, and its largest digit is 4.

Crossrefs

Cf. A294664 (the corresponding cubic roots).
Cf. A277948 = A277961^2 (analog for squares).
Cf. A278936, A295025, A295021, ..., A295024 (analog for digits 3, 5, 6, ..., 9).
Cf. A000578 (the cubes).

Programs

  • PARI
    for(n=1,2e8, vecmax(digits(n^3))==4&&print1(n^3,","))

Formula

a(n) = A294664(n)^3.

A294996 Numbers n such that the largest digit of n^3 is 6.

Original entry on oeis.org

4, 6, 25, 36, 37, 40, 51, 60, 64, 77, 85, 86, 117, 118, 134, 136, 146, 154, 185, 218, 236, 250, 345, 360, 370, 374, 381, 384, 400, 405, 465, 510, 585, 586, 587, 600, 606, 625, 640, 705, 770, 805, 806, 825, 845, 850, 860, 1011, 1021, 1045, 1046, 1081, 1101, 1124, 1136, 1145, 1146, 1170, 1177, 1180
Offset: 1

Views

Author

M. F. Hasler, Nov 13 2017

Keywords

Comments

For any term a(n), all numbers of the form a(n)*10^k, k >= 0, are in this sequence. We could call "primitive" the terms not of this form, i.e., without trailing '0'.
Includes a*10^k+b for k >= 3 and [a,b] in {[11, 1], [5, 4], [4, 5], [6, 5], [5, 6], [11, 10], [1, 11], [10, 11]}, and 8*10^k+8 for k >= 4. - Robert Israel, Jul 22 2019

Examples

			4 is in the sequence because the largest digit of 4^3 = 64 is 6.

Links

Crossrefs

Cf. A295021 (the corresponding cubes); A278937, A294664, A294665, A294997 .. A294999 (same for digit 3, ..., 9); A295006 (same for squares).
Cf. A000578 (the cubes).

Programs

  • PARI
    for(n=1,2e3, vecmax(digits(n^3))==6&&print1(n","))

A294665 Numbers n such that the largest digit of n^3 is 5.

Original entry on oeis.org

5, 8, 50, 74, 80, 81, 107, 171, 177, 237, 351, 378, 468, 487, 500, 605, 684, 737, 740, 800, 810, 1064, 1070, 1271, 1311, 1365, 1474, 1605, 1645, 1710, 1724, 1758, 1770, 2247, 2364, 2370, 2474, 2485, 2824, 2885, 2925, 3247, 3510, 3780, 4680, 4718, 4870, 4934, 5000, 5247
Offset: 1

Views

Author

M. F. Hasler, Nov 12 2017

Keywords

Comments

For any term a(n), all numbers of the form a(n)*10^k, k >= 0, are in this sequence. Primitive terms, i.e., not of this form (or equivalently: without trailing '0'), are 5, 8, 74, 81, 107, 171, 177, 237, 351, 378, 468, 487, 605, 684, 737, 1064, 1271, 1311, 1365, 1474, 1605, 1645, 1724, 1758, ...

Examples

			8 is in the sequence because the largest digit of 8^3 = 512 is 5.

Crossrefs

Cf. A295025 (the corresponding cubes), A278937 and A294664 (same for digit 3 and 4).
Cf. A000578 (the cubes).

Programs

  • PARI
    for(n=1,2e8, vecmax(digits(n^3))==5&&print1(n","))

A294999 Numbers n such that the largest digit of n^3 is 9.

Original entry on oeis.org

9, 13, 16, 17, 19, 21, 27, 28, 29, 31, 33, 34, 39, 41, 43, 45, 46, 48, 49, 57, 58, 59, 61, 66, 69, 71, 73, 76, 79, 84, 89, 90, 97, 98, 99, 103, 106, 108, 109, 112, 113, 116, 119, 124, 125, 128, 129, 130, 131, 132, 139, 143, 144, 148, 149, 151, 156, 157, 158, 159, 160, 164, 165, 166, 169
Offset: 1

Views

Author

M. F. Hasler, Nov 13 2017

Keywords

Comments

For any term a(n), all numbers of the form a(n)*10^k, k >= 0, are in this sequence. We could call "primitive" the terms not of this form, i.e., without trailing '0'.

Examples

			13 is in the sequence because the largest digit of 13^3 = 2197 is 9.

Crossrefs

Cf. A295024 (the corresponding cubes); A278937, A294664, A294665, A294996, A294997, A294998 (same for digit 3, ..., 8).
Cf. A000578 (the cubes).

Programs

  • Mathematica
    Select[Range[200],Max[IntegerDigits[#^3]]==9&] (* Harvey P. Dale, Jul 08 2018 *)
  • PARI
    for(n=1,200, vecmax(digits(n^3))==9&&print1(n","))

A294997 Numbers n such that the largest digit of n^3 is 7.

Original entry on oeis.org

3, 14, 15, 23, 26, 30, 54, 55, 56, 63, 65, 67, 78, 91, 105, 111, 121, 126, 133, 135, 137, 140, 147, 150, 163, 167, 168, 173, 176, 188, 197, 226, 230, 245, 256, 258, 260, 273, 276, 291, 293, 295, 300, 318, 321, 343, 346, 375, 376, 385, 386, 397, 415, 417, 418, 424, 425, 488, 497
Offset: 1

Views

Author

M. F. Hasler, Nov 13 2017

Keywords

Comments

For any term a(n), all numbers of the form a(n)*10^k, k >= 0, are in this sequence. We could call "primitive" the terms not of this form, i.e., without trailing '0'.

Examples

			3 is in the sequence because the largest digit of 3^3 = 27 is 7.

Crossrefs

Cf. A295022 (the corresponding cubes); A278937, A294664, A294665, A294996 .. A294999 (same for digit 3, ..., 9).
Cf. A000578 (the cubes).

Programs

  • Mathematica
    Select[Range[500],Max[IntegerDigits[#^3]]==7&] (* Harvey P. Dale, Sep 10 2019 *)
  • PARI
    for(n=1,2e3, vecmax(digits(n^3))==7&&print1(n","))

A294998 Numbers n such that the largest digit of n^3 is 8.

Original entry on oeis.org

2, 12, 18, 20, 22, 24, 32, 35, 38, 42, 44, 47, 52, 53, 62, 72, 75, 82, 83, 87, 88, 92, 93, 94, 95, 96, 102, 104, 114, 115, 120, 122, 123, 127, 138, 141, 142, 145, 152, 153, 155, 161, 162, 172, 174, 180, 182, 183, 186, 192, 194, 195, 200, 201, 202, 203, 205, 206, 217, 220, 228, 232, 238, 240, 242, 244, 251
Offset: 1

Views

Author

M. F. Hasler, Nov 13 2017

Keywords

Comments

For any term a(n), all numbers of the form a(n)*10^k, k >= 0, are in this sequence. We could call "primitive" the terms not of this form, i.e., without trailing '0'.

Examples

			12 is in the sequence because the largest digit of 12^3 = 1728 is 8.

Links

Crossrefs

Cf. A295023 (the corresponding cubes); A278937, A294664, A294665, A294996 .. A294999 (same for digit 3, ..., 9); A295008 (same for squares).
Cf. A000578 (the cubes).

Programs

  • Maple
    filter:= n -> max(convert(n^3,base,10))=8:
select(filter, [$1..1000]); # Robert Israel, Jul 03 2020
  • Mathematica
    Select[Range[300],Max[IntegerDigits[#^3]]==8&] (* Harvey P. Dale, Aug 21 2019 *)
  • PARI
    for(n=1,500, vecmax(digits(n^3))==8&&print1(n","))
Showing 1-6 of 6 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.