Easy feed by R

Dear-

Here is easiest data feed method, with no login and free of charge, that I found so far.

My R screen shows as below (Monday roughly 10 AM).

However, it is 15-min delayed data for each minutes ( I assume data is free after 15-min).

Please tell me if there is/are other easy alternatives.

PS) I will pay every month, if someone or some company provide (simple) R code for 1-min delayed data feed, instead of the 15-min delayed data.

PS) Of course, for the daily OHLC for the last 1000 day,
NY <- new.env()
tickerNY <-c("ABT" , "ABBV" , "ACE" , "ZION" , "ZTS")
getSymbols(tickerNY, src="yahoo" , env=NY , from="2014-01-01")


*****************************************************
install.packages("quantmod")
library(quantmod)


> print(getQuote('MSFT'))
Trade Time Last Change % Change Open High Low Volume
MSFT 2016-01-25 09:56:00 52.08 -0.21 -0.40% 51.55 52.1 51.79 3810489
> print(getQuote('MSFT'))
Trade Time Last Change % Change Open High Low Volume
MSFT 2016-01-25 09:57:00 52.05 -0.24 -0.46% 51.55 52.1 51.79 3991561
> print(getQuote('MSFT'))
Trade Time Last Change % Change Open High Low Volume
MSFT 2016-01-25 09:58:00 52.08 -0.21 -0.40% 51.55 52.1 51.79 4031183
 
Last edited:
use google finance data
require(qmao)
currentQuote <- getQuote("AAPL", src="google") #the qmao method

there is no 15min delay as in yahoo. And you can still use yahoo for the daily OHLC. I trust yahoo data more than goolge.
 
use google finance data
require(qmao)
currentQuote <- getQuote("AAPL", src="google") #the qmao method

there is no 15min delay as in yahoo. And you can still use yahoo for the daily OHLC. I trust yahoo data more than goolge.

Why do do trust yahoo more than google?
I heard that yahoo provides corrected data(like dividend), while google does not yet.
 
use google finance data
require(qmao)
currentQuote <- getQuote("AAPL", src="google") #the qmao method

there is no 15min delay as in yahoo. And you can still use yahoo for the daily OHLC. I trust yahoo data more than goolge.

My screen shows that

> currentQuote <- getQuote("AAPL", src="google")
Error in do.call(paste("getQuote", src, sep = "."), args) :
could not find function "getQuote.google"


Could you help me to find out why?
 
Mine is Ok as I have just tested the code. I think your problem might be from the qmao package. You need to install that package at first. I think it is not from install.packages() method but you can directly google "install qmao package R" to see how it is installed. Good luck.
 
Mine is Ok as I have just tested the code. I think your problem might be from the qmao package. You need to install that package at first. I think it is not from install.packages() method but you can directly google "install qmao package R" to see how it is installed. Good luck.

I have used

install.packages("qmao", repos="http://R-Forge.R-project.org")
library(qmao)
print(getQuote("AAPL", src="google"))

but similar error! Does it work fine?
 
Back
Top