跪求以下程序（我是新手）

是 否 +2 论坛币

k人 参与回答

经管之家送您一份

应届毕业生专属福利!

求职就业群

赵安豆老师微信：zhaoandou666

经管之家联合CDA

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

立即领取

感谢您参与论坛问题回答

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

+2 论坛币

sheet1：
name              weight
jack                  83
john                  84
mike                 87
philip                88

sheet2
name               weight
jocy                     87
hojn                    93
mbci                   92
将两个表中的weight进行比较，并得到差值（绝对值），记为weight_diff，并存入sheet3中，
请问各位高手这个应该怎么做唉？小弟刚学，谢谢了

扫码加我 拉你入群

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

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

分享0 收藏0 回帖

关键词：Weight Philip Eight weigh sheet 程序 新手

麻烦各位哥哥姐姐了，我很急需，谢谢

data sheet1;
    input id name$ weight@@;
    cards;
1   ack         83
2   john        84
3   mike        87
4   philip      88
;
data sheet2;
    input id name$ weight@@;
    cards;
1   ocy           87
2   hojn          93
3   mbci          92
4   wic           90
;
proc sql;
    create table sheet3 as
        select sheet1.weight-sheet2.weight as weight_diff,sheet1.id
        from sheet1 full join sheet2
        on sheet1.id=sheet2.id
        ;
quit;
;
proc sql;
    create table sheet3 as
        select sheet1.weight-sheet2.weight as weight_diff,sheet1.id
        from sheet1 full join sheet2
        on sheet1.id=sheet2.id
        ;
quit;

楼上的大哥貌似您写的有点问题啊，运行不通，还有没有高手能帮忙解决一下啊，

你把数据集发到hxsxhy@126.com，我帮你处理一下

1# owen010250
你没有说清楚怎么比较weight 是把name一样的人进行比较还是怎么比较。

这个需要用到SQL模块吗

建两个数据集，分别将变量命名为weight1和weight2
然后用merge合并文件
最后直接算weight=abs(weight1-weight2)并保存。

data sheet1;
    input id name$ weight1@@;
    cards;
1   ack         83
2   john        84
3   mike        87
4   philip      88
;
run;
data sheet2;
    input id name$ weight2@@;
    cards;
1   ocy           87
2   hojn          93
3   mbci          92
4   wic           90
;
run;

data sheet;
merge sheet1 sheet2;
weight=abs(weight1-weight2);
run;

是sheet1中的每个weight分别与sheet2中的weight进行比较，再得到差值，可能是我前面没有说清楚吧，麻烦高手们再教教我，谢谢了

1. data sheet1;
   
2.     input  name$ weight@@;
   
3.     cards;
   
4. ack         83
   
5. john        84
   
6. mike        87
   
7. philip      88
   
8. ;
   
9. data sheet2;
   
10.     input  name$ weight@@;
    
11.     cards;
    
12. ocy           87
    
13. hojn          93
    
14. mbci          92
    
15. wic           90
    
16. ;
    
17. proc sql;
    
18.         create table sheet3 as
    
19.         select sheet1.name,sheet1.weight,sheet2.weight as w2,sheet2.name as n2,ABS(sheet1.weight-w2) as weight_diff
    
20.         from sheet1,sheet2;
    
21. quit;

复制代码

                                                        weight_
                           name      weight    w2     n2       diff
                           ack         83      87    ocy         4
                           ack         83      93    hojn       10
                           ack         83      92    mbci        9
                           ack         83      90    wic         7
                           john        84      87    ocy         3
                           john        84      93    hojn        9
                           john        84      92    mbci        8
                           john        84      90    wic         6
                           mike        87      87    ocy         0
                           mike        87      93    hojn        6
                           mike        87      92    mbci        5
                           mike        87      90    wic         3
                           philip      88      87    ocy         1
                           philip      88      93    hojn        5
                           philip      88      92    mbci        4
                           philip      88      90    wic         2