How to convert a sas7bdat file to csv using R

#Type in the NAME of the file below without the sas7bdat extension.

inputme<- 'NAME'
inputme<- paste(inputme,'.sas7bdat',sep='')
df <- read_sas(inputme)
fileout<-paste(inputme,'.csv')
write.csv(df,file=fileout)