Wie verbergen oder in-Funktion gedruckte Nachricht in R deaktivieren

Question

nehme ich eine Funktion haben, wie:

ff<-function(x) { 
    cat(x,"\n") 
    x^2} 

und führen Sie es durch:

y<-ff(5) 
#5 
#y 
#[1] 25 

Meine Frage ist, wie zu deaktivieren oder verstecken die 5 von cat(x,"\n") gedruckt wie:

y<-ff(5) 
#y 
#[1] 25 

Answer 1

Sieverwenden können 0 mit invisible

> invisible(capture.output(y <- ff(2))) 
> y 
[1] 4 

oder sink

> sink("file") 
> y <- ff(2) 
> sink() 
> y 
[1] 4