## set GO ID's and color
goIDs <- c("GO:0051130","GO:0019912","GO:0005783")
color <- c("lightblue","red","yellow")
dd <- getAmigoTree(goIDs=goIDs,color=color,
filename="example",picType="dot",saveResult=FALSE)
tt <- readAmigoDot(object=dd)
#AmigoDot.to.Cyto(tt)
Run the code above in your browser using DataLab