rename fast_factor, add fast tapply