.GlobalEnv changed to parent.frame(1) in extractData function.  close #43