library(quantmod)
getSymbols("IBM",src='yahoo')
x<-dailyReturn(IBM)