Update all new Tasks
This commit is contained in:
parent
00a190b0a6
commit
91df62d461
5697 changed files with 93386 additions and 804 deletions
3
Task/Benfords-law/Mathematica/benfords-law.math
Normal file
3
Task/Benfords-law/Mathematica/benfords-law.math
Normal file
|
|
@ -0,0 +1,3 @@
|
|||
fibdata = Array[First@IntegerDigits@Fibonacci@# &, 1000];
|
||||
Table[{d, N@Count[fibdata, d]/Length@fibdata, Log10[1. + 1/d]}, {d, 1,
|
||||
9}] // Grid
|
||||
Loading…
Add table
Add a link
Reference in a new issue