ah, you know sometimes you just do the work right and finally make the tool to just plot the thing you need ...

#yeahthat #RStats {geographiclib} ftw
p <- expand.grid(140:150, -45:-38)
plot(p)
maps::map(add = T)
text(p, lab = geographiclib::mgrs_fwd(as.matrix(p) * 1.0, precision = 0), pos = 1 )

You know when the weather app says zero chance of rain so you set up lunch in the garden and 20 minutes later you’re wondering if your parasol is waterproof .. #YeahThat