OFFSET
0,3
LINKS
Felix Fröhlich, Table of n, a(n) for n = 0..10000
MAPLE
f:=n->round(evalf(n*sin(n))); [seq(f(n), n=0..140)];
MATHEMATICA
Table[Round[n*Sin[n]], {n, 0, 140}] (* Bence Bernáth, Nov 20 2022 *)
PROG
(PARI) a(n) = round(n*sin(n)) \\ Felix Fröhlich, Jun 10 2016
(Python)
from sympy import sin
def A272695(n):
return int((n*sin(n)).round()) # Chai Wah Wu, Jun 10 2016
CROSSREFS
KEYWORD
sign,look
AUTHOR
N. J. A. Sloane, Jun 10 2016
STATUS
approved