A092837 - OEIS

A092837

Indices of terms in the series for sec(x) that have prime numerators.

2, 3, 4, 19, 24, 227, 255, 443, 1381, 3329, 3817, 3947

(list; graph; refs; listen; history; text; internal format)

OFFSET

1,1

LINKS

Eric Weisstein's World of Mathematics, Secant

MATHEMATICA

f[n_] := Numerator[EulerE[2n]/(2n)! ]; Do[If[PrimeQ[f[n]], Print[n]], {n, 3329}] (* Ryan Propper, Apr 01 2007 *)

CROSSREFS

KEYWORD

nonn,more

AUTHOR

EXTENSIONS

More terms from Ryan Propper, Apr 01 2007, May 11 2007

STATUS

approved