A377481 - OEIS

%I #4 Oct 31 2024 01:38:09

%S 3,3,6,5,0,8,4,1,6,9,1,8,3,9,5,2,9,1,6,1,6,3,1,9,8,1,4,4,0,7,3,1,9,6,

%T 8,9,2,6,7,0,4,6,3,4,9,5,7,9,0,2,2,1,4,3,6,8,6,9,4,4,1,2,3,2,0,0,6,7,

%U 6,3,7,9,9,1,4,2,7,1,4,5,0,1,9,0,4,5,9,1,0,6,7,2,1,1,5,2,4,6,9,7

%N Decimal expansion of sin(A377479).

%C The value of the slope of the straight line through the origin that is tangent to the cosine graph.

%e 0.3365084169183952916163198144073...

%t ndigits=100; First[RealDigits[Sin[First[x/.NSolve[Cos[x]+x Sin[x]==0,x,ndigits+1]]],10,ndigits]]

%Y Cf. A377479, A377480.

%K nonn,cons

%O 0,1

%A _Stefano Spezia_, Oct 29 2024