# Lambda is a variable, chi and q are parameters.
r <- function(lambda, chi = chi, q = q) {
q / (q + chi*(1-q)*(1-lambda))
}
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.