is_git <- function(){
system('git rev-parse --is-inside-work-tree',intern = TRUE)=='true'
}
is_travis <- function() {
identical(Sys.getenv("TRAVIS"), "true")
}
is_gh <- function() {
nzchar(Sys.getenv("GITHUB_ACTION"))
}
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.