cp's OEIS Frontend

This is a front-end for the Online Encyclopedia of Integer Sequences, made by Christian Perfect. The idea is to provide OEIS entries in non-ancient HTML, and then to think about how they're presented visually. The source code is on GitHub.

A333588 a(n) = floor(-(3/2)*a(n-1)), a(1)=-2.

This page as a plain text file.
%I A333588 #30 May 24 2020 15:02:51
%S A333588 -2,3,-5,7,-11,16,-24,36,-54,81,-122,183,-275,412,-618,927,-1391,2086,
%T A333588 -3129,4693,-7040,10560,-15840,23760,-35640,53460,-80190,120285,
%U A333588 -180428,270642,-405963,608944,-913416,1370124,-2055186,3082779,-4624169,6936253,-10404380,15606570,-23409855,35114782
%N A333588 a(n) = floor(-(3/2)*a(n-1)), a(1)=-2.
%e A333588 floor(-(3/2) *  -2) =   3;
%e A333588 floor(-(3/2) *   3) =  -5;
%e A333588 floor(-(3/2) *  -5) =   7;
%e A333588 floor(-(3/2) *   7) = -11;
%e A333588 floor(-(3/2) * -11) =  16;
%e A333588 floor(-(3/2) *  16) = -24.
%t A333588 Nest[Append[#1, Floor[-3 #1[[-1]]/2]] & @@ {#, Mod[Length@ #, 2]} &, {-2}, 44] (* _Michael De Vlieger_, Mar 27 2020 *)
%t A333588 NestList[Floor[-3/2 #] &, -2, 50] (* _Alonso del Arte_, Mar 29 2020 *)
%o A333588 (Ruby) values = [-2]; 100.times { values << (values.last * -3/2) }; p values
%Y A333588 Cf. A061419.
%K A333588 sign
%O A333588 1,1
%A A333588 _Simon Strandgaard_, Mar 27 2020