예스스탁
예스스탁 답변
2020-11-17 16:07:16
안녕하세요
예스스탁입니다.
1 일봉
input : Period(20);
var : cnt(0),sum1(0),sum2(0),sum3(0),sum4(0),lrlv(0),preLRLv(0);
sum1 = 0;
Sum2 = 0;
sum3 = 0;
sum4 = 0;
for cnt = 0 to Period-1
{
sum1 = sum1+(Period-cnt);
Sum2 = sum2+dayclose(cnt);
sum3 = sum3+dayclose(cnt)*(Period-cnt);
sum4 = sum4+(Period-cnt)^2;
}
value1 = sum1/Period;
value2 = sum2/Period;
value3 = sum3/Period;
value4 = sum4/Period;
LRLv = (value3 - value1 * value2) / (value4 - (value1^2)) * (Period - value1) + value2;
plot1(LRLv);
2 주봉
input : P(14);
var : cnt(0);
var : sum1(0),sum2(0),sum3(0),sum4(0),mav1(0),mav2(0),mav3(0),mav4(0),LRLv(0);
Array : C1[100](0),AccumValue[100](0);
if DayOfWeek(Bdate) < DayOfWeek(Bdate[1]) Then
{
AccumValue[0] = AccumValue[0]+1;
for cnt = 1 to 99
{
C1[cnt] = C1[cnt-1][1];
AccumValue[cnt] = AccumValue[cnt-1][1];
}
}
C1[0] = C;
if C1[P] > 0 Then
{
sum1 = 0;
sum2 = 0;
sum3 = 0;
sum4 = 0;
for cnt = 0 to P-1
{
sum1 = sum1 + AccumValue[cnt];
sum2 = sum2 + C1[cnt];
sum3 = sum3 + C1[cnt]*AccumValue[cnt];
sum4 = sum4 + AccumValue[cnt]^2;
}
mav1 = sum1/P;
mav2 = sum2/P;
mav3 = sum3/P;
mav4 = sum4/P;
LRLv = (mav3 - mav1 * mav2) /(mav4 - (mav1^2)) * (AccumValue[0] - mav1) + mav2;
plot1(LRLv);
}
3 타분봉
input : ntime1(120),P(14);
var : S1(0),D1(0),TM(0),TF(0),cnt(0);
var : sum1(0),sum2(0),sum3(0),sum4(0),mav1(0),mav2(0),mav3(0),mav4(0),LRLv(0);
Array : C1[100](0),AccumValue[100](0);
if Bdate != Bdate[1] Then
{
S1 = TimeToMinutes(stime);
D1 = sdate;
}
if D1 > 0 then{
if sdate == D1 Then
TM = TimeToMinutes(stime)-S1;
Else
TM = TimeToMinutes(stime)+1440-S1;
TF = TM%ntime1;
if Bdate != Bdate[1] or (Bdate == Bdate[1] and TF < TF[1]) Then
{
AccumValue[0] = AccumValue[0]+1;
for cnt = 1 to 99
{
C1[cnt] = C1[cnt-1][1];
AccumValue[cnt] = AccumValue[cnt-1][1];
}
}
C1[0] = C;
if C1[P] > 0 Then
{
sum1 = 0;
sum2 = 0;
sum3 = 0;
sum4 = 0;
for cnt = 0 to P-1
{
sum1 = sum1 + AccumValue[cnt];
sum2 = sum2 + C1[cnt];
sum3 = sum3 + C1[cnt]*AccumValue[cnt];
sum4 = sum4 + AccumValue[cnt]^2;
}
mav1 = sum1/P;
mav2 = sum2/P;
mav3 = sum3/P;
mav4 = sum4/P;
LRLv = (mav3 - mav1 * mav2) /(mav4 - (mav1^2)) * (AccumValue[0] - mav1) + mav2;
plot1(LRLv);
}
}
즐거운 하루되세요
> 롬롬7 님이 쓴 글입니다.
> 제목 : 분봉에서..
> 안녕하세요? 항상 어려운 질문드려도 답변 주셔서 감사합니다.
분봉에서 일봉, 주봉의 Linear Regression Line 계산해보고 싶은데,
방법 가이드 부탁드립니다!!
감사합니다.