Question 6

library("quantmod")
## Loading required package: xts
## Loading required package: zoo
## Warning: package 'zoo' was built under R version 4.5.2
## 
## Attaching package: 'zoo'
## The following objects are masked from 'package:base':
## 
##     as.Date, as.Date.numeric
## Loading required package: TTR
## Registered S3 method overwritten by 'quantmod':
##   method            from
##   as.zoo.data.frame zoo
getSymbols("MSFT", src="yahoo", from = "2025-10-01", to = "2026-02-01")
## [1] "MSFT"

Question 7

nrow(MSFT)
## [1] 84

Question 8

index(MSFT)[which.max(MSFT$MSFT.Open)]
## [1] "2025-10-28"