OFFSET
1,2
COMMENTS
It is not known if e is normal, but the distribution of decimal digits found for the first 10^n digits of e shows no statistically significant departure from a uniform distribution.
LINKS
Eric Weisstein's World of Mathematics, e Digits.
MAPLE
a:=proc(n)
local digits, EXP1, C, i;
digits:=10^n+100;
EXP1:=convert(frac(evalf[digits](exp(1))), string)[2..digits-99];
C:=0;
for i from 1 to length(EXP1) do
if EXP1[i]="0" then C:=C+1; fi;
od;
return(C);
end;
MATHEMATICA
Table[Count[IntegerDigits[IntegerPart[(E - 2)*10^10^n]], 0], {n, 7}] (* Robert Price, Apr 07 2019 *)
CROSSREFS
KEYWORD
nonn,base,more
AUTHOR
Martin Renner, Dec 24 2018
STATUS
approved