In [1]:
entity_views_and_edits <- read.table("../results/sql_queries/entity_views_and_aggregated_revisions/entity_views_and_aggregated_revisions.tsv", header=FALSE, sep="\t")
In [2]:
colnames(entity_views_and_edits) <- c('entity_id','rev_id','number_of_revisions', 'page_views')
In [ ]:
summary(entity_views_and_edits)
In [ ]:
head(entity_views_and_edits_for_100000_random_wikidata_items, n=100)
In [ ]:
cor(entity_views_and_edits_for_100000_random_wikidata_items$page_views,entity_views_and_edits_for_100000_random_wikidata_items$revisions, method="spearman")
In [ ]:
entity_views_and_edits_for_100000_random_wikidata_items_model <- lm(entity_views_and_edits_for_100000_random_wikidata_items$page_views ~ entity_views_and_edits_for_100000_random_wikidata_items$revisions)
In [ ]:
summary(entity_views_and_edits_for_100000_random_wikidata_items_model)
In [ ]: