SUPER <- function(u){ OL(u) %>% left_join(.,OCR(u,.)) %>% left_join(.,GAIN(u,pHtarget(u))) }
Add the following code to your website.
REMOVE THIS Copy to clipboard
For more information on customizing the embed code, read Embedding Snippets.