Assignment 2: Stock Data Extraction

#QuantMod Library

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

## Warning: package 'quantmod' was built under R version 4.5.2

## Loading required package: xts

## Warning: package 'xts' was built under R version 4.5.2

## 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

## Warning: package 'TTR' was built under R version 4.5.2

## Registered S3 method overwritten by 'quantmod':
##   method            from
##   as.zoo.data.frame zoo

#Q6: Microsoft Stock Price (QuantMod)

#install.packages("quantmod")

getSymbols("MSFT", src="yahoo",from = "2025-10-01", to = "2026-01-31")

## [1] "MSFT"

#Q7: Duration of stock price Days

nrow(MSFT)

## [1] 84

#Q8: Highest Open price

MSFT_open <- Op(MSFT)#Op extracts opening price
head(MSFT_open)

##            MSFT.Open
## 2025-10-01    514.80
## 2025-10-02    517.64
## 2025-10-03    517.10
## 2025-10-06    518.61
## 2025-10-07    528.29
## 2025-10-08    523.28