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.

A179932 Number of distinct positive integers that can be formed with the decimal digits of n.

Original entry on oeis.org

1, 1, 1, 1, 1, 1, 1, 1, 1, 2, 2, 4, 4, 4, 4, 4, 4, 4, 4, 2, 4, 2, 4, 4, 4, 4, 4, 4, 4, 2, 4, 4, 2, 4, 4, 4, 4, 4, 4, 2, 4, 4, 4, 2, 4, 4, 4, 4, 4, 2, 4, 4, 4, 4, 2, 4, 4, 4, 4, 2, 4, 4, 4, 4, 4, 2, 4, 4, 4, 2, 4, 4, 4, 4, 4, 4, 2, 4, 4, 2, 4, 4, 4, 4, 4, 4, 4, 2, 4, 2, 4, 4, 4, 4, 4, 4, 4, 4, 2, 3, 5, 10, 10
Offset: 1

Views

Author

Dominick Cancilla, Aug 02 2010

Keywords

Examples

			a(1) = 1 because there is only one number that can be formed with the digits in 1.
a(10) = 2 because the digits in 10 can be used to make 0, 1, 01, and 10, but only 1 and 10 are both nonzero and unique (obviously, 01=1).
		

Programs

  • Mathematica
    Table[Length[Union[FromDigits/@Flatten[Permutations/@Flatten[ Table[ Partition[ IntegerDigits[t],n,1],{n,IntegerLength[t]}],1],1]/.(0-> Nothing)]], {t,110}] (* Requires Mathematica version 10 or later *) (* Harvey P. Dale, Sep 21 2016 *)