example using substitute with mathematical expressions

somewhat lengthy but effective idiom for plotting mathematical
expressions with values taken from variables in the R session
prefer "GitHub" to "Github" as a name