콘솔에서 인쇄하지 않음.

Question

lapply을 사용하고 콘솔에 인쇄 할 때 의도 한 메시지를 콘솔에 인쇄하고 싶지만 원치 않는 [[i]]NULL을 인쇄합니다. 나는 suppressWarnings과 suppressMessages을 시도했지만 이것들은 원하지 않는 범죄자를 제거하지 않습니다. lapply을 검색했고 침묵을 주장하지 않습니다. 이것은 기능을 방해하지 않기 때문에 더 미학적입니다. 사용자가 원할 경우 해제 할 수있는 한 콘솔에 대한 외부 인쇄는 반대하지 않습니다. 여기

는 예를 들어 기능, 출력 그리고 나는 좀하고 싶습니다 무엇 :

샘플 기능 :

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

FUN("hello") 

출력 :

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

[[2]] 
NULL 

[[3]] 
NULL 

을 원하는 출력 :

,

hello 1 
hello 2 
hello 3 

Answer 1

사용 invisible, 예를 들면 :

이

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

당신은 함수의 lapply 전화 주위를 래핑 할 수도이 정돈 확인합니다. plyr에서

Answer 2

사용 l_ply는 :

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

Answer 3

나는 invisible(capture.output())와 거기에 대답은 (콘솔에 인쇄 출력의 제 문제, Suppress output of stationarity test that is printed to screen에 더 나은 해답 것을 발견했다 또한 expect_output을 testthat의 맥락에서.