G'day Rainer,
On Fri, 25 Jan 2008 10:34:32 +0200
Rainer M Krug <[EMAIL PROTECTED]> wrote:
[...]
> > p <- data.frame(runif(10), runif(10), runif(10))
> > lapply( p, function(ps) {x11(); plot(ps)} )
>
> which results in three graphs and a printout:
[...]
> How can I avoid this printout without using
>
> tmp <- lapply( p, function(ps) {x11(); plot(ps)} )?
?invisible
like in invisible(lapply( p, function(ps) {x11(); plot(ps)} ))
Note, your solution seems to involve less keystroke but has the
disadvantage of creating an object in your workspace.
Of course, you could always do something like:
> ilapply <- function(...) invisible(lapply(...))
## perhaps better:
## ilapply <- function(X, FUN, ...) invisible(lapply(X, FUN, ...))
> ilapply(p, function(ps) {x11(); plot(ps)})
To save keystrokes in the long run. :)
HTH.
Cheers,
Berwin
=========================== Full address =============================
Berwin A Turlach Tel.: +65 6515 4416 (secr)
Dept of Statistics and Applied Probability +65 6515 6650 (self)
Faculty of Science FAX : +65 6872 3919
National University of Singapore
6 Science Drive 2, Blk S16, Level 7 e-mail: [EMAIL PROTECTED]
Singapore 117546 http://www.stat.nus.edu.sg/~statba
______________________________________________
R-help@r-project.org mailing list
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.
