login
The OEIS Foundation is supported by donations from users of the OEIS and by a grant from the Simons Foundation.

 

Logo


Hints
(Greetings from The On-Line Encyclopedia of Integer Sequences!)
A117229 Number of decimal digits of n in {0,1,4,8,9} 0
1, 1, 0, 0, 1, 0, 0, 0, 1, 1, 2, 2, 1, 1, 2, 1, 1, 1, 2, 2, 1, 1, 0, 0, 1, 0, 0, 0, 1, 1, 1, 1, 0, 0, 1, 0, 0, 0, 1, 1, 2, 2, 1, 1, 2, 1, 1, 1, 2, 2, 1, 1, 0, 0, 1, 0, 0, 0, 1, 1, 1, 1, 0, 0, 1, 0, 0, 0, 1, 1, 1, 1, 0, 0, 1, 0, 0, 0, 1, 1, 2, 2, 1, 1, 2, 1, 1, 1, 2, 2, 2, 2, 1, 1, 2, 1, 1, 1, 2, 2, 3, 3, 2, 2, 3 (list; graph; refs; listen; history; text; internal format)
OFFSET

0,11

COMMENTS

Previous name was "Number of perfect powers A001597 seen in the base 10 representation of n". - Felix Fröhlich, Aug 29 2014

LINKS

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

MAPLE

f:= n -> nops(select(member, convert(n, base, 10), {0, 1, 4, 8, 9})):

map(f, [$0..1000]); # Robert Israel, Aug 12 2014

PROG

(PARI) a(n, v= [1, 1, 0, 0, 1, 0, 0, 0, 1, 1]) = {if (!n, return (1)); d = digits(n); sum(i=1, #d, v[d[i]+1]); } \\ Michel Marcus, Aug 10 2014

CROSSREFS

Sequence in context: A327818 A255481 A241418 * A264119 A225518 A269972

Adjacent sequences:  A117226 A117227 A117228 * A117230 A117231 A117232

KEYWORD

base,easy,nonn

AUTHOR

Giovanni Teofilatto, Apr 22 2006

EXTENSIONS

New definition by Robert Israel and Felix Fröhlich, Aug 08 2014

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 January 29 16:58 EST 2020. Contains 331347 sequences. (Running on oeis4.)