Use the given code below to answer the questions.
## Load package
library(tidyverse) # for cleaning, plotting, etc
library(tidyquant) # for financial analysis
## Import data
stocks <- tq_get("AAPL", get = "stock.prices", from = "2016-01-01")
stocks
## # A tibble: 1,028 x 7
## date open high low close volume adjusted
## <date> <dbl> <dbl> <dbl> <dbl> <dbl> <dbl>
## 1 2016-01-04 103. 105. 102 105. 67649400 98.4
## 2 2016-01-05 106. 106. 102. 103. 55791000 96.0
## 3 2016-01-06 101. 102. 99.9 101. 68457400 94.1
## 4 2016-01-07 98.7 100. 96.4 96.4 81094400 90.1
## 5 2016-01-08 98.6 99.1 96.8 97.0 70798000 90.6
## 6 2016-01-11 99.0 99.1 97.3 98.5 49739400 92.1
## 7 2016-01-12 101. 101. 98.8 100. 49154200 93.4
## 8 2016-01-13 100. 101. 97.3 97.4 62439600 91.0
## 9 2016-01-14 98.0 100. 95.7 99.5 63170100 93.0
## 10 2016-01-15 96.2 97.7 95.4 97.1 79833900 90.8
## # … with 1,018 more rows
## Visualize
stocks %>%
ggplot(aes(x = date, y = close)) +
geom_line()
Hint: Insert a new code chunk below and type in the code, using the tq_get() function above. Replace the ticker symbol for Walmart. You may find the ticker symbol for Microsoft from Yahoo Finance.
## Load package
library(tidyverse) # for cleaning, plotting, etc
library(tidyquant) # for financial analysis
## Import data
stocks <- tq_get("WMT", get = "stock.prices", from = "2016-01-01")
stocks
7 columns
Walmart stock prices will stay around the same price at all times. The price started at about 60 dollars and only once reached 65.
They are numeric. The others include logical and characters.
Hint: Insert a new code chunk below and type in the code, using the ggplot() function above. Revise the code so that it maps adjusted to the y-axis, instead of close.
## Visualize
stocks %>%
ggplot(aes(x = date, y = adjusted)) +
geom_line()
For more information on the ggplot() function, refer to Ch2 Introduction to ggplot2 in one of our e-textbooks, Data Visualization with R.
Since 2019 the Walmart stock has gone up quite a bit. In 2019 it started around 90 and now it is above 110.
Hint: Use message, echo and results in the chunk options. Refer to the RMarkdown Reference Guide.
Hint: Use eval in the chunk option. Refer to the RMarkdown Reference Guide.