A096664
Numerators of terms in series expansion of sin(tan(x)).
Original entry on oeis.org
1, 1, -1, -55, -143, -968167, -7000033, -571772647, -843598411471, -1263845119891, -740683182137153, -474904166544135457, 2379183287545454197, 237037449673450822122569, 155015924346163216960553093, 50568039962561468889366023, 1801162678607996830733199407999, 2359789149102567189423591182268559
Offset: 0
sin(tan(x)) = x + 1/6*x^3 - 1/40*x^5 - 55/1008*x^7 - 143/3456*x^9 + ...
-
Numerator[Take[CoefficientList[Series[Sin[Tan[x]], {x,0,40}], x], {2,-1,2}]] (* G. C. Greubel, Nov 17 2016 *)
A096718
Denominators of terms in series expansion of arcsin(arctan(x)).
Original entry on oeis.org
1, 6, 120, 5040, 362880, 4435200, 32947200, 145297152000, 69701632000, 13516122267648000, 5676771352412160000, 2872446304320552960000, 1723467782592331776000000, 1935799013407707050803200, 485144691014524112732160000, 1353553687930522274522726400000, 204193242064947360270857011200000
Offset: 0
arcsin(arctan(x)) = x - 1/6*x^3 + 13/120*x^5 - 341/5040*x^7 + 18649/362880*x^9 - 177761/4435200*x^11 + ...
-
Denominator[Take[CoefficientList[Series[ArcSin[ArcTan[x]], {x,0,40}], x], {2,-1,2}]] (* G. C. Greubel, Nov 17 2016 *)
A096722
Denominators of terms in series expansion of arcsin(arctan(x)) - arctan(arcsin(x)).
Original entry on oeis.org
1, 1, 1, 30, 756, 75600, 199584, 54486432000, 2421619200, 151227648000, 5913303492096000, 5203707073044480000, 512936840057241600000, 5041143264082570444800000, 1238175538546596249600000, 11695452372671563431936000000, 33500453776280426294437478400000, 44295044437526341433756221440000000
Offset: 0
arcsin(arctan(x)) - arctan(arcsin(x)) = -1/30*x^7 + 13/756*x^9 - 2329/75600*x^11 + 3749/199584*x^13 - 1405132357/54486432000*x^15 + ...
Cf.
A096721,
A096717,
A096718,
A096664,
A096671,
A096712,
A096716,
A045688,
A045689,
A096719,
A096720.
-
Denominator[Take[CoefficientList[Series[ArcSin[ArcTan[x]] - ArcTan[ArcSin[x]], {x,0,40}], x], {2,-1,2}]] (* G. C. Greubel, Nov 18 2016 *)
A296679
Expansion of e.g.f. arcsinh(arctanh(x)) (odd powers only).
Original entry on oeis.org
1, 1, 13, 341, 18649, 1599849, 205524837, 36391450941, 8546308276401, 2564025898856913, 957697868873929149, 435619128300038521893, 237104370189582892175241, 152148421079949399306125625, 113672892845152570858515803925, 97820056722556900357454981990925
Offset: 0
arcsinh(arctanh(x)) = x/1! + x^3/3! + 13*x^5/5! + 341*x^7/7! + 18649*x^9/9! + 1599849*x^11/11! + ...
-
nmax = 16; Table[(CoefficientList[Series[ArcSinh[ArcTanh[x]], {x, 0, 2 nmax + 1}], x] Range[0, 2 nmax + 1]!)[[n]], {n, 2, 2 nmax, 2}]
nmax = 16; Table[(CoefficientList[Series[Log[(Log[1 + x] - Log[1 - x])/2 + Sqrt[1 + (Log[1 + x] - Log[1 - x])^2/4]], {x, 0, 2 nmax + 1}], x] Range[0, 2 nmax + 1]!)[[n]], {n, 2, 2 nmax, 2}]
A096721
Numerators of terms in series expansion of arcsin(arctan(x)) - arctan(arcsin(x)).
Original entry on oeis.org
0, 0, 0, -1, 13, -2329, 3749, -1405132357, 41223659, -3230487913, 87420689313263, -92876785811395309, 6545378422138547141, -76226954122169434345117, 13717355610784766550119, -152042860419225571514252591, 325359516347299085987218014617, -501994552683503696983628163720749, 226141284010354023120430917899293
Offset: 0
arcsin(arctan(x)) - arctan(arcsin(x)) = -1/30*x^7 + 13/756*x^9 - 2329/75600*x^11 + 3749/199584*x^13 - 1405132357/54486432000*x^15 + ...
Cf.
A096722,
A096717,
A096718,
A096664,
A096671,
A096712,
A096716,
A045688,
A045689,
A096719,
A096720.
-
With[{nn=40},Numerator[Take[CoefficientList[Series[ArcSin[ArcTan[x]] - ArcTan[ArcSin[x]],{x,0,nn}],x],{2,-1,2}]]] (* Harvey P. Dale, Dec 07 2011 *)
A096725
Numerators of terms in series expansion of (sin(tan(x)) - tan(sin(x))) / (arcsin(arctan(x)) - arctan(arcsin(x))).
Original entry on oeis.org
1, 5, 1313, -2773, -701933647, -86849082293, -174426488476171, -130176915706274917, -42426469007472079018663, -24495552034235134641205327, -3019410235003955483667737236843, -74265172933666226350348992663473, -2457268368880426576340457161112391, -589361165665450343618737576026916723726003
Offset: 0
(sin(tan(x)) - tan(sin(x))) / (arcsin(arctan(x)) - arctan(arcsin(x))) = 1 + 5/3*x^2 + 1313/1890*x^4 - 2773/11907*x^6 - 701933647/1650310200*x^8 - 86849082293/270320810760*x^10 - ...
- V. I. Arnold, Huygens and Barrow, Newton and Hooke, Birkhäuser, Basel, 1990.
Cf.
A096730,
A096722,
A096717,
A096718,
A096664,
A096671,
A096712,
A096716,
A045688,
A045689,
A096719,
A096720.
-
Numerator[Take[CoefficientList[Series[(Sin[Tan[x]] - Tan[Sin[x]]) / (ArcSin[ArcTan[x]] - ArcTan[ArcSin[x]]), {x,0,50}], x], {1, -1, 2}]] (* G. C. Greubel, Nov 20 2016 *)
A096730
Denominators of terms in series expansion of (sin(tan(x)) - tan(sin(x))) / (arcsin(arctan(x)) - arctan(arcsin(x))).
Original entry on oeis.org
1, 3, 1890, 11907, 1650310200, 270320810760, 851510553894000, 1003164583542521400, 480315202600159246320000, 393378150929530422736080000, 62700543476657854079903791200000, 1975067119514722403516969422800000, 76571832941186160874811737622400000
Offset: 0
(sin(tan(x)) - tan(sin(x))) / (arcsin(arctan(x)) - arctan(arcsin(x))) = 1 + 5/3*x^2 + 1313/1890*x^4 - 2773/11907*x^6 - 701933647/1650310200*x^8 - 86849082293/270320810760*x^10 - ...
- V. I. Arnold, Huygens and Barrow, Newton and Hooke, Birkhäuser, Basel, 1990.
Cf.
A096725,
A096722,
A096717,
A096718,
A096664,
A096671,
A096712,
A096716,
A045688,
A045689,
A096719,
A096720.
-
Denominator[Take[CoefficientList[Series[(Sin[Tan[x]] - Tan[Sin[x]]) / (ArcSin[ArcTan[x]] - ArcTan[ArcSin[x]]), {x, 0, 10}], x], {1, -1, 2}]] (* G. C. Greubel, Nov 20 2016 *)
Showing 1-7 of 7 results.