# The files (test.mat) should be downloaded from http://sourceforge.net/projects/cinoedv/files/.
FileName <- system.file("extdata","test.mat",package="CINOEDV")
Data <- InputData(FileName)
pts <- Data$pts
class <- Data$class
Run the code above in your browser using DataLab