OFFSET
1,3
MATHEMATICA
Table[Floor[Cos[n] PrimePi[n]], {n, 1, 40}]
PROG
(Magma) [Floor(Cos(n)*#PrimesUpTo(n)): n in [1..80]]; // Vincenzo Librandi, Oct 20 2014
CROSSREFS
KEYWORD
sign
AUTHOR
Oussama Moutaoikil, Oct 20 2014
EXTENSIONS
More terms from Vincenzo Librandi, Oct 20 2014
STATUS
approved