Closest observation method

make_athens_plot(r_closest, "Closest observation")