## Not run: 
# 
# options(error = recover) # setting the error option
# 
# ### Example of interaction
# 
# > myFit <- lm(y ~ x, data = xy, weights = w)
# Error in lm.wfit(x, y, w, offset = offset, ...) :
#         missing or negative weights not allowed
# 
# Enter a frame number, or 0 to exit
# 1:lm(y ~ x, data = xy, weights = w)
# 2:lm.wfit(x, y, w, offset = offset, ...)
# Selection: 2
# Called from: eval(expr, envir, enclos)
# Browse[1]> objects() # all the objects in this frame
# [1] "method" "n"      "ny"     "offset" "tol"    "w"
# [7] "x"      "y"
# Browse[1]> w
# [1] -0.5013844  1.3112515  0.2939348 -0.8983705 -0.1538642
# [6] -0.9772989  0.7888790 -0.1919154 -0.3026882
# Browse[1]> dump.frames() # save for offline debugging
# Browse[1]> c # exit the browser
# 
# Enter a frame number, or 0 to exit
# 1:lm(y ~ x, data = xy, weights = w)
# 2:lm.wfit(x, y, w, offset = offset, ...)
# Selection: 0 # exit recover
# >
# 
# ## End(Not run)
Run the code above in your browser using DataLab