%I #6 May 21 2014 20:58:34
%S 1,1,6,5,6,5,0,5,1,1,7,7,0,7,7,9,8,9,3,5,1,5,7,2,1,9,3,7,2,0,4,5,3,2,
%T 9,4,6,7,1,2,0,4,2,1,4,2,9,9,6,4,5,2,2,1,0,2,7,9,8,6,0,1,6,3,1,5,2,8,
%U 8,0,6,5,8,2,1,4,8,4,7,4,0,6,1,1,7,0,8,5,7,3,8,1,0,6,0,2,1,6,4,7,2,1,3,1,0
%N Decimal expansion of 180*(1 - arctan(2)/Pi).
%C Dihedral angle in degrees of regular dodecahedron.
%H Wikipedia, <a href="http://en.wikipedia.org/wiki/Dodecahedron">Dodecahedron</a>
%e 116.5650511770779893515721937204532946712042142996452210279860163152880...
%t RealDigits[180 (1 - ArcTan[2]/Pi), 10, 100, 2] (* _Wesley Ivan Hurt_, May 21 2014 *)
%o (PARI) default(realprecision, 105); x=18/10*(1-atan(2)/Pi); for(n=1, 105, d=floor(x); x=(x-d)*10; print1(d, ", "));
%Y Cf. A137218 (same in radians).
%K nonn,cons
%O 3,3
%A _Arkadiusz Wesolowski_, May 21 2014