Add wtd.mean and wtd.var functions, move wtd.table