Get id and link from "id_location.jpg" files and resize in two folders

getid.m

mkdir 'fotos300'
mkdir 'fotos450'
list = dir('*.jpg');
[n ~] = size(list);
ids = [];
locs = [];
for i=0:(n-1)
    file = char(list(i+1).name);
    foto = imread(file);    
    file = file(1:end-4);
    namefile = strsplit(file,'_');
    id = namefile(1);
    loc = namefile(2);    
    ids = [ids id];
    locs = [locs loc];
    new1 = imresize(foto, [300, 300]);
    new2 = imresize(foto, [450, 450]);
    name1 = strcat(id,'.jpg');
    name1 = char(name1);
    imwrite(new1, strcat('fotos300/',name1) ,'jpg');
    imwrite(new2, strcat('fotos450/',name1) ,'jpg');
end
T = table(ids',locs')
writetable(T,'id-link.csv','delimiter','\t')

Ejecutar en la carpeta donde estan las fotos