login
This site is supported by donations to The OEIS Foundation.

 

Logo


Hints
(Greetings from The On-Line Encyclopedia of Integer Sequences!)
A060814 Numbers whose cubes contain more than half the same digit and do not end in 0. 0
1, 2, 7, 36, 106, 164, 173, 612, 671, 707, 763, 764, 942, 999, 1001, 1041, 2232, 2402, 2824, 2953, 3543, 4055, 8121, 9999, 10001, 10002, 10003, 10058, 10601, 11551, 12599, 13464, 13701, 13832, 15477, 16942, 17066, 18821, 19202, 19753, 20001 (list; graph; refs; listen; history; text; internal format)
OFFSET

0,2

LINKS

Table of n, a(n) for n=0..40.

EXAMPLE

173^3=5177717, whose digits are more than half 7's.

MATHEMATICA

nchdQ[n_]:=Module[{dc=DigitCount[n^3], idn=IntegerDigits[n^3]}, Max[ dc]>Length[ idn]/2 && Last[idn]>0]; Select[Range[21000], nchdQ] (* Harvey P. Dale, Jul 13 2012 *)

CROSSREFS

Sequence in context: A266356 A196857 A111908 * A192816 A302895 A302905

Adjacent sequences:  A060811 A060812 A060813 * A060815 A060816 A060817

KEYWORD

base,easy,nonn

AUTHOR

Erich Friedman, Apr 29 2001

STATUS

approved

Lookup | Welcome | Wiki | Register | Music | Plot 2 | Demos | Index | Browse | More | WebCam
Contribute new seq. or comment | Format | Style Sheet | Transforms | Superseeker | Recent
The OEIS Community | Maintained by The OEIS Foundation Inc.

License Agreements, Terms of Use, Privacy Policy. .

Last modified October 19 13:01 EDT 2019. Contains 328222 sequences. (Running on oeis4.)