异众比率（variation ratio，以下简称 vr）是统计学当中研究现象离中趋势的指标之一。异众比率指的是总体中非众数次数与总体全部次数之比。
换句话说，异众比率指非众数组的频数占总频数的比例。

异众比率的公式如下：

vr_y＝ [ ∑(f_i) - f_max ] / ∑(f_i)


其中：y         是 变量名

          f_i       是 变量y 的 第 i 个（非缺漏值）取值对应的频数；

          f_max 是 变量y 的 众数（频数最高的取值）对应的频数；


现在我想自己计算这个异众比率，目前掌握的信息如下：

sysuse "auto.dta", clear
tabulate rep78

*从上表的输出结果可以看出，rep78的众数是3，对应的频数是f_max=30；
*相应的 ∑(f_i) = 2+8+30+18+11=69*这样计算异众比率就是  vr ＝ (69 - 30)/69 = 0.5652
*可是这个f_max=30 如何提取呢？
*如何用命令（或者函数、公式等）编程计算出这个异众比率呢？