A105662 a(n) = abs(floor(n*sin(n))).

0, 0, 1, 0, 4, 5, 2, 4, 7, 3, 6, 11, 7, 5, 13, 9, 5, 17, 14, 2, 18, 17, 1, 20, 22, 4, 19, 25, 7, 20, 30, 13, 17, 32, 17, 15, 36, 24, 11, 37, 29, 7, 39, 36, 0, 38, 41, 5, 37, 47, 14, 34, 51, 20, 31, 55, 30, 24, 57, 37, 19, 59, 46, 10, 58, 53, 2, 58, 62, 8, 54, 67, 18, 50, 73, 30, 43, 76

Offset

0,5

Links

Rémy Sigrist, Table of n, a(n) for n = 0..10000

Mathematica

Table[Abs[Floor[n Sin[n]]], {n, 0, 80}] (* Harvey P. Dale, Jan 08 2020 *)

Prog

(PARI) a(n) =  abs(floor(n*sin(n))); \\ Michel Marcus, Oct 09 2013

Crossrefs

Cf. A105663, A105664.

Sequence in context: A225901 A354469 A030322 * A021225 A292820 A178040

Adjacent sequences: A105659 A105660 A105661 * A105663 A105664 A105665

Keyword

nonn,look

Author

Zak Seidov, May 04 2005

Status

approved