SAS插值：无ETS模块时PROC EXPAND的替代方案（年度转日度数据）

方案1：数据步循环生成日度记录 #

如果是将年度值平均分摊到全年每一天，可以用数据步结合日期循环实现：

/* 假设年度数据集为annual_data，包含year（年度）和value（年度值）变量 */
data daily_data;
    set annual_data;
    /* 生成当年第一天和最后一天的日期 */
    start_date = mdy(1,1,year);
    end_date = intnx('year', start_date, 0, 'end');
    /* 循环生成每一天的记录 */
    do date = start_date to end_date;
        /* 按全年天数分摊年度值，也可根据需求调整分摊规则 */
        daily_value = value / (end_date - start_date + 1);
        output;
    end;
    drop start_date end_date year value;
run;

如果需要年度值直接赋值给全年每一天（即每天值等于年度值），只需把daily_value = value;即可。

方案2：PROC SQL生成日历表关联年度数据 #

先生成包含目标年份所有日期的日历表，再通过年度关联匹配年度值：

/* 生成日历表，这里以2010-2020年为例，可自行调整年份范围 */
proc sql;
    create table calendar as
    select 
        intnx('day', mdy(1,1,2010), i-1) as date format=date9.,
        year(calculated date) as year
    from 
        sashelp.class
    having 
        calculated year <= 2020
    ;
quit;

/* 关联年度数据集，赋值日度值 */
proc sql;
    create table daily_data as
    select 
        c.date,
        a.value as daily_value /* 或按需求分摊，如a.value/365/366 */
    from 
        calendar c
    left join 
        annual_data a
    on 
        c.year = a.year
    ;
quit;

方案3：利用SAS宏批量生成日期序列 #

如果需要处理多个年份，用宏循环简化操作：

%macro annual_to_daily(start_year=2010, end_year=2020);
    data daily_data;
        length date 8 daily_value 8;
        format date date9.;
        do year = &start_year. to &end_year.;
            set annual_data(where=(year=&start_year. to &end_year.)) point=i;
            start_date = mdy(1,1,year);
            end_date = intnx('year', start_date, 0, 'end');
            do date = start_date to end_date;
                daily_value = value / (end_date - start_date + 1);
                output;
            end;
            i + 1;
            if i > nobs then leave;
        end;
        stop;
        set annual_data nobs=nobs;
    run;
%mend;

/* 调用宏 */
%annual_to_daily(start_year=2010, end_year=2020);

以上方案均无需依赖SAS ETS模块，可根据实际的分摊规则（平均、固定值、自定义权重等）调整代码逻辑。

内容的提问来源于stack exchange，提问作者VBA_Anne_Marie