A190951 Closest integer to the largest real number x such that exp(x) = x^n, for n>=3.
5, 9, 13, 17, 21, 26, 31, 36, 41, 46, 51, 56, 62, 67, 73, 79, 84, 90, 96, 102, 108, 114, 120, 126, 132, 138, 144, 150, 157, 163, 169, 176, 182, 189, 195, 202, 208, 215, 221, 228, 235, 241, 248, 255, 262, 268, 275, 282, 289, 296, 303, 310, 317, 324, 331, 338, 345, 352
Offset: 3
Keywords
Crossrefs
Programs
-
Mathematica
a[n_] := Round[ E^-ProductLog[-1, -1/n]]; Table[a[n], {n, 3, 60}]
Comments