login
The OEIS is supported by the many generous donors to the OEIS Foundation.

 

Logo
Hints
(Greetings from The On-Line Encyclopedia of Integer Sequences!)
A280093 Pierce Expansion of coth(1). 1
1, 3, 16, 38, 42, 139, 168, 385, 633, 942, 1728, 3017, 3842, 17453, 32989, 39408, 177334, 268130, 822437, 1522942, 3247926, 5937944, 22736433, 34285758, 51598089, 57736381, 105470828, 173010552, 541826347, 1758595979, 1803356572, 3331293851, 3545862229 (list; graph; refs; listen; history; text; internal format)
OFFSET
0,2
LINKS
Eric Weisstein's World of Mathematics, Pierce Expansion
Wikipedia, Engel Expansion
MATHEMATICA
PierceExp[A_, n_] := Join[Array[1 &, Floor[A]], First@Transpose@
NestList[{Floor[1/Expand[1 - #[[1]] #[[2]]]], Expand[1 - #[[1]] #[[2]]]} &, {Floor[1/(A - Floor[A])], A - Floor[A]}, n - 1]]; PierceExp[N[Coth[1] , 7!], 50]
CROSSREFS
Cf. A073747 (coth(1)).
Sequence in context: A196596 A196573 A196804 * A081270 A271374 A147874
KEYWORD
nonn
AUTHOR
G. C. Greubel, Dec 25 2016
STATUS
approved

Lookup | Welcome | Wiki | Register | Music | Plot 2 | Demos | Index | Browse | More | WebCam
Contribute new seq. or comment | Format | Style Sheet | Transforms | Superseeker | Recents
The OEIS Community | Maintained by The OEIS Foundation Inc.

License Agreements, Terms of Use, Privacy Policy. .

Last modified March 28 22:04 EDT 2024. Contains 371254 sequences. (Running on oeis4.)