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!)
A060979 |First digit - second digit + third digit - fourth digit ...| = 11. 3
209, 308, 319, 407, 418, 429, 506, 517, 528, 539, 605, 616, 627, 638, 649, 704, 715, 726, 737, 748, 759, 803, 814, 825, 836, 847, 858, 869, 902, 913, 924, 935, 946, 957, 968, 979, 1309, 1408, 1419, 1507, 1518, 1529, 1606, 1617, 1628, 1639, 1705, 1716 (list; graph; refs; listen; history; text; internal format)
OFFSET

1,1

COMMENTS

Note that all entries are divisible by eleven.

Also multiples of 11 such that the sum of digits at odd positions is different from sum of digits at even positions; cf. A135499. - Reinhard Zumkeller, Jul 05 2014

LINKS

Harvey P. Dale, Table of n, a(n) for n = 1..1000

MATHEMATICA

Do[ a = IntegerDigits[ n ]; l = Length[ a ]; e = o = {}; Do[ o = Append[ o, a[ [ 2k - 1 ] ] ], {k, 1, l/2 + .5} ]; Do[ e = Append[ e, a[ [ 2k ] ] ], {k, 1, l/2} ]; If[ Abs[ Apply[ Plus, o ] - Apply[ Plus, e ] ] == 11, Print[ n ] ], {n, 1, 2000} ]

d11Q[n_]:=Module[{idn=IntegerDigits[n]}, Abs[Total[Table[(-1)^(i+1) idn[[i]], {i, Length[idn]}]]]==11]; Select[Range[1800], d11Q] (* Harvey P. Dale, Aug 26 2012 *)

PROG

(Haskell)

a060979 n = a060979_list !! (n-1)

a060979_list = filter (\x -> let digs = map (read . return) $ show x in

                             evens digs /= odds digs) [11, 22 ..]

   where evens [] = 0; evens [x] = x; evens (x:_:xs) = x + evens xs

         odds [] = 0; odds [x] = 0; odds (_:x:xs) = x + odds xs

-- Reinhard Zumkeller, Jul 05 2014

CROSSREFS

Cf. A008593, A060978-A060980, A060982, A061470-A061479, A061870-A061882.

Cf. A135499.

Sequence in context: A330206 A025334 A025326 * A061880 A216995 A283742

Adjacent sequences:  A060976 A060977 A060978 * A060980 A060981 A060982

KEYWORD

base,nonn,easy

AUTHOR

Robert G. Wilson v, May 10 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 September 21 14:54 EDT 2020. Contains 337272 sequences. (Running on oeis4.)