lines.sitar rewrite and add parent.frame() to eval(mcall$data)