clear?all
clc???%慣例Q值法分配席位，wy為席位數，ps為人數總和，R為分配方案
wy=19;
P=[103?63?34]
%菜單選項
MENUN=menu（‘選擇方法‘‘慣例Q值法‘‘dhondt法‘‘都用‘）;
%慣例Q值法
if?（MENUN==1||MENUN==3）==1
n=size（P2）;
ps=sum（P）;
RS=0;
for?i=1:n
????R（i）=fix（P（i）/ps*wy）;
????RS=RS+R（i）;
end
wy1=wy-RS;
for?i=1:wy1
????for?j=1:n
????????Q（ji）=P（j）.^2/（R（j）*（R（j）+1））;
????end
????t=Q（1i）;
????a=1;
????for?m=2:n
????????if?Q（mi）>t
????????????t=Q（mi）;