The Wolfram Language function WeatherData has historical rainfall data for many cities. e.g.
WeatherData
DateListPlot[WeatherData["Houston", "TotalPrecipitation", {{2016, 1}, {2018, 10}, "Month"}], Joined -> True]
Check the documentation.