作者duncan30236 (林峰)
看板SOCI_YAGYU
标题[路人] 借放
时间Thu Dec 9 17:22:20 2010
data data1;set data;keep c6_a c6_b e1;
label c6_a = "请问您上题的总费用中包含「杂费(在台)」大约多少元?"c6_b = "币制
"
e1="国籍";run;
proc format;
value e1lb 1="亚洲地区" 2="美洲地区" 3="欧洲地区" 4="其他地区";
data data1;SET data1;
if e1<=7 and 16 then e1lb=1;
if 8 <=e1<=9 then e1lb=2;
if 10<=e1<=13 then e1lb=3;
if 14<=e1<=15 then e1lb=4;
format e1 e1lb.;
proc print data=data1;
var e1 e1lb;run;
data data1;set data1;
if c6_b=1 then NT=0.36*c6_a;
if c6_b=2 then NT=4.6*c6_a;
if c6_b=3 then NT=3.9*c6_a;
if c6_b=4 then NT=23.2*c6_a;
if c6_b=5 then NT=0.03*c6_a;
if c6_b=6 then NT=9.6*c6_a;
if c6_b=7 then NT=1.04*c6_a;
if c6_b=8 then NT=30.2*c6_a;
if c6_b=9 then NT=29.9*c6_a;
if c6_b=10 then NT=48*c6_a;
if c6_b=11 then NT=40.3*c6_a;
if c6_b=14 then NT=29.8*c6_a;
if c6_b=16 then NT=1*c6_a;
if c6_b=17 then NT=0.003*c6_a;
if c6_b=18 then NT=0.69*c6_a;
proc print data=data1;run;
proc glm data=data1;class e1lb;model NT=e1lb;
contrast '1v.s.2' e1lb 1-1 0 0 ;
contrast '1v.s.3' e1lb 1 0 -1 0 ;
contrast '1v.s.4' e1lb 1 0 0 -1;
contrast '2v.s.3' e1lb 0 1 -1 0 ;
contrast '2v.s.4' e1lb 0 1 0 -1;
contrast '3v.s.4' e1lb 0 0 1 -1;run;
--
※ 发信站: 批踢踢实业坊(ptt.cc)
◆ From: 140.119.207.136
※ 编辑: duncan30236 来自: 140.119.156.38 (12/13 21:53)