
Olá pessoal! Como faço para imprimir as linhas iniciadas por # através da função sink()? Quando tento como no código abaixo obtenho apenas os números, mas gostaria de obter todo o código (inclusive as linhas comentadas). sink("exemplo.txt") # exemplo x <- c(2,3,2,4,2,3) # media de x mean(x) # desvio-padrao de x sd(x) sink() Ao executar o código acima obtenho isso: [1] 2,6667 [1] 0,8165 Mas gostaria de obter isso (conseguido aqui através de copiar e colar):
# exemplo x <- c(2,3,2,4,2,3)
# media de x mean(x) [1] 2,6667
# desvio-padrao de x sd(x) [1] 0,8165
Já procurei no google e no help do R, mas não encontrei a solução. Isso é possível com a função sink()? Ou existe outra função? Tentei também txtStart() e txtStop(), mas não funcionou como gostaria. Agradeço a ajuda! -- Mauricio Cardeal UFBA