Revision History for A024249
(Underlined text is an addition;
strikethrough text is a deletion.)
Showing all changes.
|
|
|
|
#8 by Harvey P. Dale at Mon Jan 30 12:01:04 EST 2023
|
|
|
|
#7 by Harvey P. Dale at Mon Jan 30 12:01:01 EST 2023
|
| MATHEMATICA
|
With[{nn=30}, Take[CoefficientList[Series[Tanh[ [Tan[ [x ] ]*]]*Tan[ [x]/2, {x, 0, nn}], x ]/] Range[ 0, nn]!, {1, -1, 2 (* Even}]] (* _Harvey P. Dale_, Jan 30 Part2023 *)
|
| EXTENSIONS
|
Previous Mathematica program replaced by Harvey P. Dale, Jan 30 2023
|
| STATUS
|
approved
editing
|
|
|
|
#6 by Russ Cox at Sat Mar 31 12:34:58 EDT 2012
|
| AUTHOR
|
_R. H. Hardin (rhhardin(AT)att.net)_
|
|
|
Discussion
|
Sat Mar 31
| 12:34
| OEIS Server: https://oeis.org/edit/global/875
|
|
|
|
#5 by N. J. A. Sloane at Fri Jan 09 03:00:00 EST 2009
|
| KEYWORD
|
nonn,new
nonn
|
| AUTHOR
|
R. H. Hardin (rhhrhhardin(AT)cadenceatt.comnet)
|
|
|
|
#4 by N. J. A. Sloane at Sat Jun 12 03:00:00 EDT 2004
|
| NAME
|
Expansion of tanh(tan(x)).))*tan(x)/2.
|
| KEYWORD
|
nonn,new
nonn
|
|
|
|
#3 by N. J. A. Sloane at Fri May 16 03:00:00 EDT 2003
|
| KEYWORD
|
nonn,new
nonn
|
| AUTHOR
|
R. H. Hardin (rhh@research.att(AT)cadence.com)
|
|
|
|
#2 by N. J. A. Sloane at Sat Dec 11 03:00:00 EST 1999
|
| NAME
|
Expansion of tanh(tan(x)).tan(x).)/2.
|
| DATA
|
0, 1, 4, 24, 192, 9472, 1182208, 135668736, 14993473536, 1702145425408, 212302947942400, 32402586267549696, 6715751146400514048, 1845064263947813650432, 597912413872386432040960
|
| OFFSET
|
0,23
|
| MATHEMATICA
|
Tanh[ Tan[ x ] ]*Tan[ x ]/2 (* Even Part *)
|
| CROSSREFS
|
A009812.
|
| KEYWORD
|
,new
nonn
|
| EXTENSIONS
|
Extended and signs tested 03/97.
|
|
|
|
#1 by N. J. A. Sloane at Sun Jun 14 03:00:00 EDT 1998
|
| NAME
|
Expansion of tanh(tan(x)).tan(x).
|
| DATA
|
1, 4, 24, 192, 9472, 1182208, 135668736, 14993473536, 1702145425408, 212302947942400, 32402586267549696, 6715751146400514048, 1845064263947813650432
|
| OFFSET
|
0,2
|
| REFERENCES
|
|
| AUTHOR
|
rhh@research.att.com
|
| STATUS
|
approved
|
|
|
|
|