Packages

Robust statistics based on Statistex library

Current section

Files

Jump to
statistex_robust lib medcouple.R
Raw

lib/medcouple.R

# Load the required library
library(robustbase)
# Capture the command line arguments as a numeric vector
args <- commandArgs(trailingOnly = TRUE)
arr <- as.list(args)
options(mc_doScale_quiet=TRUE)
# Compute the medcouple using the mc function from robustbase
result <- mc(c(arr))
# Print the result to be captured by Elixir
cat(sprintf("%.10f", result))