if (FALSE) {
# Uses fonts not available on CRAN
umxPlotFun(sin, max= 2*pi)
umxPlotFun("sqrt(1/x)", max= 2*pi)
umxPlotFun(sin, max= 2*pi, ylab="Output of sin", title="My Big Graph")
p = umxPlotFun(function(x){x^2}, max= 100, title="Supply and demand")
umxPlotFun(function(x){100^2-x^2}, p = p)
# Controlling other plot features
umxPlotFun(c("sin(x)", "x^3")) + ylim(c(-1,5))
}
Run the code above in your browser using DataLab