Voozh

A240963

Numbers n such that the decimal expansion of n^n contains no zeros.

1, 2, 3, 4, 5, 6, 7, 8, 22

OFFSET

1,2

COMMENTS

A240962(a(n)) = 0.

The sequence seems to be finite; compare A007377 (n such that 2^n contains no 0).

For no reason I can fathom this is a subsequence of A053408. - Charles R Greathouse IV, Aug 21 2014

LINKS

EXAMPLE

1^1 = 1

2^2 = 4

3^3 = 27

4^4 = 256

5^5 = 3125

6^6 = 46656

7^7 = 823543

8^8 = 16777216

22^22 = 341427877364219557396646723584

MATHEMATICA

Select[Range[10^4], If[Count[IntegerDigits[#^#], 0] == 0, True] &] (* Michael De Vlieger, Aug 07 2014 *)

PROG

(PARI)

for(n=1, 10^3, d=digits(n^n); if(vecmin(d), print1(n, ", "))) \\ Derek Orr, Aug 05 2014

CROSSREFS

KEYWORD

nonn,base

AUTHOR

Anthony Sand, Aug 05 2014

STATUS

approved

URL: https://oeis.org/A240963