|
|
A333588
|
|
a(n) = floor(-(3/2)*a(n-1)), a(1)=-2.
|
|
1
|
|
|
-2, 3, -5, 7, -11, 16, -24, 36, -54, 81, -122, 183, -275, 412, -618, 927, -1391, 2086, -3129, 4693, -7040, 10560, -15840, 23760, -35640, 53460, -80190, 120285, -180428, 270642, -405963, 608944, -913416, 1370124, -2055186, 3082779, -4624169, 6936253, -10404380, 15606570, -23409855, 35114782
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,1
|
|
LINKS
|
|
|
EXAMPLE
|
floor(-(3/2) * -2) = 3;
floor(-(3/2) * 3) = -5;
floor(-(3/2) * -5) = 7;
floor(-(3/2) * 7) = -11;
floor(-(3/2) * -11) = 16;
floor(-(3/2) * 16) = -24.
|
|
MATHEMATICA
|
Nest[Append[#1, Floor[-3 #1[[-1]]/2]] & @@ {#, Mod[Length@ #, 2]} &, {-2}, 44] (* Michael De Vlieger, Mar 27 2020 *)
|
|
PROG
|
(Ruby) values = [-2]; 100.times { values << (values.last * -3/2) }; p values
|
|
CROSSREFS
|
|
|
KEYWORD
|
sign
|
|
AUTHOR
|
|
|
STATUS
|
approved
|
|
|
|