Voozh

A009452

Expansion of e.g.f.: sin(log(1+tan(x))).

0, 1, -1, 3, -8, 26, -46, -542, 12272, -196204, 2970284, -46125412, 747689152, -12796612984, 231568711464, -4435090726232, 89781803413632, -1918433012222064, 43187041330469744, -1022364892192828752

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

OFFSET

0,4

LINKS

Table of n, a(n) for n=0..19.

MATHEMATICA

With[{nn=20}, CoefficientList[Series[Sin[Log[1+Tan[x]]], {x, 0, nn}], x] Range[0, nn]!] (* Harvey P. Dale, Jul 18 2022 *)

CROSSREFS

Sequence in context: A009392 A130648 A061812 * A206141 A281972 A355869

Adjacent sequences: A009449 A009450 A009451 * A009453 A009454 A009455

KEYWORD

sign,easy

AUTHOR

R. H. Hardin

EXTENSIONS

Extended with signs by Olivier Gérard, Mar 15 1997

Previous Mathematica program replaced and definition clarified by Harvey P. Dale, Jul 18 2022

STATUS

approved

URL: https://oeis.org/A009452

⇱ A009452 - OEIS