%I #22 Dec 25 2015 21:38:36
%S 0,0,2,6,1,0,9,6,6,0,5,7,4,4,1,2,5,3,2,6,3,7,0,7,5,7,1,8,0,1,5,6,6,5,
%T 7,9,6,3,4,4,6,4,7,5,1,9,5,8,2,2,4,5,4,3,0,8,0,9,3,9,9,4,7,7,8,0,6,7,
%U 8,8,5,1,1,7,4,9,3,4,7,2,5,8,4,8,5,6,3,9,6,8,6,6,8,4,0,7,3,1,0
%N Decimal expansion of 1/383.
%C The magic square that uses the decimals of 1/383 is fully magic. 19 has the same property (see A021023). For other such primes see A072359. - _Michel Marcus_, Sep 02 2015
%H Wikipedia, <a href="https://en.wikipedia.org/wiki/Prime_reciprocal_magic_square">Prime reciprocal magic square</a>
%t x = RealDigits[N[1/383, 120]]; Table[0, {Abs@ Last@ x}]~Join~First@ x (* _Michael De Vlieger_, Sep 02 2015 *)
%t x = RealDigits[N[1/383, 120]]; Table[0, {Abs@ Last@ x}]~Join~First@ x (* _Michael De Vlieger_, Sep 02 2015 *)
%o (PARI) default(realprecision,2000);1/383.0 \\ _Anders Hellström_, Sep 02 2015
%Y Cf. A021023, A072359.
%K nonn,cons
%O 0,3
%A _N. J. A. Sloane_