fixed bug in as.dfm()