Как переименовать файлы с помощью R?

У меня есть более 700 файлов в одной папке с именами: файлы от 1 до 9 названы за первый месяц:

water_200101_01.img  
water_200101_09.img  

файлы от 10 до 30 названы:

water_200101_10.img
water_200101_30.img

И так далее за второй месяц: файлы от номера 1 до номера 9 названы:

water_200102_01.img  
water_200102_09.img  

файлы от номера 10 до номера 30 названы:

water_200102_10.img
water_200102_30.img 

Как я могу переименовать их, не внося никаких изменений в файлы. просто измените имена, например

water_1
water_2
...till...
water_700