%I
%S 1,1,2,1,0,0,1,4,8,2,0,0,0,3,14,6,0,0,0,2,15,13,1,0,0,1,12,23,2,0,0,0,
%T 7,33,6,0,0,0,3,34,16,1,0,0,1,26,32,2,0,0,0,14,49,5,0,0,0,6,56,13,0,0,
%U 0,2,46,32,1,0,0,1,27,58,3,0,0,0,12,77,9,0,0,0,4,72
%N Nearest integer to n^sin(n).
%t Join[{1},Table[Round[n^Sin[n]],{n,90}]] (* _Harvey P. Dale_, Sep 24 2013 *)
%K nonn
%O 0,3
%A _N. J. A. Sloane_, Apr 18 2000
