आर: इलिप्सिस तर्कों के लिए एक सूची का उपयोग

Question

मैंने ऐसी परिस्थिति में भाग लिया है जहां मुझे आर समारोह में पारित सभी अतिरिक्त तर्क लेने और बाद में उपयोग के लिए किसी ऑब्जेक्ट में रोल करने की आवश्यकता है। मैंने सोचा कि कार्यों में previous question about ellipses मेरी मदद करेगा, लेकिन मैं अभी भी यह समझ नहीं सकता कि यह कैसे करें। यहाँ मैं क्या करना चाहते हैं क्या की एक बहुत ही सरल उदाहरण है:

newmean <- function(X, ...){ 
    args <- as.list(substitute(list(...)))[-1L] 
    return(mean(X, args)) 
} 

मैं ऊपर के उदाहरण में आर्ग के विभिन्न योगों के एक नंबर की कोशिश की और वापसी कॉल में आर्ग unlisting कोशिश की है। लेकिन मैं यह काम नहीं कर सकता। कोई सुझाव?

मुझे पता है मैं ऐसा कर सकता है कि:

newmean <- function(X, ...){ 
    return(mean(X, ...)) 
} 

लेकिन मैं एक वस्तु जो मैं क्रमानुसार और एक अन्य मशीन में वापस पढ़ सकते में ... तर्क की आवश्यकता है।

Answer 1

कैसे

newmean <- function(X, ...){ 
    args <- as.list(substitute(list(...)))[-1L] 
    z<-list(X) 
    z<-c(z,args) 
    do.call(mean,z) 
}