sas运算符及函数

data oranges;
	input variety $ flavor texture looks;
	total=flavor+texture+looks;

	if variety in('navel', 'valenica')
	then total=total*10;

	if(flavor<texture & variety='mandarin')
	then total=total*100;

	/* <>-选出左右两边最大值，**2-平方 */
	a=flavor<>texture**2;
	b=variety||'.var';

	label='总数';
	cards;
	navel 9 8 6
	temple 7 7 7
	valencia 8 9 9
	mandarin 5 7 8
;

proc sort data=oranges;
	by descending total;
run;

proc print data=oranges;run;

data bbb;
	input x1-x5 x6 $ date yymmdd15.;
	x7='o';
	x8='I am a student';
	/* 以下是数学函数 */
	a1=max(x1,x2);
	a2=sum(x1,x2);
	a3=sign(x3);
	a4=sqrt(x5);
	a5=mean(x1,x2);
	/* 以下是截取函数 */
	b1=floor(a5);
	/* 以下是字符函数 */
	c1=index(x6,x7);
	c2=substr(x6,3,3);
	c3=scan(x8,2);
	c4=upcase(x8);
	c5=compress(x6,x7);
	/* 以下是时间函数 */
	d1=weekday(date);
	d2=year(date);
	d3=qtr(date);
	d4=day(date);
	/* 以下是概率函数 */
	e1=probnorm(0);
	e2=n(of x1-x5);
	e3=nmiss(of x1-x5);
	e4=var(x1,x2);
	e5=std(x1,x2);
	/* 以下是随机函数 */
	f1=ranuni(1);

	cards;
1 2 3 5 -6 amazon 2004/9/22
3 5 0 8 0 box 1960/1/2
9 10 -7 9 4 check 1960/1/1
7 6 . 1 8 delete 1959/12/31
-2.5 -2.3 3 1 2 desk 2005/9/29
;
run;

proc print;run;