value of a ts at some date
val=values(ts,dat)
ts = a timeseries
dat = a date string
val = the value of a timeseries for the given date
load(GROCERDIR+'/data/bdhenderic.dat') // load Hendry and Ericsson database y=values(lm1,'1985q4')