is_from_namespace(baseenv()) # TRUE
is_from_namespace(utils::read.csv) # TRUE
x <- function(){}
is_from_namespace(NULL) # FALSE
is_from_namespace(x) # FALSE
is_from_namespace(emptyenv()) # FALSE
# Let environment of `x` be base environment
# (exception case)
environment(x) <- baseenv()
is_from_namespace(x) # TRUE
Run the code above in your browser using DataLab