Как я могу перенаправить стандартную ошибку на стандартный вывод в R - Sniny [закрыто]

Этот код работы. trueFalse и errorMessage получены сервером путем вызывания функции, которая производит тот код и отображенный при помощи renderText () в сервере и textOutput () в GUI

trueFalse = FALSE
       # capture all the output to a file.
        FILE <- file("log.txt", open = "wt")
        sink(FILE)
        sink(FILE, type = "message")
        #try(log("a"))
        try(message("Path does not exist. You can make changes to the PARAMS file.  Afterwards, stop and restart glycoPipe"))
        ## revert output back to the console -- only then access the file!
        sink(type = "message")
        sink()
        #file.show("log.txt")
        errorMessage <- (readLines("log.txt"))