अदृश्य() द्वारा वापस ऑब्जेक्ट कब अदृश्य हो जाता है?

Question

?invisible निक्षिप्त तात्पर्य

Return a (temporarily) invisible copy of an object.

कि जो अदृश्यता हमेशा के लिए नहीं होगा, लेकिन मैं कुछ भी बताते हैं कि जब यह गायब हो जाता है नहीं मिल सकता है कहते हैं। मैं विशेष रूप से (this old answer of mine से) इस तरह निर्माणों के बारे में सोच रहा हूँ:

printf <- function(...) invisible(print(sprintf(...))) 

जहां बाहरी invisibleहै शायद अनावश्यक (क्योंकि print पहले से ही अपने वापसी मान अदृश्य चिह्नित)। withVisible() रिपोर्ट करता है कि इस फ़ंक्शन का रिटर्न वैल्यू किसी भी तरह से अदृश्य है, लेकिन मुझे नहीं पता कि यह भाषा द्वारा गारंटीकृत है या वर्तमान कार्यान्वयन में काम करने के तरीके के समान ही है।

Answer 1

परीक्षण और त्रुटि द्वारा:

# invisible 
withVisible(invisible())$visible 
[1] FALSE 

### passing the invisible value through a function seems to 
# preserve the invisibility 
withVisible(identity(invisible()))$visible 
[1] FALSE 

# the <- operator just returns its arguments, so it confirms the above 
withVisible(i <- invisible())$visible 
[1] FALSE 
# but the assigned value is no longer invisible 
withVisible(i)$visible 
[1] TRUE 

### passing an invisible value as argument keeps the invisibility 
f <- function(x) withVisible(x)$visible 
f(1) 
[1] TRUE 
f(invisible(1)) 
[1] FALSE 

### every other operation seems to cancel the invisibility. 
# e.g. assigning an invisible value cancels the it 
i <- invisible() 
withVisible(i)$visible 
[1] TRUE 

withVisible(invisible(1) + 1)$visible 
[1] TRUE