dire = "/Users/natalie/Documents/year 3/IP/code/temp/20240501";
all = dir(dire);
fnames = {all.name};
% cleaned = fnames(3:size(fnames, 2)); % particles
cleaned = fnames(4:size(fnames, 2)-2); % normal

S = [1.0000    0.5957    0.4641;
      0.3588    1.0000    0.4479;
      0.1834    0.2621    1.0000];

janitor(dire, S, cleaned, true);