lapply()와 사용자 입력

Question

lapply()을 사용하여 목록의 다음 요소를 단계별로 실행하기 전에 사용자가 "입력"할 때까지 기다리는 방법이 있습니까? 그렇다면 간단한 예제를 제공 할 수 있습니까?

es <- list(1, 2, 3) 
lapply(es, function(e) { 
    cat("Press enter:") 
    readLines(n = 1) 
    print(e) 
}) 

Answer 1

은 예입니다!