Me gustaría convertir un data.frame en un objeto ff, con as.ffdf como se describeaquí

df.apr=as.data.frame(df.apr) # from data.table to data.frame
cols=df.apr[1,] 
cols=sapply(cols,class)
df_apr=as.ffdf(df.apr,vmode=cols)

da un error:

Error in ff(initdata = initdata, length = length, levels = levels, ordered = ordered,
: vmode 'numeric' not implemented

sin el argumento 'vmode', se da el siguiente error:

Error in ff(initdata = initdata, length = length, levels = levels, ordered = ordered, 
: vmode 'character' not implemented

Sin embargo, escribir en una mesa y luego leer directamente en ff funciona:

write.table(df.apr,file='df_apr.txt',sep='\t',row.names=F)
df.apr.ff=read.table.ffdf(file='df_apr.txt',header=F,VERBOSE=T)

pero esto consume mucho tiempo [y torpe]. ¿hay una mejor manera?