## Not run:
# # build an "HIS" object for GO Molecular Function
# input.file <-
# "http://dcgor.r-forge.r-project.org/data/Feature/Feature2GO.sf.txt"
# Feature2GOMF.sf <- dcAlgoPropagate(input.file=input.file,
# ontology="GOMF", output.file="Feature2GOMF.sf.RData")
# names(Feature2GOMF.sf)
# Feature2GOMF.sf$hscore[1]
# Feature2GOMF.sf$ic[1:10]
# Feature2GOMF.sf$slim[1]
#
# # extract hscore as a matrix with 3 columns (Feature_id, Term_id, Score)
# hscore <- Feature2GOMF.sf$hscore
# hscore_mat <- dcList2Matrix(hscore)
# colnames(hscore_mat) <- c("Feature_id", "Term_id", "Score")
# dim(hscore_mat)
# hscore_mat[1:10,]
# ## End(Not run)
Run the code above in your browser using DataLab