data绘图初赛试题.pdfVIP

1、Data步、宏和绘图

[背景介绍]

以下是某公司销售信息，全部数据如下：

[题目要求]

1）使用Data步计算两个新变量，dif1是当年销售额和上一年销售额的差值，dif2是当年利

润和上一年利润的差值。使用数组与DO循环完成这个操作，分别计算不会得分。只计算东

部地区

2）编写宏%report(type=,var=)完成如下功能：

a.type有两个取值，分别是year和market，当type=year时则需要做反映时间序列的

图，作线形图，当type=market时，做反映地区比较的图，作条形图，。

b.var有两个取值，分别是sale和profit，以输入的变量为指标作图。

[答案]

dataresult(drop=i);

setsale;

wheremarket=东;

arrayvar{*}saleprofit;

arraydif{2};

arraylag_var{2}_temporary_(.,.);

doi1todim(var);

dif{i}=var{i}-lag_var{i};

lag_var{i}=var{i};

end;

run;

%macroreport(type=year,var=sale);

%iftype=year%then%DO;

procsql;

createtabletempasselectyear,sum(var)asy

fromsale

groupbyyearorderbyyear;quit;

procsgplotdata=temp;

seriesx=yeary=y;run;quit;

%END;

%ELSE%DO;

procsql;

createtabletempasselectmarket,sum(var)asy

fromsale

groupbymarketorderbymarket;quit;

procsgplotdata=temp;

vbarmarket/response=y;run;quit;

%END;

%mendselect_disp;

%report(type=year,var=sale);

[取分点]：共30分

1、第一问15分：定义一般数组3分，定义数组并且赋初值+3，定义临时数组+3，会写DO循

环+3，完成全部+3。

2、第二问15分：该题有多重答题方式，是否使用SQL进行数据并不会影响成绩，使用proc

sgplot和gplot都可以。只要程序可以执行就可以的满分。如不能执行，程序中出现以下

内容可以得分：写出了%if..%else分支判断语句+5，写出了plot,gplot,sgplot完成语句+5。

2、PROCSQL过程和转置试题

[背景介绍]

该数据取自银行系统的表和流水表，字段说明如下：

表(Loans):

每条记录代表某个账户的上的一条信息,条数：682

表(Loans)

名称说明

disp_id权限号

loan_id号(主键)

account_id账户号

date日期

amount金额

duration期限

payments每月归还额

status还款状态A代表合同终止，没问题；B代表合