ファイルの拡張子だけを取り出す

code: r

tools::file_ext("hoge.R")