login
|sin(2n)| > |sin(n)|.
0

%I #6 Dec 04 2015 11:35:02

%S 1,3,4,6,7,9,10,12,13,15,16,18,19,21,22,23,25,26,28,29,31,32,34,35,37,

%T 38,40,41,43,44,45,47,48,50,51,53,54,56,57,59,60,62,63,65,66,67,69,70,

%U 72,73,75,76,78,79,81,82,84,85,87,88,89,91

%N |sin(2n)| > |sin(n)|.

%t Select[Range[100],Abs[Sin[2#]]>Abs[Sin[#]]&] (* _Harvey P. Dale_, Dec 04 2015 *)

%K nonn

%O 1,2

%A _Clark Kimberling_