We obtained data from Shlomo Angel's Atlas of Urban Expansion which contains area estimates fro Paris since 1800. This function makes a plot combining both measures.

plot_shlomo(pw = 8, ph = 4.5)