有两个数据集，分别是：
data a;
   id='这个周一是好人';
   output;
   id='那个钱二是坏人';
   output;
   id='谁说张三是好人';
   output;
   id='我看李四凑活着';
   output;
   id='不知道王五是坏人';
   output;
   id='马六不知道';
   output;
   id='李六其他';
   output;
run;
data travel;
   input name $;
cards;
周一
钱二
王五
;
run;
现要生成如下的数据集c，即，对于数据集a里的人，在travel名单出现的为1，其余为0，详细的数据结构是：
id                                travel
这个周一是好人             1
那个钱二是坏人             1
谁说张三是好人             0
我看李四凑活着             0
不知道王五是坏人         1
马六不知道                   0
李六其他                       0

现实数据量庞大，求各位大侠、高手帮忙，看看能否有一个自动读取travel变量的程序，谢谢谢谢~~~~！！！！！