Làm thế nào để bạn xác định không gian tên của một hàm?

Question

Cho một chức năng, làm cách nào để bạn xác định không gian tên mà nó đến từ đâu?

Ví dụ: nếu tôi nhập mean.default tại dấu nhắc lệnh, đầu ra bao gồm thực tế là nó nằm trong gói cơ sở. Tôi muốn có thể làm một cái gì đó như getNamespace(mean.default) và có nó trở lại "cơ sở" (hoặc môi trường cơ sở thực tế).

Có chức năng getNamespace nhưng dường như chỉ chấp nhận tên gói thay vì tên hàm.

print.function sử dụng mã nội bộ để truy xuất không gian tên. Tôi đã duyệt web theo số do_printfunction trong src/main/print.c nhưng sau đó đã từ bỏ.

Answer 1

Tôi gần đây đã tìm hiểu về find() mà dường như chỉ làm việc này.

R> find("ls") 
[1] "package:base" 
R> find("na.locf") 
[1] "package:zoo" 

Answer 2

findFunction là một tùy chọn và ?findFunction nói rằng bạn nên sử dụng nó thay vì find với mode="function". Kết quả của findFunction là danh sách (các) môi trường nơi các phiên bản có thể nhìn thấy của hàm được đặt.

Answer 3

Bạn muốn getNamespaceName + environment:

getNamespaceName(environment(mean.default)) 
# [1] "base" 

Answer 4

chức năng này tìm kiếm chức năng trong không gian tên nạp và môi trường toàn cầu:

getEnvName <- function(f) { 
    attached <- c(environmentName(.GlobalEnv), loadedNamespaces()) 
    envs <- c(.GlobalEnv, lapply(attached[-1], .getNamespace)) 
    attached[vapply(envs, function(env) exists(f, env, inherits = FALSE), logical(1))] 
} 
median <- function() {} 
getEnvName("median") 
#> [1] "R_GlobalEnv" "stats" 
getEnvName(".try_quietly") 
#> [1] "tools" 
getEnvName("getEnvName") 
#> [1] "R_GlobalEnv"