A228951 Numbers n such that decimal expansion of n^n has only one zero.
9, 11, 17, 19, 21, 28, 29
Offset: 1
Programs
-
Mathematica
Select[Range[1000],Count[IntegerDigits[#^#],0]==1&]
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.
Select[Range[1000],Count[IntegerDigits[#^#],0]==1&]
Comments