|
| |
|
|
A220085
|
|
Decimal expansion of sin(log(2)).
|
|
2
|
|
|
|
6, 3, 8, 9, 6, 1, 2, 7, 6, 3, 1, 3, 6, 3, 4, 8, 0, 1, 1, 5, 0, 0, 3, 2, 9, 1, 1, 4, 6, 4, 7, 0, 1, 7, 8, 4, 2, 5, 7, 2, 3, 0, 5, 3, 7, 8, 3, 0, 5, 7, 9, 7, 2, 9, 4, 9, 5, 5, 8, 6, 9, 5, 6, 6, 4, 6, 3, 2, 4, 5, 2, 2, 4, 4, 8, 5, 4, 4, 7, 4, 9, 9, 0, 3, 4, 4, 5
(list;
constant;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
|
OFFSET
|
0,1
|
|
|
COMMENTS
|
Imaginary part of 2^i, where i = sqrt(-1).
Continued fraction expansion: 0, 1, 1, 1, 3, 2, 1, 9, 1, 27, 1, 1, 13, 1, 4, 2, 1, 1, 6, 1, 3, 13, 7, 2, 3, 1, 3,...
|
|
|
LINKS
|
Bruno Berselli, Table of n, a(n) for n = 0..1000
|
|
|
FORMULA
|
sin(log(2)) = (2^i - 2^(-i))/(2i).
|
|
|
EXAMPLE
|
0.63896127631363480115003291146470178425723053783057972949558695664632...
|
|
|
MATHEMATICA
|
RealDigits[Sin[Log[2]], 10, 90][[1]] (* or *) RealDigits[Im[2^I], 10, 90][[1]]
|
|
|
PROG
|
(PARI) sin(log(2))
(Maxima) fpprec:90; ev(bfloat(sin(log(2))));
|
|
|
CROSSREFS
|
Cf. A002162, A219705 (real part of 2^i).
Sequence in context: A086648 A199447 A198836 * A242013 A242962 A153632
Adjacent sequences: A220082 A220083 A220084 * A220086 A220087 A220088
|
|
|
KEYWORD
|
nonn,cons
|
|
|
AUTHOR
|
Bruno Berselli, Dec 31 2012
|
|
|
STATUS
|
approved
|
| |
|
|