How to save a dataframe object with consecutive iterative number in R?

The kind of codes I am looking for is similar to the one written here below in python

i = 0
while(i<=10):
    array = cv2.imread('image'+str(i)+'.jpg')
    cv2.imwrite('./path for destination/name'+str(i)+'.jpg',array)
    i +=1