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

 

Logo


Hints
(Greetings from The On-Line Encyclopedia of Integer Sequences!)
A249832 Characteristic function of numbers having a valid Luhn mod 10 check digit. 3
1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, 0, 0, 1, 0, 0 (list; graph; refs; listen; history; text; internal format)
OFFSET

0

COMMENTS

a(A093018(n)) = 1; a(A249830(n)) = 0;

a(n) = if A093017(n) mod 10 = 0 then 1 else 0.

LINKS

Reinhard Zumkeller, Table of n, a(n) for n = 0..10000

Wikipedia, Luhn_algorithm

Index entries for sequences related to decimal expansion of n

Index entries for characteristic functions

FORMULA

a(n) = A000007(A093017(n) mod 10).

PROG

(Haskell)

a249832 = (0 ^) . flip mod 10 . a093017

CROSSREFS

Cf. A093017, A000007, A093018, A249830.

Sequence in context: A211666 A226523 A240351 * A240355 A217096 A267142

Adjacent sequences:  A249829 A249830 A249831 * A249833 A249834 A249835

KEYWORD

nonn,base

AUTHOR

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

License Agreements, Terms of Use, Privacy Policy. .

Last modified October 23 22:04 EDT 2018. Contains 316541 sequences. (Running on oeis4.)