added to enclosing environment example in unit4-usingR.R