set.seed(50)
# linear model, adding an arbitrary string to the object
dat <- data.frame(y=runif(50,-1,1), x1=runif(50), x2=runif(50), z=runif(50))
ft = qgcomp.glm.noboot(f=y ~ z + x1 + x2, expnms = c('x1', 'x2'), data=dat, q=2, family=gaussian())
ft2 = .qgcomp_object_add(ft, date=Sys.Date())
ft2$date # not typically part of a qgcomp object, but could be useful for e.g. datestamping analyses
Run the code above in your browser using DataLab