Dear Sir:

When I try to save large and very complex recursive objects with some components containing models (such as the output from arima or lm ),
the resulting file sizes increase by 4 meg per save.

example directory:

amex                8 meg
argentina         12 meg
australia          16 meg
...

Moreover, I am unable to read these file objects back into R.
I note that readBin and writeBin are only for single mode data such as numeric.

Here is a section of my program or script:
  
SaveObj = function( x, nn ) {

pp=paste( "C://Program Files//R//R-2.5.1//arima//",nn, sep="")

pp=paste( "save(  x, file=", sQuote(pp),")", sep="" ) 
eval(parse(text=pp))
}	# end of function: SaveObj
load( file="C://Program Files//R//R-2.5.1//arima//amex" )




allArima=function( yy, popSize=10, generations=5 ){

nn = names(yy)
for( i in 1:dim(yy)[2] ) {

print( paste( "    iter: ", i, "name: ", " ", names(yy)[i],sep="")  )

#						  data                 AVY              Note lagxy <- CreateColumnSpace( yy, column = i, startLag = 1, endLag = 8, exclude=T, by=1 )

xx <- xy$xx

response = xy$response

t.index = xy$indx




# genetically select predictor column space

result = intGa( response =response, ... ,

                       FUN = LM, monitor = F, monitorFun = nn.Monitor, 

                       Evaluator = Std.Eval, wildCardPct = 0.10, 

                        parm1 = 4, parm2 = 1, parm3 = 3 ) 

x.model=result$bestModel

SaveObj( x=x.model, nn=nn[i] )

rm(result,x.model)

} 	# end for 


return( formulaLst )

}		# end of allArimaVery Sincerely,Lloyd Lubet

	[[alternative HTML version deleted]]

