Não estou conseguindo transformar a cotação diária do câmbio para ts.

    dados <- read.table("C:/Econometria/Cambio/cambio.txt", header=T, dec=",")
    ts(dados), start=c(1994,01,01), freq=1) # Quando faço isso ele muda os dados, acaba aparecendo valores que não estão no arquivo

Também usei `xts(dados, as.Date(dados, format='%m/%d/%Y')`

Alguém poderia me ajudar?