

A092837


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


0



2, 3, 4, 19, 24, 227, 255, 443, 1381, 3329, 3817, 3947
(list;
graph;
refs;
listen;
history;
text;
internal format)



OFFSET

1,1


LINKS

Table of n, a(n) for n=1..12.
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

Cf. A092838.
Sequence in context: A265902 A245453 A067805 * A058772 A227941 A250259
Adjacent sequences: A092834 A092835 A092836 * A092838 A092839 A092840


KEYWORD

nonn,more


AUTHOR

Eric W. Weisstein, Mar 07 2004


EXTENSIONS

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


STATUS

approved



