R function: emptyenv

emptyenv() returns the root of all environments.