|
%I #10 Oct 15 2013 22:30:59
%S 1,1,1,1,1,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,3,3,3,2,3,2,3,3,
%T 3,2,3,3,3,3,3,2,2,3,3,2,2,2,2,2,2,3,3,3,3,3,3,3,2,3,3,3,3,2,2,3,2,2,
%U 3,3,2,3,3,2,3,2,3,3,3,3,3,3,3,2,3,2,2,3,3,3,3,3,3,3,2,3,3,3,3,3,3,2,3,3,3
%N Number of different decimal digits in n-th prime.
%H Reinhard Zumkeller, <a href="/A060417/b060417.txt">Table of n, a(n) for n = 1..10000</a>
%F Table[Length[Union[IntegerDigits[Prime[w]]]], {w, 1, 1000}]
%e The maximum is 10. Thus 1234567891 is a prime with 9 and 123456789011 with 10 different decimal digits.
%o (Haskell)
%o import Data.List (nub, sort)
%o a060417 = length . nub . show . a000040
%o -- _Reinhard Zumkeller_, Apr 08 2012
%Y Cf. A055642, A097944.
%K base,easy,nonn
%O 1,6
%A _Labos Elemer_, Apr 05 2001
|
