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 A100323 #15 Jun 18 2022 05:30:10 %S A100323 1,4,75,9424,12669,331783 %N A100323 Numbers k such that the decimal expansion of Pi^k begins (after the decimal point) with k. %C A100323 The terms of this sequence are related to those in A100322, but do not necessarily appear in that sequence since A100322(n) is defined as the smallest positive integer k such that the digits of the fractional part of Pi^k begin with n. %e A100323 Pi^1 = 3.1...; %e A100323 Pi^4 = 97.4...; %e A100323 Pi^75 = 19330382693312372796273669213182810875.75... %t A100323 p = N[Pi, 10^4]; f[n_] := Block[{r = RealDigits[p^n, 10, Max[5, n]]}, e = r[[2]]; FromDigits[ Take[r[[1]], {e + 1, e + 1 + Floor[ Log[10, n]]} ]]]; Do[ If[ f[n] == n, Print[n]], {n, 10^4}] (* _Robert G. Wilson v_, Nov 16 2004 *) %Y A100323 Cf. A100322. %K A100323 base,nonn,more %O A100323 1,2 %A A100323 Mark Hudson (mrmarkhudson(AT)hotmail.com), Nov 16 2004 %E A100323 a(6) from _Jon E. Schoenfield_, Mar 28 2015