# install.packages("wbstats")
library(wbstats)
# install.packages("quantmod")
library(quantmod)
## Loading required package: xts
## Loading required package: zoo
## 
## 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")
## [1] "MSFT"

Question 5

getSymbols("MSFT", src="yahoo",from = "2023-10-01", to = "2024-01-31")
## [1] "MSFT"
View(MSFT)

Question 7

plot(MSFT$MSFT.Open)

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

Question 10

microsoft_viewers <- article_pageviews(project = "en.wikipedia", article = "Microsoft",  start = "2023100100", end = "2024013100")

head(microsoft_viewers)
##     project language   article     access      agent granularity       date
## 1 wikipedia       en Microsoft all-access all-agents       daily 2023-10-01
## 2 wikipedia       en Microsoft all-access all-agents       daily 2023-10-02
## 3 wikipedia       en Microsoft all-access all-agents       daily 2023-10-03
## 4 wikipedia       en Microsoft all-access all-agents       daily 2023-10-04
## 5 wikipedia       en Microsoft all-access all-agents       daily 2023-10-05
## 6 wikipedia       en Microsoft all-access all-agents       daily 2023-10-06
##   views
## 1  8927
## 2  9271
## 3 14240
## 4  9662
## 5  9856
## 6  9312

Question 11

High_amt_Views <- subset(microsoft_viewers, views > 30000)
print(High_amt_Views)
##      project language   article     access      agent granularity       date
## 86 wikipedia       en Microsoft all-access all-agents       daily 2023-12-25
##    views
## 86 63147

R Markdown

This is an R Markdown document. Markdown is a simple formatting syntax for authoring HTML, PDF, and MS Word documents. For more details on using R Markdown see http://rmarkdown.rstudio.com.

When you click the Knit button a document will be generated that includes both content as well as the output of any embedded R code chunks within the document. You can embed an R code chunk like this:

summary(cars)
##      speed           dist       
##  Min.   : 4.0   Min.   :  2.00  
##  1st Qu.:12.0   1st Qu.: 26.00  
##  Median :15.0   Median : 36.00  
##  Mean   :15.4   Mean   : 42.98  
##  3rd Qu.:19.0   3rd Qu.: 56.00  
##  Max.   :25.0   Max.   :120.00

Including Plots

You can also embed plots, for example:

Note that the echo = FALSE parameter was added to the code chunk to prevent printing of the R code that generated the plot.