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 A121930 #23 Sep 08 2022 08:45:27
%S A121930 0,0,1,2,2,3,4,4,5,6,6,7,8,8,9,10,10,11,12,12,13,14,14,15,16,17,17,18,
%T A121930 19,19,20,21,21,22,23,23,24,25,25,26,27,27,28,29,29,30,31,32,32,33,34,
%U A121930 34,35,36,36,37,38,38,39,40,40,41,42,42,43,44,44,45,46,47,47,48,49,49
%N A121930 a(n) = floor(n*(e^Pi - Pi^e)).
%C A121930 Beatty sequence of A063504. - _R. J. Mathar_, Aug 11 2012
%H A121930 Ivan Panchenko, <a href="/A121930/b121930.txt">Table of n, a(n) for n = 0..10000</a>
%t A121930 With[{c=E^Pi-Pi^E},Floor[c*Range[0,80]]] (* _Harvey P. Dale_, Jan 06 2012 *)
%o A121930 (PARI) for(n=0,50, print1(floor(n*(exp(Pi) - Pi^exp(1))), ", ")) \\ _G. C. Greubel_, Nov 06 2017
%o A121930 (Magma) C<i> := ComplexField(); [Floor(n*(Exp(1)^Pi(C) - Pi(C)^Exp(1) )): n in [0..50]]; // _G. C. Greubel_, Nov 06 2017
%Y A121930 Cf. A121854, A121855, A121856, A121857.
%K A121930 nonn
%O A121930 0,4
%A A121930 _Mohammad K. Azarian_, Sep 02 2006