|
%I #28 Sep 08 2022 08:45:27
%S 0,45,91,136,182,227,273,319,364,410,455,501,547,592,638,683,729,775,
%T 820,866,911,957,1003,1048,1094,1139,1185,1231,1276,1322,1367,1413,
%U 1459,1504,1550,1595,1641,1687,1732,1778,1823,1869,1915,1960,2006,2051,2097
%N a(n) = floor(n*(Pi^e + e^Pi)).
%H Vincenzo Librandi, <a href="/A121925/b121925.txt">Table of n, a(n) for n = 0..999</a> [Offset shifted by _Georg Fischer_, Sep 02 2022]
%t With[{a = Pi^E + E^Pi}, Floor[a * Range[0, 40]]] (* _Vincenzo Librandi_, Feb 20 2013 *)
%o (PARI) a(n)=floor(n*(Pi^exp(1)+exp(Pi))) \\ _Charles R Greathouse IV_, Feb 20 2013
%o (Magma) C<i> := ComplexField(); [Floor(n*(Pi(C)^Exp(1) + Exp(1)^Pi(C))): n in [0..50]]; // _G. C. Greubel_, Nov 06 2017
%Y Cf. A121854, A121855, A121856, A121857, A121929.
%K nonn,easy,less
%O 0,2
%A _Mohammad K. Azarian_, Sep 02 2006
%E Offset corrected by _Mohammad K. Azarian_, Nov 20 2008
%E Offset changed to 0 by _Georg Fischer_, Sep 02 2022
|
