13-4 tapply( )函数