以下foreign变量分为两类，想分别求每一类中price的中位数，并将各类中位数赋值给一个新变量a。
用此命令（by foreign, sort:summ price, d）和g a=r(p50)语句，结果所有的中位数都是最后一个类别的中位数，如何实现分别将每一类的中位数分别赋给a？
请高手帮忙！