सामान्य कार्यों में दायरा R

Question

यदि आप एक सामान्य फ़ंक्शन के अंदर एक चर परिभाषित करते हैं, तो यह विधि के लिए उपलब्ध है। उदाहरण के लिए:

g <- function(x) { 
    y <- 2 
    UseMethod("g") 
} 
g.default <- function() y 
g() 
[1] 2 

लेकिन यदि आपके द्वारा परिभाषित चर वैरिएबल पैरामीटर के समान नाम है, तो ऐसा नहीं होता है। ऐसा लगता है कि आर विधि को कॉल करने से पहले उस चर को हटा देता है:

g <- function(x) { 
    x <- 2 
    UseMethod("g") 
} 
g.default <- function() x 
g() 
Error in g.default() : object 'x' not found 

क्या कोई यह बता सकता है कि यहां क्या हो रहा है?

Answer 1

C source file that defines do_usemethod से निम्नलिखित टिप्पणियां कम से कम संकेत दे रही हैं कि क्या हो रहा है। विशेष रूप से दूसरी गणना आइटम की दूसरी वाक्य देखें।

असल में, ऐसा लगता है (उस दूसरे बिंदु में नियम के गूंगा आवेदन के कारण), x का मान कॉपी नहीं होता है क्योंकि सी कोड यह देखने के लिए जांच करता है कि यह औपचारिक रूप से है या नहीं, यह देखता है कि यह है, और इसलिए विधि के मूल्यांकन वातावरण में डाले गए चर की सूची से बाहर रखा गया है।

/* usemethod - calling functions need to evaluate the object 
* (== 2nd argument). They also need to ensure that the 
* argument list is set up in the correct manner. 
* 
* 1. find the context for the calling function (i.e. the generic) 
* this gives us the unevaluated arguments for the original call 
* 
* 2. create an environment for evaluating the method and insert 
* a handful of variables (.Generic, .Class and .Method) into 
* that environment. Also copy any variables in the env of the 
* generic that are not formal (or actual) arguments. 
* 
* 3. fix up the argument list; it should be the arguments to the 
* generic matched to the formals of the method to be invoked */