# NOT RUN {
data(PhyloExpressionSetExample)
# the best parameter setting to visualize this plot:
# png("test_png.png",700,400)
PlotGeneSet(ExpressionSet = PhyloExpressionSetExample,
gene.set = PhyloExpressionSetExample[1:5, 2],
type = "l",
lty = 1,
lwd = 4,
xlab = "Ontogeny",
ylab = "Expression Level")
# dev.off()
# In case you would like to work with the expression levels
# of selected genes you can specify the 'get.subset' argument:
PlotGeneSet(ExpressionSet = PhyloExpressionSetExample,
gene.set = PhyloExpressionSetExample[1:5, 2],
get.subset = TRUE)
# get a gene subset using only a phylostratihraphic map
ExamplePSMap <- PhyloExpressionSetExample[ , 1:2]
PlotGeneSet(ExpressionSet = ExamplePSMap,
gene.set = PhyloExpressionSetExample[1:5, 2],
get.subset = TRUE,
use.only.map = TRUE)
# }
Run the code above in your browser using DataLab