帮忙看看这段SAS程序

winecoding

我对以下这段程序有三个问题：

<br />
proc format;<br />
  　　 value 　qtrfmt　 ’01jan2002’ d - ’31mar2002’ d = ’1’<br />
　　　　　　　　　  ’01apr2002’ d - ’30jun2002’ d = ’2’<br />
   　　　　　　　　　’01jul2002’ d - ’30sep2002’ d = ’3’<br />
　　　　　　　　　　’01oct2002’ d - ’31dec2002’ d = ’4’;<br />
run;<br />
data company.quarters(keep=count order_date<br />
　　　　　　　　　rename=(order_date=Quarter));<br />
　　　set retail.orders;<br />
　　　format order_date qtrfmt.;<br />
　　　by 　order_date 　groupformat 　notsorted;<br />
　　　where year(order_date)=2002;<br />
　　　if first.order_date then Count=0;<br />
　　　　Count +1;<br />
　　　if last.order_date;<br />
run;</p>
<p>

</p>

1）我知道这三行

if first.order_date then Count=0;

Count +1;

if last.order_date;

是用来统计每个季度的购买量的。但我不太懂得是这个 “ if last.

order_date;”

起得是什么作用？

２）关于这个ＳＡＳ程序的执行顺序可不可以这样理解：

　　　by 　order_date 　groupformat 　notsorted;

执行完后，数据retail.orders已经按order_date进行季度　分组了

if first.order_date then Count=0;

Count +1;

if last.order_date;

只是依次对分组后的每一行数据进行判断。

３）year(order_date)=２００２这里的year( ) 是一个函数吗？

hssnow

呵呵，对你要问的意思不是很清楚，大概说说个人理解~

问题1）和问题2）

first.order_date和last.order_date是临时变量，用来标记对于变量order_date每组不同值的第一个和最后一个观测。

<br />
if first.order_date then Count=0;<br />
Count +1;<br />
if last.order_date;<br />

应该是用来计数的吧，计算每个季度有多少观测值：对每个季度第一个观测值赋count为0，累加直到该季度的最后一个观测。

if last.order_date;是用来判断是否为特定季度的最后一个观测：

若不是，则last.order_date=0，“if last.order_date;”为false，不向下执行，返回data首部执行，即进行对count的累加；

若是，则last.order_date=1，“if last.order_date;”为true，继续向下执行，到run，输出到output，即对特定季度的count累加完成。

如对如下测试程序：

<br />
data hs;<br />
	input  order_date $ @@;<br />
datalines;<br />
1 1 1 2 2 3 3 3 3 4 4 4<br />
;<br />
run;<br />
proc sort data=work.hs;<br />
	by order_date;<br />
run;<br />
data hs2;<br />
	set hs;<br />
	by order_date notsorted;<br />
	if first.order_date then count=0;<br />
	count+1;<br />
	if last.order_date;<br />
run;<br />

得到结果

<br />
order_date count<br />
1              3<br />
2              2<br />
3              4<br />
4              3<br />

也可以试下将“if last.order_date;”这句去掉，会发现结果不同，每个观测都被输出了。</p>

问题3）

year(date)是一个函数，返回四位数字，提取参数date的年份。此程序中“where year(order_date)=2002;”提取order_date的年份，判断是否为2002年。

hehehehe

if last.order_date: 只输出最后的order。其他的问题楼上的回答的很好。

回复第1楼的 winecoding：

msmiles

data hs2;

set hs;

by order_date notsorted;

if first.order_date then count=0;

PUT 'first.order_date=' first.order_date;

count+1;

if last.order_date;

PUT 'last.order_date=' last.order_date;

run;

THIS PURPOSE FOR WHOLE CODE IS TO COUNT HOW MANY ORDER COMPANY DID FOR EACH SEASON .

THE CODE FOLLOW :DATA FILE-NAME1;

SET FILE-NAME2;

IF CONDITION;

SO THE TWO 'IF' FUNCTION SAME AS DO J=I(first.order_date) TO M(last.order_date)

ACTION;

END;

THE VALUE OF first.order_date ,last.order_date IS BOOLEAN VALUE 1,0 ,THAT MEAN TRUE OR FALSE.WHEN YOU RUN THIS CODE,GO TO SAS LOGS TO READ 'PUT VALUE' CAREFULLY AND THEN YOU

MAYBE CAN UNDERSTAND.