A226273 Number of distinct values u^v, where u and v are digits occurring in decimal representation of n.
1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 2, 1, 3, 3, 3, 3, 3, 3, 3, 3, 3, 3, 1, 4, 3, 4, 4, 4, 4, 4, 3, 3, 4, 1, 4, 4, 4, 4, 4, 4, 3, 3, 3, 4, 1, 4, 4, 4, 4, 4, 3, 3, 4, 4, 4, 1, 4, 4, 4, 4, 3, 3, 4, 4, 4, 4, 1, 4, 4, 4, 3, 3, 4, 4, 4, 4, 4, 1, 4, 4, 3, 3, 4, 4, 4, 4
Offset: 0
Examples
See A226272.
Links
- Reinhard Zumkeller, Table of n, a(n) for n = 0..1000
Programs
-
Haskell
a226273 = length . a226272_row :: Integer -> Int
-
PARI
a(n)=if(n<9, return(1)); my(d=Set(digits(n)),v=List()); for(i=1,#d, for(j=1,#d, listput(v,d[i]^d[j]))); #Set(v) \\ Charles R Greathouse IV, May 13 2015
Comments