A147658 (1, 2, -4, 6, -8, ...) interleaved with (3, -3, 3, -3, 3, ...).
1, 3, 2, -3, -4, 3, 6, -3, -8, 3, 10, -3, -12, 3, 14, -3, -16, 3, 18, -3, -20, 3, 22, -3, -24, 3, 26, -3, -28, 3, 30, -3, -32, 3, 34, -3, -36, 3, 38, -3, -40, 3, 42, -3, -44, 3, 46, -3, -48, 3, 50, -3, -52, 3, 54, -3, -56, 3, 58, -3, -60, 3, 62, -3, -64
Offset: 1
Links
- Index entries for linear recurrences with constant coefficients, signature (0,-2,0,-1).
Programs
-
Maple
with(ListTools): Flatten([1, seq([(-1)^(k-1)*3, (-1)^(k-1)*2*k], k=1..32)]); # Georg Fischer, Nov 02 2021
Formula
a(1) = 1; a(2*k) = (-1)^(k-1)*3; a(2*k+1) = (-1)^(k-1)*2*k for k >= 1. - Georg Fischer, Nov 02 2021
Extensions
a(25) ff. corrected by Georg Fischer, Nov 02 2021
Comments