A358449 Euler transform of (0, 1, -2, 4, -8, 16, ...), (cf. A122803).

1, 1, -1, 3, -4, 4, -2, 2, 2, -26, 80, -168, 351, -749, 1485, -2779, 5134, -9314, 16318, -27522, 44596, -68484, 96148, -113172, 77125, 122309, -750801, 2411307, -6424162, 15607886, -35846784, 79201548, -170009469, 356687423, -734287141, 1487086199, -2967980133

Offset

0,4

Links

Seiichi Manyama, Table of n, a(n) for n = 0..1000

Maple

# Uses EulerTransform from A358369.
a := EulerTransform(BinaryRecurrenceSequence(-2, 0)): seq(a(n), n=0..36);

Prog

(Sage) # uses[EulerTransform from A166861]
b = BinaryRecurrenceSequence(-2, 0)
a = EulerTransform(b)
print([a(n) for n in range(37)])

Crossrefs

Cf. A034691, A122803.

Sequence in context: A120650 A103121 A291086 * A209329 A353156 A106290

Adjacent sequences: A358446 A358447 A358448 * A358450 A358451 A358452

Keyword

sign

Author

Peter Luschny, Nov 17 2022

Status

approved