This site is supported by donations to The OEIS Foundation.

 Annual appeal: Please make a donation to keep the OEIS running! Over 6000 articles have referenced us, often saying "we discovered this result with the help of the OEIS". Other ways to donate

 Hints (Greetings from The On-Line Encyclopedia of Integer Sequences!)
 A121759 In decimal number system, take even digits of n with negative sign. 3
 1, -2, 3, -4, 5, -6, 7, -8, 9, 10, 11, 8, 13, 6, 15, 4, 17, 2, 19, -20, -19, -22, -17, -24, -15, -26, -13, -28, -11, 30, 31, 28, 33, 26, 35, 24, 37, 22, 39, -40, -39, -42, -37, -44, -35, -46, -33, -48, -31, 50, 51, 48, 53, 46, 55, 44, 57, 42, 59, -60, -59, -62, -57, -64, -55, -66, -53, -68, -51, 70, 71, 68, 73, 66, 75, 64, 77, 62 (list; graph; refs; listen; history; text; internal format)
 OFFSET 1,2 COMMENTS See A121758. In decimal number system, take odd digits of n with negative sign. a(A014261(n)) = A014261(n). - Reinhard Zumkeller, Nov 30 2007 LINKS Reinhard Zumkeller, Table of n, a(n) for n = 1..10000 FORMULA If n = d(i)*10^(i-1), then a(n) = (-1)^(1+d(i))*d(i)*10^(i-1). a(n) = -A121758(n). EXAMPLE a(12) = 8 because 12 = 1*10^1 + 2*10^0 and a(12) = (-1)^(1+1)*1*10^1 + (-1)^(1+2)*2*10^0 = 10-2 = 8. MATHEMATICA a[n_] := Total[MapIndexed[(-1)^(#1 + 1)*#1*10^(#2[[1]] - 1)&, Reverse[ IntegerDigits[n]]]]; Array[a, 78] (* Jean-François Alcover, Jun 20 2017 *) PROG (Haskell) import Data.List (unfoldr) a121759 = foldl f 0 . reverse . unfoldr d where    d 0 = Nothing    d x = Just \$ swap \$ divMod x 10    f v d | even d = 10 * v - d          | odd  d = 10 * v + d -- Reinhard Zumkeller, Aug 01 2011 CROSSREFS Cf. A121758. Sequence in context: A278063 A062759 A121758 * A265310 A263283 A291576 Adjacent sequences:  A121756 A121757 A121758 * A121760 A121761 A121762 KEYWORD base,sign,nice,look AUTHOR Zak Seidov, Aug 20 2006 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.