A088306 Integers n with tan n > |n|, ordered by |n|.
1, -2, -11, -33, -52174, 260515, -573204, 37362253, -42781604, 122925461, 534483448, 3083975227, 902209779836, -2685575996367, -65398140378926, 74357078147863, 214112296674652, 642336890023956, -5920787228742393, -12055686754159438, 18190586279576483, -48436859313312404
Offset: 1
Keywords
Links
- Jon E. Schoenfield, Table of n, a(n) for n = 1..1000
- D. Bellamy, J. C. Lagarias and F. Lazebnik, Proposed problem: large values of Tan n
- Jon E. Schoenfield, Magma program
Programs
-
Maple
a:=proc(n) if abs(evalf(tan(n)))>n then n else fi end: seq(a(n),n=1..100000); # Emeric Deutsch, Dec 18 2004
-
Mathematica
Select[Range[600000],Abs[Tan[#]]>#&] (* Harvey P. Dale, Nov 30 2012 *)
-
PARI
is(n)=tan(n)>abs(n) \\ Charles R Greathouse IV, Nov 07 2014
Extensions
More terms from Jon E. Schoenfield, Aug 17 2014
Signs added and other edits by Franklin T. Adams-Watters, Sep 09 2014
Comments