reverseScale<- paste0("compute ", paste0(recARE, "r"), "=", max(df[recARE]) + 1, "-", paste0(recARE), ".") %>% tibble::enframe()
reverseSyntax<- rbind(reverseSyntax, reverseScale)
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.