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

A108571 Any digit d in the sequence says: "I am part of an integer in which you'll find d digits d".

Original entry on oeis.org

1, 22, 122, 212, 221, 333, 1333, 3133, 3313, 3331, 4444, 14444, 22333, 23233, 23323, 23332, 32233, 32323, 32332, 33223, 33232, 33322, 41444, 44144, 44414, 44441, 55555, 122333, 123233, 123323, 123332, 132233, 132323, 132332, 133223, 133232, 133322, 155555
Offset: 1

Views

Author

Eric Angelini, Jul 05 2005

Keywords

Comments

The sequence is finite. Last term: 999999999888888887777777666666555554444333221.
Number of terms is 66712890763701234740813164553708284. - Zak Seidov, Jan 02 2007
Fixed points of A139337. - Reinhard Zumkeller, Apr 14 2008
Sequence contains squares (A181392) and cubes (A225886^3) but no higher powers, see Comments in A181392. - Giovanni Resta, May 19 2013

Examples

			23323 is in the sequence because it has two 2's and three 3's.
23332 is in the sequence because it has two 2's and three 3's.
23333 is not in the sequence because it has only one 2 and four 3's.
		

Crossrefs

Cf. A127007, A139337, A078348 (subsequence of primes), A181392, A225886.

Programs

  • PARI
    is(n)={ vecmin(n=vecsort(digits(n))) && #n==normlp(Set(n),1) && !for(i=1,#n, n[i+n[i]-1]==n[i] || return; i+n[i]>#n || n[i+n[i]]>n[i] || return; n[i]>1 && i+=n[i]-1)} \\ M. F. Hasler, Sep 22 2014
    
  • Python
    # see link for a function that directly generates terms
    def ok(n): s = str(n); return all(s.count(d) == int(d) for d in set(s))
    def aupto(limit): return [m for m in range(1, limit+1) if ok(m)]
    print(aupto(155555)) # Michael S. Branicky, Jan 22 2021

A225886 Numbers whose cube is in A108571 (i.e., if it contains digit 'd' it contains d copies of it).

Original entry on oeis.org

1, 39943162355, 367743626989, 372479081599, 384263945797, 425427609997, 833230637077, 924004183216, 986073549499, 996147664414, 1139347038032, 1420866014167, 1531843001692, 1706360863129, 1861996227349, 1871975416279, 1899165154429, 2077205393866
Offset: 1

Views

Author

Giovanni Resta, May 19 2013

Keywords

Comments

The last term in the sequence is 99997991522989, whose cube is 999939746899855868958748787736573465847669.

Examples

			39943162355 is in the sequence since its cube 63727566782531668573568877888875 belongs to A108571.
		

Crossrefs

A356071 Numbers whose square is in A108571.

Original entry on oeis.org

1, 20864888, 23309765, 146095088, 725027284, 745400258, 803458304, 810273142, 816409484, 1663345356, 2970502211, 5035530306, 5705842932, 5801143392, 5969549784, 6143081912, 6582975516, 6801076116, 6828208884, 6830325216, 6911416408, 7248217206, 7248822984, 7317408465
Offset: 1

Views

Author

Jianing Song, Jul 25 2022

Keywords

Comments

Square root of A181392. The last term is 999999999893438428238.
There are no perfect powers beyond 1 in this sequence; see the comment in A181392.

Examples

			23309765 is a term since 23309765^2 = 543345144355225 has 1 digit '1', 2 digits '2', 3 digits '3', 4 digits '4' and 5 digits '5'.
		

Crossrefs

Programs

  • Mathematica
    Map[Sqrt, Import["https://oeis.org/A181392/b181392.txt", "Data"][[1 ;; 24, -1]] ] (* Michael De Vlieger, Jul 25 2022, computed from b-file at A181392 *)

A356072 Cubes in A108571.

Original entry on oeis.org

1, 63727566782531668573568877888875, 49731947369965677347595574679599669, 51677995937349669479966437557564799, 56739945449541793697765966999776573, 76997569379457651594939677645469973, 578489779534895499899488878979775533, 788899738636778969999897877368221696
Offset: 1

Views

Author

Jianing Song, Jul 25 2022

Keywords

Comments

Cube of A225886. The last term is 999939746899855868958748787736573465847669.

Examples

			63727566782531668573568877888875 is a term since it is the cube of 39943162355, and it has 1 digit '1', 2 digits '2', 3 digits '3', 5 digits '5', 6 digits '6', 7 digits '7' and 8 digits '8'.
		

Crossrefs

Showing 1-4 of 4 results.