Obsidian | Level 7

## Calculate rolling RSI

Hello All

I'm trying to calculate rolling RSI (which is a financial indicate), I found this code, it should help me do the calculation. However, I'm very understand what is this piece of code doing. Would you please explain the code line by line, so that I can do the necessary changes to solve my case.

%macro calRSI();

%do i=16 %to 7570;

data RSI;

set RSI;

lAveGain = lag1(AveGain);

lAveLoss = lag1(AveLoss);

if days = &i then do;

AveGain = (lAveGain*13+gain)/14;

AveLoss = (lAveLoss*13+loss)/14;

RS = AveGain / AveLoss;

RSI = 100-100/(1+RS); end;

%end; %mend;

%calRSI;

data summer.RSIresult;

set RSI;

run;

1 ACCEPTED SOLUTION

Accepted Solutions
Opal | Level 21

## Re: Calculate rolling RSI

This code is overwriting the same dataset 7555 times, each time calculating the RSI for only one value of days. It looks like a very very inefficient way to do this type of calculation. I would advise you NOT to do this.

Tell us instead about your available data and the calculation you want to perform, especially the details of the smoothed moving averages.

PG
3 REPLIES 3
Opal | Level 21

## Re: Calculate rolling RSI

This code is overwriting the same dataset 7555 times, each time calculating the RSI for only one value of days. It looks like a very very inefficient way to do this type of calculation. I would advise you NOT to do this.

Tell us instead about your available data and the calculation you want to perform, especially the details of the smoothed moving averages.

PG
Obsidian | Level 7

## Re: Calculate rolling RSI

Thank you for helping, I have used "proc expand" code solved the problem. Still thank you.

Opal | Level 21

## Re: Calculate rolling RSI

Very wise choice. Congratulations!

PG
Discussion stats
• 3 replies
• 1027 views
• 1 like
• 2 in conversation