A249063 - OEIS

%I #12 Sep 08 2022 08:46:10

%S 0,-1,-2,-2,0,2,3,-1,-4,-4,0,4,5,0,-5,-6,-2,4,7,3,-5,-8,-5,3,8,5,-3,

%T -9,-8,1,10,9,-1,-10,-10,-2,9,11,3,-9,-13,-6,7,13,7,-7,-15,-10,4,14,

%U 11,-3,-15,-14,0,13,14,1,-14,-17,-5,12,17,7,-11,-18,-10,8

%N a(n) = floor(cos(n)*PrimePi(n)).

%t Table[Floor[Cos[n] PrimePi[n]], {n, 1, 40}]

%o (Magma) [Floor(Cos(n)*#PrimesUpTo(n)): n in [1..80]]; // _Vincenzo Librandi_, Oct 20 2014

%Y Cf. A000720.

%K sign

%O 1,3

%A _Oussama Moutaoikil_, Oct 20 2014

%E More terms from _Vincenzo Librandi_, Oct 20 2014