Nothing
"michaelis" <- as.formula(v ~ S/(S+Km) * Vmax)
"compet_mich" <- as.formula(v ~ S/(S + Km*(1+I/Ki) ) * Vmax)
"non_compet_mich" <- as.formula(v ~ S/( (S + Km)*(1+I/Ki) ) * Vmax)
Any scripts or data that you put into this service are public.
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.