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

 

Logo


Hints
(Greetings from The On-Line Encyclopedia of Integer Sequences!)
A217096 Characteristic function of numbers that have a nonleading zero in their decimal representation (A011540). 0 itself is also included, so a(0) = 1. 3
1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 0, 0, 0 (list; graph; refs; listen; history; text; internal format)
OFFSET

0

LINKS

Antti Karttunen, Table of n, a(n) for n = 0..5000

Index entries for characteristic functions

FORMULA

a(n) = 1 - A057427(A007954(n)) = 1 - sign(dp_10(n)).

where dp_10(n) = digital product of n in base 10.

a(n) = 1 - A168046(n).

a(n) = sign(A055641(n)).

g(x) = 1/(1-x^10) + x(1-x^9)/((1-x)(1-x^10))*sum_{j>=1} (x^((10^j-10)/9) - x^10^j)/(1-x^10^(j+1)))

g(x) = 1/(1-x) - g_A168046(x), where g_A168046 (x) is the g.f. of A168046.

MATHEMATICA

Table[Boole[MemberQ[IntegerDigits[n], 0]], {n, 0, 109}] (* Alonso del Arte, Feb 02 2013 *)

PROG

(PARI) A217096(n) = if(!n, 1, 0==(vecsort(digits(n), , 8)[1])); \\ Antti Karttunen, Dec 07 2017

CROSSREFS

Cf. A011540, A055641, A168046, A209929.

Sequence in context: A240351 A249832 A240355 * A267142 A185119 A280130

Adjacent sequences:  A217093 A217094 A217095 * A217097 A217098 A217099

KEYWORD

nonn,base

AUTHOR

Hieronymus Fischer, Jan 23 2013

EXTENSIONS

Name edited by Antti Karttunen, Dec 07 2017

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 | More pages
The OEIS Community | Maintained by The OEIS Foundation Inc.

License Agreements, Terms of Use, Privacy Policy. .

Last modified October 16 00:50 EDT 2018. Contains 316252 sequences. (Running on oeis4.)