楼主: jessieren819
1687 4

[原创博文] 急问两道sas题 [推广有奖]

  • 1关注
  • 0粉丝

初中生

38%

还不是VIP/贵宾

-

威望
0
论坛币
860 个
通用积分
0
学术水平
0 点
热心指数
0 点
信用等级
0 点
经验
146 点
帖子
11
精华
0
在线时间
18 小时
注册时间
2008-4-17
最后登录
2019-9-18

+2 论坛币
k人 参与回答

经管之家送您一份

应届毕业生专属福利!

求职就业群
赵安豆老师微信:zhaoandou666

经管之家联合CDA

送您一个全额奖学金名额~ !

感谢您参与论坛问题回答

经管之家送您两个论坛币!

+2 论坛币
初学sas,老师讲的很简要。。例子讲的很快。。作业中有两道题不是很懂,写了部分code,写不下去了。。。需求帮助。。谢谢。。。

Write code to create a SAS data set that looks like the following 20 × 20 matrix:
X1 X2 X3 X4 ... X19 X20
1     . . . . .....................
2    1 . . . .....................
3    2    1 . . .................
...
19 18 17 16 ........1
20 19 18 17 ...     2     1

DATA a51;
Array abc [20] x1-x20;
Do i=1to 20;
  DO j=1 to 20;
  abc=i-j+1;
OUTPUT;
END;
END;
KEEP x1-x20;
RUN;
PROC print data=a51; RUN;

结果很不对。。。谢谢了

第二题:
Create a SAS data set that contains two variables: X and FactX. Assign X the values
{1, 0, 4,−2, 5} and define FactX as the factorial of X. The data should look like::
X FactX
1   1
0   1
4   24
-2  .
5  120

老师要求不能用 proc 或者 factorial function来做。。。用log后,然后exp

我的code
DATA fact2;
x=0;
a=0;
IF x>0 THEN do i= 2 to x;
a=a+log(i);
       END;
factx= exp(a);
ELSE IF x<0 THEN factx=0;
ELSE factx=1;
RUN;
PROC PRINT data=fact2; RUN;

麻烦了。。。。
二维码

扫码加我 拉你入群

请注明:姓名-公司-职位

以便审核进群资格,未注明则拒绝

关键词:Factorial following Variables Variable function following create matrix

回帖推荐

本帖被以下文库推荐

沙发
soporaeternus 发表于 2010-9-22 22:31:12 |只看作者 |坛友微信交流群
  1. data a;
  2.         array x x1-x20;
  3.         do x1=1 to 20 by 1;
  4.                 do i=2 to dim(x) by 1;
  5.                         x[i]=ifn(x[i-1]-1>0,x[i-1]-1,.);
  6.                 end;
  7.                 output;
  8.         end;
  9.         drop i;
  10. run;
  11. proc print noobs;run;quit;


  12. data b;
  13.         input x;
  14.         y=0;
  15.         if x<0 then FactX=.;
  16.         else do i=max(x,1) to 1 by -1;
  17.                 y+log(i);
  18.                 FactX=exp(y);
  19.         end;
  20.         drop y i;
  21.         datalines;
  22.         1
  23.         0
  24.         4
  25.         -2
  26.         5
  27.         ;
  28. run;
  29. proc print noobs;run;quit;
复制代码
已有 3 人评分学术水平 热心指数 收起 理由
pobel + 1 + 1 精彩帖子
chouxiangdaishu + 1 相当的敬业
hopewell + 1 + 1 真敬业,过节不忘回帖子:)

总评分: 学术水平 + 3  热心指数 + 2   查看全部评分

Let them be hard, but never unjust

使用道具

藤椅
jessieren819 发表于 2010-9-22 23:40:10 |只看作者 |坛友微信交流群
thanks,太感谢了。。。

使用道具

板凳
anniegirl 发表于 2010-9-23 14:20:53 |只看作者 |坛友微信交流群
太强了,学习啦!

使用道具

报纸
saiyasaibing 发表于 2010-9-23 23:07:00 |只看作者 |坛友微信交流群
hei PRO sas writer!

使用道具

您需要登录后才可以回帖 登录 | 我要注册

本版微信群
加好友,备注cda
拉您进交流群

京ICP备16021002-2号 京B2-20170662号 京公网安备 11010802022788号 论坛法律顾问:王进律师 知识产权保护声明   免责及隐私声明

GMT+8, 2024-5-9 06:22