
I have an R script with the following applicable lines:

		xshort <- window(s, start=st, end=ed)
. . .
		xshort <- ts(xshort, frequency=1, start=1)
. . .
		m1 <- m2 <- m3 <- m4 <- m5 <- m6 <- NULL
		m1 <- tslm(xshort ~ trend)

I get an error:

Error in get(dataname) : object 'xshort' not found

When I do traceback() I get:

3: get(dataname)
2: tslm(xshort ~ trend) at #19
1: model.cross.validation(l[["MEN"]]$series)

Which points to the call to tslm above.  Since I am not supply 'data' to 
the tslm call (in the forecast package),, I am assuming that the code is 
dying here (in tslm):

     if (missing(data)) {
         dataname <- as.character(formula)[2]
         x <- get(dataname)
         data <- data.frame(x)
         colnames(data) <- dataname
     }

Any ideas what is failing?

Kevin

	[[alternative HTML version deleted]]

