Update and rename test.R to rainfallevent.R