커뮤니티

4824 다시 질문입니다

프로필 이미지
요한
2006-10-26 20:24:53
1444
글번호 11140
답변완료
webmaster@yesstock.com로 다시 메일 보냈습니다 johnsogum@empal.com으로 답변부탁드립니다
지표
답변 3
프로필 이미지

수식지왕

2006-10-27 14:20:35

반복질문이 올라와 있어 풀어보았습니다. 지표로 두가지로 표현했는데 하나는 어제종가까지의 일봉의 LRL 값이고 다른 하나는 장중 종가를 반영한 LRL입니다. Input:n(14); Var:j(0),X(0),sumXY(0),sumX(0),sumY(0),sumX²(0),DayLRS(0),DayB(0),DayLRL(0); #==========================================================================# # 선형회귀방정식 # #==========================================================================# # n∑xy - (∑x)(∑y) # # 기울기 a = --------------------- # # n∑x²- (∑x)² # # # # = (n*sum(xy) - sum(x) * sum(y)) / (n*sum(x^2)-sum(x)^2) # # # # (∑y)(∑x²)-(∑x)(∑xy) # # 절편 b = --------------------------- # # n∑x²- (∑x)² # # # # = (sum(y)*sum(x^2) - sum(x)*sum(xy)) / (n*sum(x^2) - sum(x)^2) # #==========================================================================# if Date[1] < Date then { X = X + 1; } sumXY = 0; sumX = 0; sumY = 0; sumX² = 0; For j = 0 To n-1 { sumXY = sumXY + (X-j)*DayClose(j); sumX = sumX + (X-j); sumY = sumY + DayClose(j); sumX²= sumX²+ (X-j)^2; } DayLRS = (n*sumXY - sumX*sumY)/(n*sumX²- sumX^2); //선형회귀선 기울기 LRS DayB = (sumY*sumX²-sumX*sumXY)/(n*sumX²- sumX^2); //선형회귀선 절편 B DayLRL = DayLRS * X + DayB; Plot1(DayLRL[dayindex()+1]); //전일종가기준의 LRL Plot2(DayLRL); //현재 종가 반영한 LRL > 요한 님이 쓴 글입니다. > 제목 : 다시 질문이요~ > 내장된 LRL 함수를 사용해서 일봉의 선형회귀선을 분봉에 표현하려고 하는데 잘 안되네요 즉 일봉에서 LRL(C,14)에서 나온 값이 분봉에서 같게 뜨게 할려면 어떻게해야하지요?
프로필 이미지

예스스탁 예스스탁 답변

2006-10-27 10:13:42

> 요한 님이 쓴 글입니다. > 제목 : 4824 다시 질문입니다 > webmaster@yesstock.com로 다시 메일 보냈습니다 johnsogum@empal.com으로 답변부탁드립니다
프로필 이미지

요한

2006-10-27 20:04:22

감사합니다 놀라운 실력에 감탄할뿐입니다^^ > 수식지왕 님이 쓴 글입니다. > 제목 : Re : 일봉참조 LRL > 반복질문이 올라와 있어 풀어보았습니다. 지표로 두가지로 표현했는데 하나는 어제종가까지의 일봉의 LRL 값이고 다른 하나는 장중 종가를 반영한 LRL입니다. Input:n(14); Var:j(0),X(0),sumXY(0),sumX(0),sumY(0),sumX²(0),DayLRS(0),DayB(0),DayLRL(0); #==========================================================================# # 선형회귀방정식 # #==========================================================================# # n∑xy - (∑x)(∑y) # # 기울기 a = --------------------- # # n∑x²- (∑x)² # # # # = (n*sum(xy) - sum(x) * sum(y)) / (n*sum(x^2)-sum(x)^2) # # # # (∑y)(∑x²)-(∑x)(∑xy) # # 절편 b = --------------------------- # # n∑x²- (∑x)² # # # # = (sum(y)*sum(x^2) - sum(x)*sum(xy)) / (n*sum(x^2) - sum(x)^2) # #==========================================================================# if Date[1] < Date then { X = X + 1; } sumXY = 0; sumX = 0; sumY = 0; sumX² = 0; For j = 0 To n-1 { sumXY = sumXY + (X-j)*DayClose(j); sumX = sumX + (X-j); sumY = sumY + DayClose(j); sumX²= sumX²+ (X-j)^2; } DayLRS = (n*sumXY - sumX*sumY)/(n*sumX²- sumX^2); //선형회귀선 기울기 LRS DayB = (sumY*sumX²-sumX*sumXY)/(n*sumX²- sumX^2); //선형회귀선 절편 B DayLRL = DayLRS * X + DayB; Plot1(DayLRL[dayindex()+1]); //전일종가기준의 LRL Plot2(DayLRL); //현재 종가 반영한 LRL > 요한 님이 쓴 글입니다. > 제목 : 다시 질문이요~ > 내장된 LRL 함수를 사용해서 일봉의 선형회귀선을 분봉에 표현하려고 하는데 잘 안되네요 즉 일봉에서 LRL(C,14)에서 나온 값이 분봉에서 같게 뜨게 할려면 어떻게해야하지요?