日期和函数.pptVIP

日期和函数 经济实验教学中心 商务数据挖掘中心 日期有多种形式 10/18/04 18/10/04 10/18/2004 18OCT2004 101804 October 18, 2004 我们需要了解如何读入日期，以及如何处理日期。 关于日期的问题 如何显示日期？ 比较两个日期－哪个更早？ 如何求出两个日期之间相差的天数？ ndays = date2 - date1，这样计算行吗? 问题：日期的用普通的减法不行 　例如: date2 = 03/02/2003 date1 = 08/02/2002 ========== -05/00/0001 需要的函数/操作符 * DATA dates; INFILE DATALINES; INPUT brthdate mmddyy10.; DATALINES; 03/03/1971 02/14/1956 01/01/1960 ; PROC PRINT; VAR brthdate; PROC PRINT; VAR brthdate; FORMAT brthdate mmddyy10.; ------------------------------------------------------ Obs brthdate 1 4079 2 -1417 3 0 Obs brthdate 1 03/03/1971 2 02/14/1956 3 01/01/1960 Jan 1, 1960 当你用日期informat读入数据时 SAS 把日期变量变成数值 SAS 给定的数值是1960年１月１日后的天数 这使得两个日期的相减容易了。 注意: 一旦读入，SAS 就不再把该变量当作日期。 * 关于日期; DATA age; INFILE /home/ph5420/data/tomhs.data ; INPUT @14 randdate mmddyy10. @34 brthdate mmddyy10. @74 date12 mmddyy10. ; agedays = randdate - brthdate ; ageyrs = (randdate - brthdate)/365.25; ageint = INT( (randdate - brthdate)/365.25); agetoday= (TODAY() - brthdate)/365.25 ; ageendst= (MDY(02,28,1992) - brthdate)/365.25; daysv12 = date12 - randdate; if ABS(daysv12 - 365) = . then window12 = .; else if ABS(daysv12 - 365) 31 then window12 = 1; else if ABS(daysv12 - 365) = 31 then window12 = 2; yrrand = YEAR(randdate); PROC PRINT DATA=age (obs=10); VAR brthdate randdate agedays ageyrs ageint agetoday; TITLE ‘显示不加日期Format的数据; RUN; PROC PRINT DATA=age (obs=10); VAR brthdate randdate agedays ageyrs ageint agetoday; FORMAT brthdate mmddyy10. randdate mmddyy10.; TITLE ‘显示加了日期Format的数据; RUN; 显示不加日期Format的数据 Obs brthdate randdate agedays ageyrs ageint agetoday 1 -8589 10175 18764 51.3730 51 69.0678 2 -6880 10239 17119 46.8693 46 64.3888 3 -12572 10002 22574 61.8042 61 79.9726 4 -9