login
a(n) = floor(gamma^(-n)) where gamma is Euler's constant A001620.
1

%I #20 Nov 09 2025 19:46:12

%S 1,1,3,5,9,15,27,46,81,140,243,421,731,1266,2194,3801,6585,11409,

%T 19765,34243,59325,102777,178058,308477,534423,925864,1604017,2778888,

%U 4814297,8340552,14449630,25033330,43369110,75135020,130168020,225510201,390686211,676846168,1172605336

%N a(n) = floor(gamma^(-n)) where gamma is Euler's constant A001620.

%t a[n_] := Floor[1/EulerGamma^n]; Array[a, 40, 0] (* _Amiram Eldar_, Nov 01 2025 *)

%o (PARI) default(realprecision, 10000); A390318(n) = floor(Euler^(-n)) \\ _Zhuorui He_, Nov 03 2025

%Y Cf. A001620, A017913, A098907.

%K nonn

%O 0,3

%A _Dwight Boddorf_, Nov 01 2025