## Load package
library("SPUTNIK")
## Create ms.image-class object
msIm <- msImage(values = matrix(rnorm(200), 40, 50), name = "test", scale = TRUE)
## Generate binary image
binIm <- refImageBinaryOtsu(msIm)
Run the code above in your browser using DataLab