#' @title hill
#'
#' Description hill
#'
#' @param x x
#' @param p p
#' @param h h
#' @export hill
#' @return hill
hill <- function(x,p=100,h=150){x^p / (x^p + h^p)}
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.