Célia, vc não tem permissão p gravar no diretório corrente.
Veja qual é este diretório com getwd() e altere suas permissões.
On 4 Aug 2011 21:44, "Maria Papa" <
mceliamat@yahoo.com.br> wrote:
> Olá pessoal, boa tarde, novamente
>
> Eu estou com um problema para usar a função sink(). Há anos eu uso da mesma forma e nunca tive problema. Eu estou usando esta função da seguinte forma:
>
> # Resultados
> sink("Resultado_linha1.txt")
> cat("\nTabela: pontos medidos(X, Y e Z), Estimativas boot para as coordenadas X, Y e Z e seus respectivos intervalos de 95% de confiaça\n")
> show(dados_final)
> cat("\nDesvios observados entre as coordenadas medidas de X e as suas estimativas boot\n")
> show(desvio_peca_X)
> cat("\nDesvios observados entre as coordenadas medidas de Y e as suas estimativas boot\n")
> show(desvio_peca_Y)
> cat("\nDesvios observados entre as coordenadas medidas de Z e as suas estimativas boot\n")
> show(desvio_peca_Z)
> sink()
>
> e tenho a seguinte mensagem de erro:
>
>> sink("Resultado_linha1.txt")
> Erro em file(file, ifelse(append, "a", "w")) :
> não é possível abrir a conexão
> Além disso: Mensagens de aviso perdidas:
> In file(file, ifelse(append, "a", "w")) :
> não foi possível abrir o arquivo 'Resultado_linha1.txt': Permission denied
>
> Não estou conseguindo entender o motivo da permissão negada.
>
> Obrigada
> Célia