R/spark_setloglevel.R

In catlain/sparklyrfun: sparklyrfun

# not work
spark_setloglevel <- function(sc, loglevel = "ERROR"){
  loglevel <- ensure_scalar_character(loglevel)
  spark_context(sc) %>%
    invoke("setLogLevel", loglevel)
}
environment(spark_setloglevel) <- asNamespace('sparklyr')