ph = jarkus_plot_locations_on_map(...
    'id', [4001740 7001503 7003775],...
    'location', 'SouthEast');
set(ph, {'color'}, flipud(get(ph, 'color')))
set(ph(1), 'color', [.5 .5 .5])
axis tight

%%
figureStyle(@styleThesis,...
    {'figure', 'Position', [1 1 10 10]});
tightenfigure
[fpath fname] = fileparts(which(mfilename));
figurepath = fullfile(fpath, '..', 'figures');
set(gcf, 'tag', '$HeadURL$ $Revision$')
print(gcf, '-depsc2', fullfile(figurepath, [fname '.eps']))
if ispc
    saveas(gcf, fullfile(figurepath, [fname '.emf']))
end
saveas(gcf, fullfile(figurepath, [fname '.fig']))