File size distribution: Difference between revisions

no edit summary
(UNIX shell: further simplification, only need one awk invocation)
No edit summary
Line 919:
Number of inaccessible files : 0
</pre>
 
=={{header|Mathematica}} / {{header|Wolfram Language}}==
<lang Mathematica>SetDirectory[NotebookDirectory[]];
Histogram[FileByteCount /@ Select[FileNames[__], DirectoryQ /* Not], {"Log", 15}, {"Log", "Count"}]</lang>
 
=={{header|Nim}}==
1,111

edits