एक फ़ंक्शन को स्थायी रूप से बदलना

Question

क्या कोई निम्नलिखित कोड समझा सकता है? मैं अपने खुद के संस्करण के साथ ग्राफिक्स पैकेज में लेआउट समारोह की जगह कर रहा हूँ, लेकिन यह फिर से दिखाई देने लगता है जादुई

env = environment(graphics:::layout) 
unlockBinding("layout" , env = env) 
assign("layout" , function(){} , envir = env) 
lockBinding("layout" , env = env) 

# this still shows the original layout function! how is that possible? 
layout 

# this shows function(){} as expected 
graphics:::layout 

Answer 1

समस्या यह है कि आप ग्राफिक्स नाम स्थान को layout के अपने नए संस्करण बताए रहे हैं, जो environment(graphics:::layout) द्वारा वापस किया जाता है। इसके बजाय संलग्न ग्राफिक्स पैकेज (यानी आपके खोज पथ पर "package:graphics" के रूप में दिखाई देने वाला वातावरण) में असाइनमेंट करना चाहते हैं।

अपने उदाहरण में, जब layout की तलाश में, आर नीचे search() द्वारा दिया संलग्न पैकेजों की सूची खोज करता है, और इससे पहले कि यह कभी आप namespace:graphics में निर्दिष्ट किया है और कार्य करने के लिए हो जाता है package:graphics में मूल layout पाता है,।

समाधान, सरल है पहली पंक्ति में env करने के लिए सौंपा पर्यावरण के केवल एक परिवर्तन की आवश्यकता होती है:

# Assign into <environment: package:graphics> 
# rather than <environment: namespace:graphics> 
env <- as.environment("package:graphics") 

unlockBinding("layout" , env = env) 
assign("layout" , function(){} , envir = env) 
lockBinding("layout" , env = env) 

# Now it works as expected 
layout 
# function(){} 

एक थोड़ा और अधिक विस्तार, कुछ करने के लिए उपयोगी हो सकता है कि:

search() # Shows the path along which symbols typed at the command 
      # will be searched for. The one named "package:graphics" 
      # is where 'layout' will be found. 

# None of these return the environment corresponding to "package graphics" 
environment(layout) 
environment(graphics::layout) 
environment(graphics:::layout) 

# This does 
as.environment("package:graphics")