如何在打印R功能時抑制環境線？

Question

如何從包中打印函數時禁止環境/命名空間行？我試着將功能重新分配給全球環境。我嘗試進入foobar環境。我已經嘗試過噱頭和遊戲，即使與R來完成這項工作。似乎應該有一個簡單的方法來做到這一點。

> x2 
function(x) { 
    return(x * x) 
} 
<environment: namespace:foobar> 
> 

Answer 1

那麼，如果你想改變如何打印功能，創建自己的print.function。我想，這應該爲你工作

print.function <- function(x,...) { 
    environment(x)<-globalenv(); 
    base::print.function(x,...) 
} 

例如

x2<-function(x) { 
    return(x * x) 
} 
environment(x2)<-asNamespace("stats") 

base::print.function(x2) 
# function(x) { 
#  return(x * x) 
# } 
# <environment: namespace:stats> 

x2 
# function(x) { 
#  return(x * x) 
# }