cp's OEIS Frontend

This is a front-end for the Online Encyclopedia of Integer Sequences, made by Christian Perfect. The idea is to provide OEIS entries in non-ancient HTML, and then to think about how they're presented visually. The source code is on GitHub.

A213067 E.g.f.: arctan(cos(x)^2) - Pi/4.

This page as a plain text file.
%I A213067 #15 Feb 24 2022 16:52:38
%S A213067 0,-1,-2,44,1408,-18016,-5095232,-139605376,56961507328,8306292414464,
%T A213067 -1178066937638912,-640316054325354496,-7088737339266301952,
%U A213067 76268423227563817631744,18895160315230467816030208,-12297988177132848140606242816
%N A213067 E.g.f.: arctan(cos(x)^2) - Pi/4.
%C A213067 This function is even, with constant term Pi/4 = 0.785398163397...
%C A213067 It was missing from OEIS entries by Patrick Demichel.
%H A213067 Vincenzo Librandi, <a href="/A213067/b213067.txt">Table of n, a(n) for n = 0..100</a>
%F A213067 E.g.f.: arctan(cos(x)^2) - Pi/4.
%e A213067 arctan(cos(x)^2) - Pi/4 = 0 - x^2/2 - 2*x^4/4! + 44*x^6/6! + 1408*x^8/8! + ...
%t A213067 Part[#, Range[1, Length[#], 2]] &@(Array[#! &, Length[#], 0]*#) &@
%t A213067   CoefficientList[Series[ArcTan[Cos[x]^2] - Pi/4, {x, 0, 30}], x] // ExpandAll
%t A213067 With[{nn=30},Take[CoefficientList[Series[ArcTan[Cos[x]^2]-Pi/4,{x,0,nn}],x] Range[0,nn]!,{1,-1,2}]] (* _Harvey P. Dale_, Feb 24 2022 *)
%Y A213067 Cf. A213066, A213068, A213069.
%K A213067 sign
%O A213067 0,3
%A A213067 _Olivier Gérard_, Jun 04 2012