+
+serialize = function(path=".", csvSeries, binSeries, byCols=0, nbSeries=0)
+{
+ system(paste(path,"/ppam.exe serialize ",csvSeries," ",binSeries," ",byCols," ",nbSeries,
+ sep=""))
+}
+
+deserialize = function(path=".", binSeries, csvSeries, ranks="-1")
+{
+ system(paste(path,"/ppam.exe deserialize ",binSeries," ",csvSeries," ",ranks,sep=""))
+ return ( read.table(csvSeries, sep=",") )
+}