如何生成两列新变量

如何基于附件中的estimate数据集生成两列新变量class1和class0，如下：
class1        class0
adeno 1     squamous
large 1       squamous
small 1       squamous


谢谢！

estimate.rar (1.06 KB) 本附件包括：

• estimate.sas7bdat

2021-4-25 00:51:58 上传

1. libname mylib "desktop";
   
2. 
   
3. data mydata;
   
4.     length class0 class1  $20;
   
5.     do i=last to 1 by -1;
   
6.             set mylib.estimate nobs=last point=i;
   
7.                 retain class0 "";
   
8.                 pos=prxmatch("/ /",left(Parameter));
   
9.                 if i=last then class0=substr(Parameter, pos);
   
10.                 else class1=substr(parameter,pos);
    
11.                 if i^=last then output;
    
12.         end;
    
13.         stop;
    
14.         drop pos;
    
15. run;

复制代码

乐天天12300 发表于 2021-4-25 21:23

stop语句的作用？
输出的class1 class0两边好像有空格。
谢谢！

用compress去掉所有空格

乐天天12300 发表于 2021-4-25 21:23

你这样是否将整个数据集变成倒序了

三种方法，1.
1.SQL过程,你去看一下SQL添加列操作；
2.生成两列组成的新数据集，然后合并。
3.直接原数据集，加两列，set语句添加变量值；

whymath 发表于 2021-4-28 22:13
你这样是否将整个数据集变成倒序了

倒序如何解决？谢谢！

1. data result;
   
2.         set mylib.estimate nobs=ncount;
   
3.         length class1 class0 $20;
   
4.         if _n_=1 then set mylib.estimate(keep=Parameter rename=(Parameter=Parameter0)) point=ncount;
   
5.         class1=left(substr(left(Parameter),index(left(Parameter),' ')));
   
6.         class0=left(substr(left(Parameter0),index(left(Parameter0),' ')));
   
7.         if _n_ ne ncount;
   
8.         drop Parameter0;
   
9. run;

复制代码

这里的逻辑是什么？

1. data result1;  set test;  where parameter in ("adeno 1", "large 1","smarll 1");  id = whichc(parameter, "adeno 1", "large 1","smarll 1");  class1 = estimate;run;
   
2. data result2;  set test;  where parameter in ("sguamous");  id = 1;  class0 = estimate;run;
   
3. data result;  merge result1 result2;  by id;run;

复制代码

红色部分作新变量class1
蓝色部分作新变量class0？？