# NOT RUN {
data(TGGATESsmall)
cellInfo <- cellInfo(TGGATESsmall)
data(TGGATESsmall)
cellInfo(TGGATESsmall) <- cellInfo(TGGATESsmall)
data(TGGATESsmall)
phenoInfo <- phenoInfo(TGGATESsmall, mDataType="rna")
data(TGGATESsmall)
phenoInfo(TGGATESsmall, mDataType="rna") <- phenoInfo(TGGATESsmall, mDataType="rna")
data(TGGATESsmall)
TGGATES_mProf <- molecularProfiles(TGGATESsmall, "rna")[1:10,]
molecularProfiles(TGGATESsmall, "rna") <- molecularProfiles(TGGATESsmall, "rna")
data(TGGATESsmall)
featureInfo <- featureInfo(TGGATESsmall, "rna")[1:10,]
data(TGGATESsmall)
featureInfo(TGGATESsmall, "rna") <- featureInfo(TGGATESsmall, "rna")
sensInf<- sensitivityInfo(TGGATESsmall)[1:10,]
data(TGGATESsmall)
sensitivityInfo(TGGATESsmall) <- sensitivityInfo(TGGATESsmall)
data(TGGATESsmall)
sensProf <- sensitivityProfiles(TGGATESsmall)
sensitivityProfiles(TGGATESsmall) <- sensitivityProfiles(TGGATESsmall)
sensitivityMeasures(TGGATESsmall)
cellNames(TGGATESsmall)
data(TGGATESsmall)
cellNames(TGGATESsmall) <- cellNames(TGGATESsmall)
fNames(TGGATESsmall, "rna")[1:10]
dateCreated(TGGATESsmall)
tSetName <- cSetName
tSetName(TGGATESsmall)
pertNumber(TGGATESsmall)
sensNumber(TGGATESsmall)
pertNumber(TGGATESsmall) <- pertNumber(TGGATESsmall)
sensNumber(TGGATESsmall) <- sensNumber(TGGATESsmall)
# }
Run the code above in your browser using DataLab