Zatrzymaj się lapply od drukowania na konsolę

Question

Kiedy używam lapply i drukuję do konsoli, to drukuje niechciane [[i]]NULL, chociaż chcę, aby zamierzony komunikat został wydrukowany na konsoli. Próbowałem już suppressWarnings i suppressMessages, ale te nie usuwają niechcianego sprawcy. Szukałem lapply i nie widzę argumentu, aby to uciszyć. Jest to bardziej estetyczne, ponieważ nie koliduje z funkcją. Nie jestem przeciwny drukownemu drukowaniu na konsolę, o ile użytkownik może ją wyłączyć, jeśli chce.

Oto funkcja przykład, wyjście i co chciałabym dostać: funkcja

Próbka:

FUN <- function(x) { 
    FUN2 <- function(z) message(z) 
    lapply(1:3, function(i) FUN2(paste(x, i))) 
} 

FUN("hello") 

wyjściowa:

hello 1 
hello 2 
hello 3 
[[1]] 
NULL 

[[2]] 
NULL 

[[3]] 
NULL 

pożądany wynik :

hello 1 
hello 2 
hello 3 

Answer 1

Zastosowanie invisible, np:

invisible(FUN("hello")) 
hello 1 
hello 2 
hello 3 

Można owinąć go wokół rozmowy w funkcji lapply też zrobić to porządniej.

Answer 2

Zastosowanie l_ply z plyr:

library(plyr) 
FUN <- function(x) { 
    FUN2 <- function(z) message(z) 
    l_ply(1:3, function(i) FUN2(paste(x, i))) 
} 
FUN("hello") 

Answer 3

odkryłem, że istnieje odpowiedź (z invisible(capture.output()) była lepsza odpowiedź na moje problemy wyjść drukowania na konsoli Suppress output of stationarity test that is printed to screen Również w kontekście testthat się expect_output. jest bardzo przydatny: