[R] using cat to log to file with sapply

[William Dunlap]

testit<-function(x,...){
  paste0('this is x: ',x)->y
  return(y)
  catf("++++++++++++++++++test=============",...)
  }

You return from the function before calling catf().  Remove the 'return(y)'
and make 'y' the last expression in the function.

Bill Dunlap
TIBCO Software
wdunlap tibco.com

On Wed, Feb 14, 2018 at 4:16 PM, <Alexander.Herr at csiro.au> wrote:

> Hi List,
> I am trying to write unsuccessfully to a logfile with cat. Here my example
> code:
>
> letters[1:5]->x
> logf<-"test.txt"
> cat('%%%%%%%%%%%%%%%%%%%%%%%%%%\n',file=logf)
> catf<-function(x,...,logfile='log.txt', append=TRUE){ cat(x,'\n',
> file=logfile, append=append)}
> testit<-function(x,...){
>   paste0('this is x: ',x)->y
>   return(y)
>   catf("++++++++++++++++++test=============",...)
>   }
> sapply(x, function(x) testit(x, logfile=logf))
>
> Any suggestions appreciated.
>
> Thanks
> Herry
> ______________________________________________
> R-help at r-project.org mailing list -- To UNSUBSCRIBE and more, see
> https://stat.ethz.ch/mailman/listinfo/r-help
> PLEASE do read the posting guide http://www.R-project.org/
> posting-guide.html
> and provide commented, minimal, self-contained, reproducible code.
>

	[[alternative HTML version deleted]]