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