initial exploration of new data

This commit is contained in:
mjgaughan 2023-11-10 15:46:26 -06:00
parent cd988a3a5b
commit 497e367e44

View File

@ -20,7 +20,7 @@ library(ggplot2)
# (1) - Get the pilot data and clean it # (1) - Get the pilot data and clean it
#source('~/Research/tor_wikipedia_edits/handcoded_edits/inter_coder_reliability_ns0.R') #source('~/Research/tor_wikipedia_edits/handcoded_edits/inter_coder_reliability_ns0.R')
#source ('/data/users/mgaughan/kkex_data_110823_3') #source ('/data/users/mgaughan/kkex_data_110823_3')
data1 <- read_csv('../power_data_110923_mmt.csv',show_col_types = FALSE) data1 <- read_csv('../power_data_111023_mmt.csv',show_col_types = FALSE)
data2 <- read_csv('../inst_all_packages_full_results.csv') data2 <- read_csv('../inst_all_packages_full_results.csv')
#d$nd <- to_logical(d$not.damaging, custom_true=c("Y")) #d$nd <- to_logical(d$not.damaging, custom_true=c("Y"))
#levels(d$source) <- c("IP-based Editors", "New Editors", "Registered Editors", "Tor-based Editors") #levels(d$source) <- c("IP-based Editors", "New Editors", "Registered Editors", "Tor-based Editors")