Create graphs folder in rplot if it does not exist
if ~exist(fname, 'dir')
    mkdir('.',fname);
end
if ~exist([fname '/
hs');
end