[TCGA] file annotation 알아내기

source("https://bioconductor.org/biocLite.R")

biocLite("TCGAbiolinks")

library(TCGAbiolinks)

library(dplyr)

library(DT)

query.exp <- GDCquery(project = "TCGA-BRCA",

data.category = "Transcriptome Profiling",

                  data.type = "Gene Expression Quantification", 

                  workflow.type = "HTSeq - FPKM-UQ")

r = query.exp$results[[1]]

dat = r[,c(4,8,9,15,26)]