Data update
This commit is contained in:
parent
0df55f9f24
commit
aec8ed51b6
1045 changed files with 18889 additions and 2777 deletions
10
Task/Benfords-law/APL/benfords-law.apl
Normal file
10
Task/Benfords-law/APL/benfords-law.apl
Normal file
|
|
@ -0,0 +1,10 @@
|
|||
task←{
|
||||
benf ← ≢÷⍨(⍳9)(+/∘.=)(⍎⊃∘⍕)¨
|
||||
|
||||
fibs ← (⊢,(+/¯2↑⊢))⍣998⊢1 1
|
||||
|
||||
exp ← 10⍟1+÷⍳9
|
||||
obs ← benf fibs
|
||||
|
||||
⎕←'Expected Actual'⍪5⍕exp,[1.5]obs
|
||||
}
|
||||
Loading…
Add table
Add a link
Reference in a new issue