|
%I #8 May 21 2023 15:52:51
%S 0,0,1,5,3,8,4,6,1,5,3,8,4,6,1,5,3,8,4,6,1,5,3,8,4,6,1,5,3,8,4,6,1,5,
%T 3,8,4,6,1,5,3,8,4,6,1,5,3,8,4,6,1,5,3,8,4,6,1,5,3,8,4,6,1,5,3,8,4,6,
%U 1,5,3,8,4,6,1,5,3,8,4,6,1,5,3,8,4,6,1,5,3,8,4,6,1,5,3,8,4,6,1
%N Decimal expansion of 1/650.
%C A021069 shifted right. [From _R. J. Mathar_, Oct 25 2008]
%t Join[{0,0},RealDigits[1/650,10,120][[1]]] (* or *) PadRight[{0,0},120,{4,6,1,5,3,8}] (* _Harvey P. Dale_, May 21 2023 *)
%K nonn,cons
%O 0,4
%A _N. J. A. Sloane_.
|
