#' Check if Scidb has the fix allowing `remove_versions(..., keep:x)`, where
#' `x` is greater than the number of versions the array actually has
#'
#' @export
.SCIDB_HAS_REMOVE_VERSIONS_KEEP_FIX <- function(con){
if(con$scidb_version$major>=21){
return(TRUE)
}
if(con$scidb_version$major==19 && con$scidb_version$minor==11 &&
con$scidb_version$patch>=9){
return(TRUE)
}
if(con$scidb_version$major==20 && con$scidb_version$minor==10 &&
con$scidb_version$patch>=3){
return(TRUE)
}
return(FALSE)
}
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.