powered by
file_extension(x, ext = NULL)
file_extension('alpha.txt') file_extension(paste('aa.tt', 1:5, sep='')) # change extension file_extension(paste('aa.tt', 1:5, sep=''), 'pdf') file_extension(paste('aatt', 1:5, sep=''), 'pdf')
Run the code above in your browser using DataLab