Displaying 2 results from an estimated 2 matches for "cy0".
Did you mean:
cr0
2002 Jan 15
1
acf conf intervals +speed
...Anyone have either alternative code
or a suggestion for how to replace the other loops
below?
Thanks
initc<-function(x,y){
n<-min(length(x),length(y))
# -- Demean -- @
xm<-x-mean(x)
ym<-y-mean(y)
# -- Cross Products -- @
a<-xm*ym
b<-xm*xm
c<-ym*ym
cx0<-mean(b)
cy0<-mean(c)
list(cx0=cx0,cy0=cy0)
}
corse<-function(x,y,cx0,cy0,mix=1){
# FROM code by stock and watson from HOM paper
#corse.prc
# 10/28/97, mww
# Compute Correlation between x and y
# Also compute se of estimated cor using
# HAC-Delta Method Calculation
n<-min(length(x),...
1998 Feb 04
0
An old ld-linux.so hole
...I\H87#"^TSBF]:4T\;-W.C@P$P4''V?0ZO;:Q8+3I^9
MU__!4D&QBNVWK#MM-_W=I+[]WQC%^>.CD#>Q<YF8FK"QXJI6`<YE/L9JY7K*
M''X+.$^B<0@2!1&1*\R_''^BA)@G1BV+X">_Y\?A[7]3,K5$U%''OKXC)EWH=[7
MV9@WT#JN%&E[Z#FC32HDUILJEE9?7]CZ]<5*=!''CY0`ZA*?7&Z6*ER^;].!U
MN''P?D/1JX8M2AH-&+,*9-#`X32IYYK(>DI-PYEZRH$9XN6S`[L@/,<?>>!SD
M0HS`FWRM*RZ4849!90-T3D<E0ZPC\24UJ*!5R9ULKHZ''_[>(=MGOAP\[QCWG
M/ZU6URGP/]$6XG][JU>=_SP*#<NO$C";A?X&IHA\;DD!CK5E.1U"95C])298
MNG6L'':ME[.;95*2O$`&qu...