2 lines
135 B
Text
2 lines
135 B
Text
SetDirectory[NotebookDirectory[]];
|
|
Histogram[FileByteCount /@ Select[FileNames[__], DirectoryQ /* Not], {"Log", 15}, {"Log", "Count"}]
|