[Rd] Evaluation puzzle

[Peter Dalgaard]

On 11/11/2010 11:27 PM, Terry Therneau wrote:

>  I'm still puzzled by recover though.

It looks like a buglet. You get to the right frame (try ls()) but the
"called from" message is off by four frames.

E.g.

Selection: 1
Called from: model.frame(formula = "zed ~ 1+age+sex+year", data = mydata)
Browse[1]> ls()
[1] "mydata" "zed"
Browse[1]> tfun
function(mydata) {
     zed <- 100 + (1:nrow(mydata)) * 20
     survexp.test(zed ~ 1, data=mydata)
     }

-- 
Peter Dalgaard
Center for Statistics, Copenhagen Business School
Phone: (+45)38153501
Email: pd.mes at cbs.dk  Priv: PDalgd at gmail.com