0,3

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

Index entries for sequences related to decimal expansion of n

(Haskell)

a249873 n = if n == 0 then 0 else 100*a249873 n' + 10*a007953 (2*t) + d

where (n', td) = divMod n 100; (t, d) = divMod td 10

Cf. A007953, A093017, A028897.

Sequence in context: A180083 A275775 A217556 * A102491 A111706 A118761

Adjacent sequences: A249870 A249871 A249872 * A249874 A249875 A249876

nonn,base

Reinhard Zumkeller, Nov 08 2014

approved