อาจมีหลายวิธีในการทำเช่นนี้ แต่วิธีแรกที่อยู่ในใจขึ้นอยู่กับการถดถอยเชิงเส้น คุณสามารถถอยหลังส่วนที่เหลือตามลำดับต่อกันและทดสอบความชันที่สำคัญ หากมีความสัมพันธ์อัตโนมัติควรมีความสัมพันธ์เชิงเส้นระหว่างส่วนที่เหลือติดต่อกัน ในการเขียนโค้ดให้เสร็จคุณสามารถทำได้:
mod = lm(prices[,1] ~ prices[,2])
res = mod$res
n = length(res)
mod2 = lm(res[-n] ~ res[-1])
summary(mod2)
mod2 เป็นเส้นถดถอยของเวลาผิดพลาดε เสื้อกับเวลาที- 1ข้อผิดพลาดε T - 1 ถ้าสัมประสิทธิ์สำหรับ res [-1] มีความสำคัญคุณจะมีหลักฐานของความสัมพันธ์อัตโนมัติในส่วนที่เหลือtεtt−1εt−1
หมายเหตุ:นี้โดยปริยายสันนิษฐานว่าเหลือที่มีอัตในแง่ที่ว่าเพียงเป็นสิ่งสำคัญเมื่อทำนายε T ในความเป็นจริงอาจมีการพึ่งพาระยะยาว ในกรณีที่ว่าวิธีการนี้ผมได้อธิบายควรจะตีความว่าเป็นที่ล่าช้าประมาณหนึ่งอัตโครงสร้างอัตจริงในεεt−1εtε
acf()
) แต่สิ่งนี้จะยืนยันสิ่งที่มองเห็นได้ด้วยตาเปล่าความสัมพันธ์ระหว่างส่วนที่เหลือล้าหลังนั้นสูงมาก