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!)
A136671 Recursion based on Exp[Pi/4]: a(n)=Floor[a(n-1)*Exp[Pi/4]] Angular domain {0,Pi/4} is the smallest self-similar piece of a sine wave. 0
0, 1, 2, 4, 8, 17, 37, 81, 177, 388, 850, 1864, 4088, 8966, 19664, 43128, 94591, 207464, 455026, 997999, 2188891 (list; graph; refs; listen; history; text; internal format)
OFFSET
1,3
COMMENTS
The hyperbolic numbers are bigger:
f[n_] := If[n == 0, 0, Sinh[n*Pi/4]/Sinh[Pi/4]];
out2 = Table[Floor[f[n]], {n, 0, 20}]
{0, 1, 2, 6, 13, 29, 64, 140, 308, 676, 1482, 3251, 7132, 15643, 34310,
75253, 165051, 362004, 793977, 1741415, 3819411}
LINKS
FORMULA
a(0)=0;a(1)=1;a(2)=Floor[Exp[Pi/4]]; a(n)=Floor[a(n-1)*Exp[Pi/4]]
MATHEMATICA
a[0] = 0; a[1] = 1; a[2] = Floor[Exp[Pi/4]]; a[n_] := a[n] = Floor[a[n - 1]*Exp[Pi/4]]; out1 = Table[a[n], {n, 0, 20}]
CROSSREFS
Sequence in context: A106462 A129987 A132275 * A274114 A024557 A199409
KEYWORD
nonn,uned
AUTHOR
Roger L. Bagula, Apr 04 2008
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 29 00:26 EDT 2024. Contains 371264 sequences. (Running on oeis4.)