wiki_pages <- read_csv("https://myxavier-my.sharepoint.com/:x:/g/personal/ugwuo_xavier_edu/EeUXZs4q4eFLol9YsFN8c1AB2WOc5SANwUu7Wb8nbe5DZw?download=1")Wikipedia Pages Explanation In-class Activity
This document outlines ten Wikipedia pages that were randomly pulled from the Wikipedia page for evaluation.
Running Code
We created a loop that automatically called on the website and generated a new topic each time it was run 10 times.
A histogram that displays the number of characters of elements for each page.
wiki_pages %>%
ggplot(aes(x= nchar(wiki_pages))) +
geom_histogram(binwidth = 5)