R/AAAonLoad.R

In mhahsler/arulesNBMiner: Mining NB-Frequent Itemsets and NB-Precise Rules

## Java
.jinit()
jv <- .jcall("java/lang/System", "S", "getProperty", "java.runtime.version")
if(substr(jv, 1L, 2L) == "1.") {
  jvn <- as.numeric(paste0(strsplit(jv, "[.]")[[1L]][1:2], collapse = "."))
  if(jvn < 1.5) stop("Java >= 5 is needed for this package but not available")
}

.onLoad <- function(libname, pkgname) {
  options(java.parameters="-Xrs")  ### so sun java does not kill R on CTRL-C
  .jpackage(pkgname, lib.loc = libname)
}