if (FALSE) { # requireNamespace("sparklyr", quietly = TRUE) && interactive()
sc <- sparklyr::spark_connect(master = "local")
spark_df <- sparklyr::copy_to(sc, mtcars)
result <- stddiff.binary(
data = spark_df,
gcol = 9, # column index of grouping variable
vcol = c(8) # columns of binary variables
)
sparklyr::spark_disconnect(sc)
}
Run the code above in your browser using DataLab