Entendi. Só acho estranho os dados serem diferentes de dados que já foram registrados bem antes. Por exemplo, se você pega os dados às 13 horas, para mim os dados das 10 deveriam ser iguais para todas as funçøes já que elas estão pegando diretamente do que o yahoo fornece.Apesar de que cada uma pode pegar para timestamp diferentes, para mim ainda soa um pouco inseguro, bobagem minha. Mas muito obrigada! Em 25 de março de 2015 10:02, Éder Comunello <comunello.eder@gmail.com> escreveu:
Bom dia,
Os valores variam ainda que utilizada a mesma função. A razão para isso deve estar na programação da API do Yahoo. O fato é que os valores não são "errados" pois se relacionam à "timestamps" ligeiramente diferentes. Um mesmo "timestamp" terá o mesmo valor (veja na saída abaixo).
O "timestamp" nesse caso é a data convertida em segundos, tomando por origem "1970-01-01".
### <code r> url0 <- " http://chartapi.finance.yahoo.com/instrument/1.0/AAPL/chartdata;type=quote;r... "
page1 <- readLines(url0); t1 <- Sys.time() t1; head(read.csv(text=page1, skip = 17, header = FALSE), 3) # [1] "2015-03-25 08:45:49 AMT" # V1 V2 V3 V4 V5 V6 # 1 1427203800 127.15 127.26 127.000 127.23 654800 # 2 1427203879 126.92 127.19 126.875 127.15 179100 # 3 1427203979 126.90 127.06 126.870 126.91 198000
page2 <- readLines(url0); t2 <- Sys.time() t2; head(read.csv(text=page2, skip = 17, header = FALSE), 3) # [1] "2015-03-25 08:46:11 AMT" # V1 V2 V3 V4 V5 V6 # 1 1427203859 127.19 127.26 127.0796 127.20 622100 # 2 1427203918 126.92 127.19 126.8750 127.18 205200 # 3 1427203979 126.90 127.06 126.8700 126.91 204600
### Transformando timestamp em datas as.POSIXct(c(1427203800, 1427203859), origin="1970-01-01") as.POSIXct(c(1427203879, 1427203918), origin="1970-01-01") ### </code>
Éder Comunello <c <comunello.eder@gmail.com>omunello.eder@gmail.com> Dourados, MS - [22 16.5'S, 54 49'W]
Em 24 de março de 2015 13:40, Michelle Bau Graczyk <mbgraczyk@gmail.com> escreveu:
Boa tarde,
Eu estava verificando os diferentes modos de coletar dados intraday do yahoo e percebi que para cada função que eu uso, os dados obtidos são diferentes.
Por exemplo, se eu uso:
dados <- readLines(' http://chartapi.finance.yahoo.com/instrument/1.0/AAPL/chartdata;type=quote;range=1d/csv',sep = ",", dec = ".")
eu obtenho: "18" "1427203800,127.1800,127.2600,127.0000,127.2300,631900" "19" "1427203868,126.9200,127.1900,126.8750,127.1700,202000" "20" "1427203920,126.9600,127.0600,126.8700,126.9100,189500" "21" "1427203981,126.9500,126.9900,126.8800,126.8900,198200" "22" "1427204099,126.7799,126.9900,126.7700,126.9500,217500" "23" "1427204100,126.6700,126.9000,126.6401,126.7799,286300" "24" "1427204219,126.7100,126.8000,126.6500,126.6800,222800" "25" "1427204221,126.8300,126.8700,126.5600,126.7000,238500" "26" "1427204280,126.7100,126.9200,126.6700,126.8200,167500" "27" "1427204340,126.8300,126.9300,126.7000,126.7166,114900" "28" "1427204457,126.6400,126.8300,126.6000,126.8100,156100" "29" "1427204460,126.6500,126.7900,126.6385,126.6900,102800"
se eu uso: dados <- getURL(' http://chartapi.finance.yahoo.com/instrument/1.0/AAPL/chartdata;type=quote;range=1d/csv',sep = ",", dec = ".") obtenho:
1427203805,127.1900,127.2600,127.0796,127.2000,626100 1427203862,126.9200,127.1900,126.8750,127.1800,207800 1427203979,126.9000,127.0600,126.8700,126.9100,198000 1427203980,126.9500,126.9900,126.8800,126.9000,172200 1427204099,126.7799,126.9900,126.7700,126.9500,235000 1427204100,126.6700,126.9000,126.6401,126.7799,286300 1427204219,126.7100,126.8000,126.6500,126.6800,222800 1427204221,126.8300,126.8700,126.5600,126.7000,238500 1427204280,126.7100,126.9200,126.6700,126.8200,167500 1427204340,126.8300,126.9300,126.7000,126.7166,114900 1427204459,126.6915,126.8300,126.6100,126.8100,160900 1427204460,126.6500,126.7900,126.6385,126.6900,98000
Usando read.csv também dá dados diferentes de começo.
Alguem saberia me dizer o por que? E em qual devo confiar? Porque nenhuma é igualzinha ao que aparece quando você coloca esse endereço http://chartapi.finance.yahoo.com/instrument/1.0/AAPL/chartdata;type=quote;r... no navegador. O resultado deste é:
1427203800,127.1200,127.2300,127.0000,127.2300,631900 1427203900,127.0300,127.1900,127.0000,127.1700,87400 1427203978,126.9200,127.0400,126.8700,126.9050,309600 1427204038,126.9600,126.9900,126.8800,126.9399,174900 1427204099,126.7799,126.9900,126.7700,126.9600,235300 1427204100,126.6700,126.9000,126.6401,126.7799,286300 1427204219,126.7100,126.8000,126.6500,126.6800,222800 1427204221,126.8300,126.8700,126.5600,126.7000,238500 1427204280,126.7100,126.9200,126.6700,126.8200,167500 1427204340,126.8300,126.9300,126.7000,126.7166,114900 1427204459,126.6915,126.8300,126.6000,126.8100,160900 1427204460,126.6500,126.7900,126.6385,126.6900,98000 1427204520,126.7100,126.7200,126.6000,126.6500,108700 1427204581,126.7100,126.8400,126.6800,126.7100,129600 1427204641,126.7400,126.7700,126.6600,126.7300,98700
Obrigada,
Michelle
_______________________________________________ R-br mailing list R-br@listas.c3sl.ufpr.br https://listas.inf.ufpr.br/cgi-bin/mailman/listinfo/r-br Leia o guia de postagem (http://www.leg.ufpr.br/r-br-guia) e forneça código mínimo reproduzível.
_______________________________________________ R-br mailing list R-br@listas.c3sl.ufpr.br https://listas.inf.ufpr.br/cgi-bin/mailman/listinfo/r-br Leia o guia de postagem (http://www.leg.ufpr.br/r-br-guia) e forneça código mínimo reproduzível.