[go: up one dir, main page]

login
The OEIS is supported by the many generous donors to the OEIS Foundation.

 

Logo
Hints
(Greetings from The On-Line Encyclopedia of Integer Sequences!)
Revision History for A322719 (Underlined text is an addition; strikethrough text is a deletion.)

Showing all changes.
A322719 Number of times the digit 4 appears in the first 10^n decimal digits of Euler's number e = exp(1), counting starts after the decimal point.
(history; published version)
#9 by Bruno Berselli at Mon Apr 08 03:12:09 EDT 2019
STATUS

proposed

approved

#8 by Michel Marcus at Mon Apr 08 00:49:06 EDT 2019
STATUS

editing

proposed

#7 by Michel Marcus at Mon Apr 08 00:48:59 EDT 2019
MATHEMATICA

Table[Count[IntegerDigits[IntegerPart[(E - 2)*10^10^n]], 4], {n, , 7}] (* _Robert Price_, Apr 07 2019 *)

7}] (* Robert Price, Apr 07 2019 *)

STATUS

proposed

editing

Discussion
Mon Apr 08 00:49
Michel Marcus: ok ?
#6 by Robert Price at Sun Apr 07 18:05:45 EDT 2019
STATUS

editing

proposed

#5 by Robert Price at Sun Apr 07 18:05:43 EDT 2019
MATHEMATICA

Table[Count[IntegerDigits[IntegerPart[(E - 2)*10^10^n]], 4], {n,

7}] (* Robert Price, Apr 07 2019 *)

STATUS

approved

editing

#4 by N. J. A. Sloane at Mon Dec 24 11:06:29 EST 2018
STATUS

proposed

approved

#3 by Martin Renner at Mon Dec 24 10:54:45 EST 2018
STATUS

editing

proposed

#2 by Martin Renner at Mon Dec 24 10:43:02 EST 2018
NAME

allocatedNumber of times the digit 4 appears in the first 10^n decimal digits of Euler's number e = exp(1), counting starts after forthe Martindecimal Rennerpoint.

DATA

1, 11, 100, 982, 10039, 100389, 1000307, 9998285, 100018922, 1000026506

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, <a href="http://mathworld.wolfram.com/eDigits.html">e Digits</a>.

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]="4" then C:=C+1; fi;

od;

return(C);

end;

CROSSREFS

Cf. A001113, A099295, A322645, A322715, A322716, A322717, A322718, A322720, A322721, A322722, A322723, A322724.

KEYWORD

allocated

nonn,base,more

AUTHOR

Martin Renner, Dec 24 2018

STATUS

approved

editing

#1 by Martin Renner at Mon Dec 24 10:27:44 EST 2018
NAME

allocated for Martin Renner

KEYWORD

allocated

STATUS

approved

Lookup | Welcome | Wiki | Register | Music | Plot 2 | Demos | Index | Browse | More | WebCam
Contribute new seq. or comment | Format | Style Sheet | Transforms | Superseeker | Recents
The OEIS Community | Maintained by The OEIS Foundation Inc.

License Agreements, Terms of Use, Privacy Policy. .

Last modified August 29 06:09 EDT 2024. Contains 375510 sequences. (Running on oeis4.)