How to analyze stock price UBER

 How to analyze stock price UBER-R 

[1] "UBER"
> UBER<-uber_stock$UBER
> head(UBER)
           UBER.Open UBER.High UBER.Low
2019-05-10     42.00     45.00    41.06
2019-05-13     38.79     39.24    36.08
2019-05-14     38.31     39.96    36.85
2019-05-15     39.37     41.88    38.95
2019-05-16     41.48     44.06    41.25
2019-05-17     41.98     43.29    41.27
           UBER.Close UBER.Volume
2019-05-10      41.57   186322500
2019-05-13      37.10    79442400
2019-05-14      39.96    46661100
2019-05-15      41.29    36086100
2019-05-16      43.00    38115500
2019-05-17      41.91    20225700
           UBER.Adjusted
2019-05-10         41.57
2019-05-13         37.10
2019-05-14         39.96
2019-05-15         41.29
2019-05-16         43.00
2019-05-17         41.91
> chartSeries(UBER,multi.col=TRUE,theme="white")
> addMACD()
> addBBands()

> UBER_return <-
+     log(UBER$UBER.Close/UBER$UBER.Open)
> qqnorm(UBER_return, main = "Normal Q-Q Plot of UBER daily log return",
+        xlab = "Theoretical Quantiles",
+        ylab = "Sample Quantiles", plot.it = TRUE, datax = FALSE
+ )
> qqline(UBER_return, col="red")