

A061374


Numbers which have more different digits than their cubes.


1



1920, 13798, 14570, 14870, 15870, 18726, 19200, 28753, 35430, 42690, 43957, 48205, 48910, 80136, 83451, 104683, 105276, 106239, 106247, 108742, 121894, 124975, 126045, 126540, 130756, 130968, 132470, 132654, 134680, 134872, 135409, 135672, 136420, 136825
(list;
graph;
refs;
listen;
history;
text;
internal format)



OFFSET

1,1


COMMENTS

The sequence is infinite since for every element k with '0' as last digit or no '0' at all every k*10^m is also in it.


LINKS

Table of n, a(n) for n=1..34.


EXAMPLE

13798 is okay, since it has five different digits while 13798^3 = 2626929525592 has only four.


MATHEMATICA

Select[Range[150000], Count[DigitCount[#], 0]<Count[DigitCount[#^3], 0]&] (* Harvey P. Dale, Apr 22 2016 *)


PROG

(PARI) isok(n) = length(Set(digits(n, 10))) > length(Set(digits(n^3, 10))) \\ Michel Marcus, Jul 22 2013


CROSSREFS

Sequence in context: A077087 A179696 A249840 * A282474 A252140 A252148
Adjacent sequences: A061371 A061372 A061373 * A061375 A061376 A061377


KEYWORD

nonn,base


AUTHOR

Ulrich Schimke (ulrschimke(AT)aol.com), Jun 08 2001


EXTENSIONS

Corrected and extended by Harvey P. Dale, Apr 22 2016


STATUS

approved



