# Definition of a bioDistclass Object
data(STATegRa_S1)
## Create ExpressionSets
mRNA.ds <- createOmicsExpressionSet(Data=Block1,pData=ed,pDataDescr=c("classname"))
require(Biobase)
## Create bioDistclass Object
bioDistmRNA<-bioDistclass(name = "mRNAbymRNA",
distance = cor(t(exprs(mRNA.ds)),method="spearman"),
map.name = "id",
map.metadata = list(),
params = list())
Run the code above in your browser using DataLab