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

A181392 Squares in A108571.

Original entry on oeis.org

1, 435343551252544, 543345144355225, 21343774737727744, 525664562544416656, 555621544626466564, 645545246266556416, 656542564646552164, 666524445565146256, 2766717773326766736, 8823883385555888521
Offset: 1

Views

Author

Patrick Wieschollek, Oct 17 2010

Keywords

Comments

The last term is 999999999786876856487355368576387875784644 = 999999999893438428238^2. - Giovanni Resta, May 19 2013
There are no squares with 43, 44, or 45 digits. Indeed, numbers of 45 digits have sum of digits 1^1+2^2+...+9^9 = 285, which mod 9 is equal to 6. It is easy to verify that no power can be equal to 6 mod 9, hence there are no squares, cubes, etc. of 45 digits. Similarly, the numbers of 44 and 43 digits can only be obtained by omitting the single 1 or the two 2's, so mod 9 they are equal to 5 and 2, respectively. Again, 2 and 5 are not squares or cubes mod 9, but they can be powers with exponents k = 5, 7, 11, 13, 17, 19, 23, 25,... (numbers not divisible by 2 or 3). Since 10^(44/k) is at most 6.3*10^8 (for k=5) excluding higher powers by generating them is not a tremendous computational effort, which can be further reduced noticing that certain candidates can be excluded based on their last digits. For example, 9993^5 mod 10000 is 3193, which contains a 1. So no number ending in 9993 can be the base for a 5th power of 44 digits (which should lack the 1). Since 4th powers are squares too, they can have at most 42 digits, and since 10^(42/4) is about 3.16*10^10, it is not difficult to ascertain that no 4th powers belong to A108571. - Giovanni Resta, Jul 26 2015

Crossrefs

Extensions

Edited by N. J. A. Sloane, Oct 17 2010

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.