login
A249063
a(n) = floor(cos(n)*PrimePi(n)).
0
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, -9, -8, 1, 10, 9, -1, -10, -10, -2, 9, 11, 3, -9, -13, -6, 7, 13, 7, -7, -15, -10, 4, 14, 11, -3, -15, -14, 0, 13, 14, 1, -14, -17, -5, 12, 17, 7, -11, -18, -10, 8
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
Cf. A000720.
Sequence in context: A080769 A328903 A143539 * A362687 A341879 A099307
KEYWORD
sign
AUTHOR
Oussama Moutaoikil, Oct 20 2014
EXTENSIONS
More terms from Vincenzo Librandi, Oct 20 2014
STATUS
approved