Program commands in the Rats: 

Cal 1968 1 1
All 5 1982:1
Open data c:\0616\0616.wk1
data(format=wks,org=obs) / year y x
Linreg y /
# constant x
Linreg y /
# x

***other possible solution***
Set w = 1 / x
Linreg y /
# constant w
End

And then click here for the results

back to mainpage