set data1 data2......data2036;
用宏控制下dataset的名字

6# baoaibaobao
9.2貌似可以set data1-dataXXX;

楼主的dataset名不规则，不过用宏控制下的话，也是可以的，难度等价于楼主导入这些数据时对dataset的命名

其实一开始导入的时候就做在一起也是可以的......

8# soporaeternus 多谢回复
我试试你这个方法，一开始我觉得股票的symbo不是很规律，比如有600004 600005 然后下一个股票会跳到600008因为600006 600007可能都退市了。不过用这个set data1-datan的方法其实也可，sas会忽略中间的缺失值的。

多谢。至于一开始为啥不一起读入也是想先个股存数据，在合并起来横向比较。


我去试试，多谢啦！！！！

8# soporaeternus
我安装的是9.1.3最全的那个版本，没有9.2怎么办？没法用data x1-x100这个方法，


40   data combine;
41       set x1-x2;
               -
               22
                --
                202
ERROR 22-322: Syntax error, expecting one of the following: a name, a quoted string, (, ;, END, KEY, KEYS, NOBS, OPEN, POINT,
              _DATA_, _LAST_, _NULL_.

ERROR 202-322: The option or parameter is not recognized and will be ignored.

用MACRO，和你导入时的宏写法是类似的

我也希望可以找到好的解决办法，因为一个lab的dataset就有1G多，读入特别慢，有没有高手知道如何减少读入的时间？？跪求

楼主，大智慧上的数据全吗 ；
好像中间删减过，还是因为我用的是免费版的原因；
尤其是涉及到外盘的时候；

6# baoaibaobao
老鹰的解法是对的，多谢了，对于多文件还是要用宏，不过要这么用。


%macro data;

data all;

set %do i = 1 %to 2; x&i %end;;

run;
%mend;
%data

13# z20062081
我只记录量和价格的变化，你指的是什么？

12# myzhang1982 不知道你的问题是不是也和我一样就是data太多了，我有2036个，刚才用楼上的方法可以，这样的循环再data set内部，就不用每次都load一个大的data set 了。

用视图试试。

楼主，你好，请问如何数据收集好了，如果要看各股票的相对表现，你用的什么方法来看！谢谢。
另外你可以用proc append 向数据里面追加来实现，可能会快一些。

17# ryuuzt
请问视图是指什么？

18# dchrenstu

这个我有一些设想：
1.求每日的logreturn： log(todayClosePrice/yesterdayClosePrice) 然后减去当日的大盘的logreturn，这样叫相对强度。

2.可以求过去五日，十日，一个月的logreturn和大盘比较。

3.可以考虑用板块的表现作为参照系。

你有什么好的想法？

18# dchrenstu
感觉这个相对强度还是蛮重要的，因为你会发现日内扰动往往会随大盘而变化，但是如果观察k线，会发现一些股票如果相对大盘比较强势，往往会后市走强的概率蛮高。所以需要统计上进一步的研究。你看呢？

16# shewenhao
我的不是多个dataset的问题，是只有一个很大的dataset，读入要花好长时间

上传一段程序，也许会对你有所帮助：

%global libname dsn1 dsn2 dsn3 srcfile;

data fin;
   input libname $ dsn1 $ dsn2 $ dsn3 $ srcfile $;
   cards;
fy97v6 cen_fy97 cen97b cen97c cen97
fy97v6 cxm97 cxm97b cxm97c cxm97
fy97v6 ptf_fy97 ptf97b ptf97c ptf97
fy97v6 xm97 xm97b xm97c xm97
fy98v6 cen_98 cen98b cen98c cen98
fy98v6 excen_98 excen98b excen98c excen98
fy98v6 ptf_98 ptf98b ptf98c ptf98
fy98v6 xm98 xm98b xm98c xm98
fy98v6 obs_98 obs98b obs98c obs98
fy98v6 ext_98 ext98b ext98c ext98
fy98v6 cenobs98 cenobs98b cenobs98c cenobs98
run;

%macro dxfinptobs(libname, dsn1, dsn2, dsn3, srcfile);
   data &dsn2(keep=scrssn dxp v1-v10 srcfile dm);
      set &libname..&dsn1(obs=max);
      array aa dxp v1-v10;
      do over aa;
         if aa in ('250', '3572', '3620', '36641') then dm=1;
      end;
      srcfile="&srcfile";

   data &dsn3;
      set &dsn2;
      if dm=1;
   run;
%mend dxfinptobs;

%macro dsn;
   %do i=1 %to 11;
      data _null_;
         set fin;
         if _n_=&i then call symput('libname', libname);
            put libname=&libname;
         if _n_=&i then call symput('dsn1', dsn1); put dsn1=&dsn1;
         if _n_=&i then call symput('dsn2', dsn2); put dsn2=&dsn2;
         if _n_=&i then call symput('dsn3', dsn3); put dsn3=&dsn3;
         if _n_=&i then call symput('srcfile', srcfile);
      run;
      %dxfinptobs(&libname, &dsn1, &dsn2, &dsn3, &srcfile);
   %end;
%mend dsn;

%dsn;

也许还有另一种办法，这个办法将所有文件是按照年限，先读成几个文件，如果需要，再继续合并成一个大文件：
%let vars=id date;

data sf97 sf98 sf99 sf00 sf01;
   id=.;
run;

%macro readsf(yr, infile);
   %if &yr=97 %then
      %do;
         data a;
            set fy97sf.&infile(keep=&vars);

         proc sort; by id;

         data sf97;
            set sf97 a; by id;
            if id=. then delete;
         run;
      %end;
   %else %if &yr=98 %then
      %do;
         data a;
            set fy98sf.&infile(keep=&vars);

         proc sort; by id;

         data sf98;
            set sf98 a; by id;
            if id=. then delete;
         run;
      %end;
   %else %if &yr=99 %then
      %do;
         data a;
            set fy99sf.&infile(keep=&vars);

         proc sort; by id;

         data sf99;
            set sf99 a; by id;
            if id=. then delete;
         run;
      %end;
   %else %if &yr=00 %then
      %do;
         data a;
            set fy00sf.&infile(keep=&vars);

         proc sort; by id;

         data sf00;
            set sf00 a; by id;
            if id=. then delete;
         run;
      %end;
   %else %if &yr=01 %then
      %do;
         data a;
            set fy01sf.&infile(keep=&vars);

         proc sort; by id;

         data sf01;
            set sf01 a; by id;
            if id=. then delete;
         run;
      %end;
%mend readsf;

%readsf(97, sf97v0102) %readsf(97, sf97v0304) %readsf(97, sf97v0506)
%readsf(97, sf97v0708) %readsf(97, sf97v0910) %readsf(97, sf97v1112)
%readsf(97, sf97v1314) %readsf(97, sf97v1516) %readsf(97, sf97v1718)
%readsf(97, sf97v1920) %readsf(97, sf97v2122)

%readsf(98, sf98_1) %readsf(98, sf98_2) %readsf(98, sf98_3)
%readsf(98, sf98_4) %readsf(98, sf98_5) %readsf(98, sf98_6)
%readsf(98, sf98_7) %readsf(98, sf98_8) %readsf(98, sf98_9)
%readsf(98, sf98_10) %readsf(98, sf98_11)

%readsf(99, sf990102) %readsf(99, sf990304) %readsf(99, sf990506)
%readsf(99, sf990708) %readsf(99, sf990910) %readsf(99, sf991112)
%readsf(99, sf991314) %readsf(99, sf991516) %readsf(99, sf991718)
%readsf(99, sf991920) %readsf(99, sf992122)

%readsf(00, sf00v0107) %readsf(99, sf00v0814)
%readsf(00, sf00v1518) %readsf(00, sf00v1922)

%readsf(01, sf010105) %readsf(01, sf010608) %readsf(01, sf010911)
%readsf(01, sf011214) %readsf(01, sf011517) %readsf(01, sf011820)
%readsf(01, sf012122)

但我想不管用什么办法，所用的上千多个文件名总是不会被省略或被简写的，因为这些文件名有可能是间断或不连续的，甚至完全是不同，因而造成了所有的文件名不能用一个统一的方式变成loop而读入。

PROC APPEND 过程。

你可以试试 proc append base=XX data=XX;run;这个不需要一行一行的读，比较快。

bufferno         晕 发不出去

19# shewenhao view

不知道sasfile statement是否有效？