커뮤니티
ts 함수 좀 옮겨 주세요.
2012-02-19 03:06:56
439
글번호 47919
AverageArray, SummationArray는 옮겨지는데 정작 CovarArray 는 검증하면 그냥 종료되어 버리네요.
그럼 부탁드립니다.
------------------------------------------------------------------------------
- CovarArray
inputs:
IndepArray[MaxSize1]( numericarray ),
DepArray[MaxSize2]( numericarray ),
Size( numericsimple) ;
variables:
var0( 0 ),
var1( 0 ),
var2( 0 ) ;
condition1 = Size > 0 and Size <= MaxSize1 and Size <= MaxSize2 ;
if condition1 then
begin
var0 = AverageArray( IndepArray, Size ) ;
var1 = AverageArray( DepArray, Size ) ;
var2 = 0 ;
for Value1 = 1 to Size
begin
var2 = var2 + ( IndepArray[Value1] - var0 ) * ( DepArray[Value1] -
var1 ) ;
end ;
CovarArray = var2 / Size ;
end
else
RaiseRunTimeError( "Check Size input to CovarArray func-see CovarArray code" ) ;
----------------------------------------------------------------------
- AverageArray
inputs:
PriceValueArray[MaxSize]( numericarray ),
Size( numericsimple ) ;
AverageArray = SummationArray( PriceValueArray, Size ) / Size ;
- SummationArray
inputs:
PriceValueArray[MaxSize]( numericarray ),
Size( numericsimple ) ;
variables:
var0( 0 ) ;
var0 = 0 ;
for Value1 = 1 to Size
begin
var0 = var0 + PriceValueArray[Value1] ;
end ;
SummationArray = var0 ;
답변 1
예스스탁 예스스탁 답변
2012-02-20 13:36:48
안녕하세요
예스스탁입니다.
IndepArray[MaxSize1]( numericarray )
DepArray[MaxSize2]( numericarray )
input의 MaxSize1와 MaxSize2는 단지 입력값의 형태가 배열임을 나타내기 위새
지정하기 위한 내용으로 예스랭귀지에서 해당 내용으로 함수식안에서
조건문을 만드시면 에러가 발생합니다.
CovarArray함수는 아래와 같이 작성해 사용하셔야 합니다.
inputs:
IndepArray[MaxSize1]( numericarray ),
DepArray[MaxSize2]( numericarray ),
Size( numericsimple) ;
variables: var0(0),var1(0),var2( 0 ) ;
var0 = AverageArray( IndepArray, Size ) ;
var1 = AverageArray( DepArray, Size ) ;
var2 = 0 ;
for Value1 = 1 to Size begin
var2 = var2 + ( IndepArray[Value1] - var0 ) * ( DepArray[Value1] - var1 ) ;
end ;
CovarArray = var2 / Size ;
즐거운 하루되세요
> 몽파 님이 쓴 글입니다.
> 제목 : ts 함수 좀 옮겨 주세요.
> AverageArray, SummationArray는 옮겨지는데 정작 CovarArray 는 검증하면 그냥 종료되어 버리네요.
그럼 부탁드립니다.
------------------------------------------------------------------------------
- CovarArray
inputs:
IndepArray[MaxSize1]( numericarray ),
DepArray[MaxSize2]( numericarray ),
Size( numericsimple) ;
variables:
var0( 0 ),
var1( 0 ),
var2( 0 ) ;
condition1 = Size > 0 and Size <= MaxSize1 and Size <= MaxSize2 ;
if condition1 then
begin
var0 = AverageArray( IndepArray, Size ) ;
var1 = AverageArray( DepArray, Size ) ;
var2 = 0 ;
for Value1 = 1 to Size
begin
var2 = var2 + ( IndepArray[Value1] - var0 ) * ( DepArray[Value1] -
var1 ) ;
end ;
CovarArray = var2 / Size ;
end
else
RaiseRunTimeError( "Check Size input to CovarArray func-see CovarArray code" ) ;
----------------------------------------------------------------------
- AverageArray
inputs:
PriceValueArray[MaxSize]( numericarray ),
Size( numericsimple ) ;
AverageArray = SummationArray( PriceValueArray, Size ) / Size ;
- SummationArray
inputs:
PriceValueArray[MaxSize]( numericarray ),
Size( numericsimple ) ;
variables:
var0( 0 ) ;
var0 = 0 ;
for Value1 = 1 to Size
begin
var0 = var0 + PriceValueArray[Value1] ;
end ;
SummationArray = var0 ;
다음글
이전글