Assignment 2- Olivia Thompson

Question One:

True

Question Two:

True

Question Three:

False

Question Four:

All selected

Question Five:

True

Question Six:

C: getSymbols(“MSFT”, src=“yahoo”,from = “2024-10-01”, to = “2025-02-01”)

Question Seven:

B. 84

Question Eight:

D.Dec9-Dec18

Question Nine:

D. 123, 8

Question Ten:

C. 1

Question Eleven:

False

Question Twelve:

True

Question Thirteen:

False

####Data:

install.packages("wbstats")
install.packages("quantmod")

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

getSymbols.yahoo("MSFT", .GlobalEnv, from = "2024-10-01", to = "2025-01-31", periodicity = "weekly")

getSymbols("MSFT", src="yahoo",from = "2024-10-01", to = "2025-02-01")

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

plot(MSFT$MSFT.High)

install.packages("pageviews")
library(pageviews)

##question 9

install.packages("pageviews")
library(pageviews)
start_date <- as.POSIXct("2024-10-01", format = "%Y-%m-%d")
end_date <- as.POSIXct("2025-01-31", format = "%Y-%m-%d")
Q9<-(article_pageviews(
  project = "en.wikipedia",
  article = "Microsoft",        
  start = start_date,
  end = end_date,  
  granularity = "daily"))

```