url <- "https://tcga-data.nci.nih.gov/tcgafiles/ftp_auth/distro_ftpusers/anonymous/tumor/luad/cgcc/unc.edu/illuminahiseq_rnaseqv2/rnaseqv2/unc.edu_LUAD.IlluminaHiSeq_RNASeqV2.Level_3.1.12.0/unc.edu.00481f66-1aad-4885-9162-bf802b1ed7f5.2064371.rsem.isoforms.normalized_result"
mime::guess_type(url)
# Error in basename(file) : path too long