This is a front-end for the Online Encyclopedia of Integer Sequences, made by Christian Perfect. The idea is to provide OEIS entries in non-ancient HTML, and then to think about how they're presented visually. The source code is on GitHub.
%I A002160 M2841 N1142 #28 Jan 15 2025 17:05:50 %S A002160 1,3,10,31,97,306,961,3020,9489,29809,93648,294204,924269,2903677, %T A002160 9122171,28658146,90032221,282844564,888582403,2791563950,8769956796, %U A002160 27551631843,86556004192,271923706894,854273519914,2683779414318,8431341691876,26487841119104,83214007069230 %N A002160 Nearest integer to Pi^n. %D A002160 A. Fletcher, J. C. P. Miller, L. Rosenhead, and L. J. Comrie, An Index of Mathematical Tables. Vols. 1 and 2, 2nd ed., Blackwell, Oxford and Addison-Wesley, Reading, MA, 1962, Vol. 1, p. 122. %D A002160 J. T. Peters, Ten-Place Logarithm Table. Vols. 1 and 2, rev. ed. Ungar, NY, 1957, Vol. 1 (Appendix), p. 1. %D A002160 N. J. A. Sloane, A Handbook of Integer Sequences, Academic Press, 1973 (includes this sequence). %D A002160 N. J. A. Sloane and Simon Plouffe, The Encyclopedia of Integer Sequences, Academic Press, 1995 (includes this sequence). %e A002160 a(0) = 1 because Pi^0 = 1; %e A002160 a(2) = 10 because Pi^2 = 9.8696...; %e A002160 a(10) = 93648 because Pi^10 = 93648.047476... %p A002160 a := []: Digits := 1000: for n from 0 to 50 do: a := [op(a),round(Pi^n)]: od: seq(a[i+1],i=0..50); %t A002160 Round[Pi^Range[0,40]] (* _Harvey P. Dale_, Jun 10 2024 *) %o A002160 (PARI) apply( A002160(n)=Pi^n\/1, [0..50]) \\ An error message will say so if default(realprecision) must be increased. - _M. F. Hasler_, May 27 2018 %o A002160 (Sage) [round(pi^n) for n in range(0,29)] # _Stefano Spezia_, Jan 15 2025 %Y A002160 Cf. A000227 (e^n), A001672 (floor(Pi^n)), A001673 (ceiling(Pi^n)). %K A002160 nonn,easy %O A002160 0,2 %A A002160 _N. J. A. Sloane_ %E A002160 More terms from Mark Hudson (mrmarkhudson(AT)hotmail.com), Jan 29 2003 %E A002160 Edited by _M. F. Hasler_, May 27 2018