minor as.data.frame fix