+ # Check/transform arguments
+ bin_dir = "epclust.bin/"
+ dir.create(bin_dir, showWarnings=FALSE, mode="0755")
+ if (!is.function(series))
+ {
+ series_file = paste(bin_dir,"data",sep="")
+ unlink(series_file)
+ }
+ if (is.matrix(series))
+ serialize(series, series_file)
+ else if (!is.function(series))