A107115 Three-digit numbers from the decimal expansion of Pi (version 3) -- but see comments.
314, 159, 265, 358, 979, 323, 846, 264, 338, 327, 950, 288, 419, 716, 939, 937, 510, 582, 97, 494, 459, 230, 781, 640, 628, 620, 899, 862, 803, 482, 534, 211, 706, 798, 214, 808, 651, 328, 230, 664, 709, 384, 460, 955, 58, 223, 172, 535, 940, 812, 848, 111, 745
Offset: 1
Programs
-
Mathematica
Table[FromDigits[Partition[RealDigits[N[Pi, 201]][[1]], 3][[i]]], {i, 67}] FromDigits/@Partition[RealDigits[Pi,10,200][[1]],3] (* Harvey P. Dale, Aug 21 2020 *)
Extensions
Definition modified by Harvey P. Dale, Aug 21 2020
Comments