In [1]:
library(data.table)

In [2]:
## Using a table of article assessments and views, build tables
## (matrices) that shows the number of dissonant articles per
## assessment category based on sorting by popularity.
##
## The underlying assumption is that in an ideal system with a limited
## and fixed amount of resources (in other words, popularity and high quality
## artefacts does not increase the amount of resources in the system),
## popularity ranking and assessment class follow a 1-to-1 relationship.
## We can therefore sort by popularity and group articles that way
## because work will be prioritised by popularity.

## DATA ASSUMPTION: views_with_redirects from resolve-redirects.R
## is loaded into memory.

## 3: build a 2x2 matrix of assessment classes and popularity classes
## 

## Assessment classes in ascending order of quality.

In [3]:
assessment_classes = c('E', 'D', 'C', 'B', 'A');

In [4]:
quality_prediction_and_page_views <- read.table("../../results/sql_queries/entity_views_and_aggregated_revisions/entity_views_and_aggregated_revisions_and_quality_scoring_20141001.tsv", header=FALSE, sep="\t")

In [5]:
quality_prediction_and_page_views <- data.table(quality_prediction_and_page_views)

In [6]:
colnames(quality_prediction_and_page_views) <- c('entity_id','number_of_revisions', 'page_views', 'prediction')

In [7]:
summary(quality_prediction_and_page_views)


    entity_id        number_of_revisions   page_views        prediction  
 Q1      :       1   Min.   :    1.00    Min.   :0.000e+00   A:      62  
 Q100    :       1   1st Qu.:    9.00    1st Qu.:4.100e+01   B:   26292  
 Q1000   :       1   Median :   17.00    Median :2.980e+02   C: 1402547  
 Q10000  :       1   Mean   :   21.99    Mean   :3.319e+04   D: 2471291  
 Q100000 :       1   3rd Qu.:   28.00    3rd Qu.:1.726e+03   E:11481788  
 Q1000000:       1   Max.   :21863.00    Max.   :1.253e+10               
 (Other) :15381974                                                       

In [8]:
## 0: calculate number of articles in each assessment class
n_per_class = quality_prediction_and_page_views[, list(narticles=sum(.N)), by='prediction']

In [9]:
setkey(n_per_class, prediction);
## NOTE: setkey allows us to do n_per_class['GA']$narticles to get counts

In [10]:
## 1: order articles by popularity
articles_by_pop = quality_prediction_and_page_views[order(quality_prediction_and_page_views$page_views)][,list(entity_id, prediction, page_views)];

In [11]:
## 2: assign popularity assessment class based on rank
##   (buckets based on number of articles in each class)
articles_by_pop[, pop_class := ''];
articles_by_pop[, seqNum := seq_len(nrow(articles_by_pop))];


entity_idpredictionpage_viewspop_class
Q10040378E 0
Q10069140E 0
Q10081695E 0
Q10092002E 0
Q10111267E 0
Q10149726E 0
Q10180230E 0
Q10185035E 0
Q10205202E 0
Q10252966E 0
Q10444494D 0
Q10624171D 0
Q10704108D 0
Q10750354E 0
Q10766855E 0
Q10827611E 0
Q11093044E 0
Q11934537E 0
Q12133466E 0
Q12264503E 0
Q12267516E 0
Q12304084E 0
Q12443525E 0
Q12543904E 0
Q12890205E 0
Q12891524E 0
Q12918202E 0
Q13005653E 0
Q13073896E 0
Q13163823E 0
Q1048694 C 2048095025
Q31165 C 2048330818
Q40629 C 2049755644
Q105584 C 2049926923
Q4584301 D 2052339927
Q565 C 2052996261
Q1868372 E 2056080224
Q209330 C 2060928966
Q14005 C 2063120071
Q918 C 2063217449
Q150248 C 2068796814
Q866 C 2079749157
Q477675 C 2080785713
Q1967876 C 2084215818
Q750403 C 2084693498
Q355 C 2093900731
Q623578 C 2097991400
Q17299517 D 2105487660
Q33999 C 2108672678
Q2494649 C 2114531894
Q2597810 C 2128920607
Q193563 C 2130725560
Q423048 C 2136131564
Q37312 C 2142913121
Q54919 C 2148531382
Q36578 C 2229315598
Q30 A 2277746226
Q6581097 C 3273952711
Q5 A 5668008721
Q5296 C 12530369761
entity_idpredictionpage_viewspop_classseqNum
Q10040378E 0 1
Q10069140E 0 2
Q10081695E 0 3
Q10092002E 0 4
Q10111267E 0 5
Q10149726E 0 6
Q10180230E 0 7
Q10185035E 0 8
Q10205202E 0 9
Q10252966E 0 10
Q10444494D 0 11
Q10624171D 0 12
Q10704108D 0 13
Q10750354E 0 14
Q10766855E 0 15
Q10827611E 0 16
Q11093044E 0 17
Q11934537E 0 18
Q12133466E 0 19
Q12264503E 0 20
Q12267516E 0 21
Q12304084E 0 22
Q12443525E 0 23
Q12543904E 0 24
Q12890205E 0 25
Q12891524E 0 26
Q12918202E 0 27
Q13005653E 0 28
Q13073896E 0 29
Q13163823E 0 30
Q1048694 C 2048095025 15381951
Q31165 C 2048330818 15381952
Q40629 C 2049755644 15381953
Q105584 C 2049926923 15381954
Q4584301 D 2052339927 15381955
Q565 C 2052996261 15381956
Q1868372 E 2056080224 15381957
Q209330 C 2060928966 15381958
Q14005 C 2063120071 15381959
Q918 C 2063217449 15381960
Q150248 C 2068796814 15381961
Q866 C 2079749157 15381962
Q477675 C 2080785713 15381963
Q1967876 C 2084215818 15381964
Q750403 C 2084693498 15381965
Q355 C 2093900731 15381966
Q623578 C 2097991400 15381967
Q17299517 D 2105487660 15381968
Q33999 C 2108672678 15381969
Q2494649 C 2114531894 15381970
Q2597810 C 2128920607 15381971
Q193563 C 2130725560 15381972
Q423048 C 2136131564 15381973
Q37312 C 2142913121 15381974
Q54919 C 2148531382 15381975
Q36578 C 2229315598 15381976
Q30 A 2277746226 15381977
Q6581097 C 3273952711 15381978
Q5 A 5668008721 15381979
Q5296 C 12530369761 15381980

In [12]:
assign_pop_class = function(dataset, classes, class_n) {
  ## Based on the per-class number of articles in class_n
  ## assign popularity based on classes to dataset.
  prev_idx = 0;
  for(rating in classes) {
    start_idx = prev_idx + 1;
    end_idx = start_idx + class_n[prediction == rating]$narticles;
    print(paste('start_idx =', start_idx, ', end_idx = ', end_idx));
    dataset[seqNum >= start_idx & seqNum <= end_idx, pop_class := rating];
    prev_idx = end_idx -1;
  }
  dataset;
}

In [13]:
articles_by_pop = assign_pop_class(articles_by_pop,
  assessment_classes, n_per_class);


[1] "start_idx = 1 , end_idx =  11481789"
[1] "start_idx = 11481789 , end_idx =  13953080"
[1] "start_idx = 13953080 , end_idx =  15355627"
[1] "start_idx = 15355627 , end_idx =  15381919"
[1] "start_idx = 15381919 , end_idx =  15381981"

In [14]:
create_dissonance_matrix = function(articledata, classes) {
  d_mtrx = matrix(0, nrow=length(classes), ncol=length(classes));
  rownames(d_mtrx) = classes;
  colnames(d_mtrx) = classes;

  for(real_rating in classes) {
    for(pop_rating in classes) {
      d_mtrx[real_rating, pop_rating] = length(articledata[prediction == real_rating & pop_class == pop_rating]$entity_id);
    }
  }
  d_mtrx;
}

In [15]:
## Based on direct hits to articles:
create_dissonance_matrix(articles_by_pop, assessment_classes)


EDCBA
E88596841797923819969 4204 8
D1941750 311855214282 3397 7
C 670555 355346358566 18035 45
B 9799 6165 9727 601 0
A 0 2 3 55 2

In [16]:
dissonance_matrix = create_dissonance_matrix(articles_by_pop,
  assessment_classes);

In [17]:
# Total misaligned entities
(dissonance_matrix[1,1]+dissonance_matrix[2,2]+dissonance_matrix[3,3]+dissonance_matrix[4,4]+dissonance_matrix[5,5])/sum(dissonance_matrix[,])


0.61960215784964

In [18]:
# A class quality and A class views over A class quality
dissonance_matrix[5,5]/sum(dissonance_matrix[5,])


0.032258064516129

In [19]:
# A class quality and E and D class views over A class quality
(dissonance_matrix[5,1]+dissonance_matrix[5,2])/sum(dissonance_matrix[5,])


0.032258064516129

In [20]:
# A class quality and < A class views
(dissonance_matrix[5,1]+dissonance_matrix[5,2]+dissonance_matrix[5,3]+dissonance_matrix[5,4])/sum(dissonance_matrix[5,])


0.967741935483871

In [21]:
# < A class quality and A class views
(dissonance_matrix[1,5]+dissonance_matrix[2,5]+dissonance_matrix[3,5]+dissonance_matrix[4,5])/sum(dissonance_matrix[,5])


0.967741935483871

In [22]:
prediction_e_pop_class_a <- merge(articles_by_pop[prediction == 'E' & pop_class == 'A'],quality_prediction_and_page_views, by='entity_id')[, c("entity_id","page_views.x", "number_of_revisions")]

In [23]:
head(prediction_e_pop_class_a)


entity_idpage_views.xnumber_of_revisions
Q1002972 204565920030
Q156376 204613233883
Q183718 204583155864
Q1868372 205608022445
Q219523 204569011373
Q2638147 204573940825

In [24]:
## Q: why do I get _two_ pageid columns?  Solution is to do the selection
## on the joined table, not as a select _in_ the join.

## Dissonance matrix proportions by row (..., 1) and column (..., 2)
## rounded to 1 decimal places.

In [25]:
round(100*prop.table(dissonance_matrix, 1), 1);


EDCBA
E77.215.7 7.1 0.00.0
D78.612.6 8.7 0.10.0
C47.825.325.6 1.30.0
B37.323.437.0 2.30.0
A 0.0 3.2 4.888.73.2

In [26]:
round(100*prop.table(dissonance_matrix, 2), 1);


EDCBA
E77.272.858.516.012.9
D16.912.615.312.911.3
C 5.814.425.668.672.6
B 0.1 0.2 0.7 2.3 0.0
A 0.0 0.0 0.0 0.2 3.2

In [27]:
## Let's write the stubs out to a file
write.table(merge(articles_by_pop[(prediction == 'E' | prediction == 'D' | prediction == 'C' | prediction == 'B') & pop_class == 'A'], quality_prediction_and_page_views, by='entity_id')[, c("entity_id","pop_class", "prediction.x")],
           '../../results/entity_categorization/201410_a_class_views_less_than_a_quality.tsv', row.names=FALSE, col.names=FALSE, quote=FALSE, sep='\t');
merge(articles_by_pop[(prediction == 'E' | prediction == 'D' | prediction == 'C' | prediction == 'B') & pop_class == 'A'], quality_prediction_and_page_views, by='entity_id')[, c("entity_id","pop_class", "prediction.x")]


entity_idpop_classprediction.x
Q1002972 A E
Q103204 A C
Q1048694 A C
Q105584 A C
Q10726338A D
Q1123836 A D
Q116933 A C
Q14005 A C
Q150248 A C
Q1526131 A C
Q156376 A E
Q171186 A C
Q17299517A D
Q183718 A E
Q1868372 A E
Q193563 A C
Q1967876 A C
Q209330 A C
Q213678 A C
Q219523 A E
Q220509 A C
Q223142 A C
Q2494649 A C
Q2597810 A C
Q2629164 A C
Q2638147 A E
Q31165 A C
Q31964 A C
Q33999 A C
Q355 A C
Q356 A C
Q36578 A C
Q371467 A C
Q372827 A E
Q37312 A C
Q384060 A C
Q40629 A C
Q41226 A C
Q423048 A C
Q4584301 A D
Q477675 A C
Q501851 A D
Q51044 A C
Q523660 A D
Q5296 A C
Q54919 A C
Q565 A C
Q568769 A C
Q618340 A C
Q620946 A C
Q623578 A C
Q63056 A C
Q6581097 A C
Q7315186 A E
Q750403 A C
Q809830 A C
Q829984 A C
Q866 A C
Q918 A C
Q9384291 A D

In [28]:
write.table(merge(articles_by_pop[prediction == 'A' & (pop_class == 'B' | pop_class == 'C' | pop_class == 'D' | pop_class == 'E')], quality_prediction_and_page_views, by='entity_id')[, c("entity_id","pop_class", "prediction.x")],
           '../../results/entity_categorization/201410_a_class_quality_less_than_a_views.tsv', row.names=FALSE, col.names=FALSE, quote=FALSE, sep='\t');

In [29]:
write.table(merge(articles_by_pop[(prediction == 'A' & pop_class == 'A') | (prediction == 'B' & pop_class == 'B') | (prediction == 'C' & pop_class == 'C') | (prediction == 'D' & pop_class == 'D') | (prediction == 'E' & pop_class == 'E')], quality_prediction_and_page_views, by='entity_id')[, c("entity_id","pop_class", "prediction.x")],
           '../../results/entity_categorization/201410_aligned.tsv', row.names=FALSE, col.names=FALSE, quote=FALSE, sep='\t');

In [30]:
write.table(merge(articles_by_pop[(prediction == 'A' & pop_class != 'A') | (prediction == 'B' & pop_class != 'B') | (prediction == 'C' & pop_class != 'C') | (prediction == 'D' & pop_class != 'D') | (prediction == 'E' & pop_class != 'E')], quality_prediction_and_page_views, by='entity_id')[, c("entity_id","pop_class", "prediction.x")],
           '../../results/entity_categorization/201410_misaligned.tsv', row.names=FALSE, col.names=FALSE, quote=FALSE, sep='\t');

Dissonance Measures (was seperate file)


In [29]:
## Various ways of measuring dissonance.

## DATA ASSUMPTION: articles_by_pop from build-dissonance-table.R
## is loaded into memory.

## None/Moderate/High measure of dissonance

In [30]:
articles_by_pop[, pop_class := ordered(pop_class, assessment_classes)];


entity_idpredictionpage_viewspop_classseqNum
Q10040378E 0 E 1
Q10069140E 0 E 2
Q10081695E 0 E 3
Q10092002E 0 E 4
Q10111267E 0 E 5
Q10149726E 0 E 6
Q10180230E 0 E 7
Q10185035E 0 E 8
Q10205202E 0 E 9
Q10252966E 0 E 10
Q10444494D 0 E 11
Q10624171D 0 E 12
Q10704108D 0 E 13
Q10750354E 0 E 14
Q10766855E 0 E 15
Q10827611E 0 E 16
Q11093044E 0 E 17
Q11934537E 0 E 18
Q12133466E 0 E 19
Q12264503E 0 E 20
Q12267516E 0 E 21
Q12304084E 0 E 22
Q12443525E 0 E 23
Q12543904E 0 E 24
Q12890205E 0 E 25
Q12891524E 0 E 26
Q12918202E 0 E 27
Q13005653E 0 E 28
Q13073896E 0 E 29
Q13163823E 0 E 30
Q1048694 C 2048095025A 15381951
Q31165 C 2048330818A 15381952
Q40629 C 2049755644A 15381953
Q105584 C 2049926923A 15381954
Q4584301 D 2052339927A 15381955
Q565 C 2052996261A 15381956
Q1868372 E 2056080224A 15381957
Q209330 C 2060928966A 15381958
Q14005 C 2063120071A 15381959
Q918 C 2063217449A 15381960
Q150248 C 2068796814A 15381961
Q866 C 2079749157A 15381962
Q477675 C 2080785713A 15381963
Q1967876 C 2084215818A 15381964
Q750403 C 2084693498A 15381965
Q355 C 2093900731A 15381966
Q623578 C 2097991400A 15381967
Q17299517 D 2105487660A 15381968
Q33999 C 2108672678A 15381969
Q2494649 C 2114531894A 15381970
Q2597810 C 2128920607A 15381971
Q193563 C 2130725560A 15381972
Q423048 C 2136131564A 15381973
Q37312 C 2142913121A 15381974
Q54919 C 2148531382A 15381975
Q36578 C 2229315598A 15381976
Q30 A 2277746226A 15381977
Q6581097 C 3273952711A 15381978
Q5 A 5668008721A 15381979
Q5296 C 12530369761A 15381980

In [31]:
dissonance_metric = c('High negative', 'Moderate negative',
  'None', 'Moderate positive', 'High positive');

In [32]:
articles_by_pop[, dissonance := factor(NA, dissonance_metric)];


entity_idpredictionpage_viewspop_classseqNumdissonance
Q10040378E 0 E 1 NA
Q10069140E 0 E 2 NA
Q10081695E 0 E 3 NA
Q10092002E 0 E 4 NA
Q10111267E 0 E 5 NA
Q10149726E 0 E 6 NA
Q10180230E 0 E 7 NA
Q10185035E 0 E 8 NA
Q10205202E 0 E 9 NA
Q10252966E 0 E 10 NA
Q10444494D 0 E 11 NA
Q10624171D 0 E 12 NA
Q10704108D 0 E 13 NA
Q10750354E 0 E 14 NA
Q10766855E 0 E 15 NA
Q10827611E 0 E 16 NA
Q11093044E 0 E 17 NA
Q11934537E 0 E 18 NA
Q12133466E 0 E 19 NA
Q12264503E 0 E 20 NA
Q12267516E 0 E 21 NA
Q12304084E 0 E 22 NA
Q12443525E 0 E 23 NA
Q12543904E 0 E 24 NA
Q12890205E 0 E 25 NA
Q12891524E 0 E 26 NA
Q12918202E 0 E 27 NA
Q13005653E 0 E 28 NA
Q13073896E 0 E 29 NA
Q13163823E 0 E 30 NA
Q1048694 C 2048095025A 15381951 NA
Q31165 C 2048330818A 15381952 NA
Q40629 C 2049755644A 15381953 NA
Q105584 C 2049926923A 15381954 NA
Q4584301 D 2052339927A 15381955 NA
Q565 C 2052996261A 15381956 NA
Q1868372 E 2056080224A 15381957 NA
Q209330 C 2060928966A 15381958 NA
Q14005 C 2063120071A 15381959 NA
Q918 C 2063217449A 15381960 NA
Q150248 C 2068796814A 15381961 NA
Q866 C 2079749157A 15381962 NA
Q477675 C 2080785713A 15381963 NA
Q1967876 C 2084215818A 15381964 NA
Q750403 C 2084693498A 15381965 NA
Q355 C 2093900731A 15381966 NA
Q623578 C 2097991400A 15381967 NA
Q17299517 D 2105487660A 15381968 NA
Q33999 C 2108672678A 15381969 NA
Q2494649 C 2114531894A 15381970 NA
Q2597810 C 2128920607A 15381971 NA
Q193563 C 2130725560A 15381972 NA
Q423048 C 2136131564A 15381973 NA
Q37312 C 2142913121A 15381974 NA
Q54919 C 2148531382A 15381975 NA
Q36578 C 2229315598A 15381976 NA
Q30 A 2277746226A 15381977 NA
Q6581097 C 3273952711A 15381978 NA
Q5 A 5668008721A 15381979 NA
Q5296 C 12530369761A 15381980 NA

In [33]:
## NOTE: because pop_class is of class ordered, we can use
##       expressions like "pop_class < 'C'" as expected

In [34]:
## A: None if A, Moderate if A, High elsewhere
articles_by_pop[prediction == 'A' & pop_class <= 'C',
                dissonance := 'High negative'];
articles_by_pop[prediction == 'A' & pop_class == 'B',
                dissonance := 'Moderate negative'];
articles_by_pop[prediction == 'A' & pop_class == 'A',
                dissonance := 'None'];


entity_idpredictionpage_viewspop_classseqNumdissonance
Q10040378E 0 E 1 NA
Q10069140E 0 E 2 NA
Q10081695E 0 E 3 NA
Q10092002E 0 E 4 NA
Q10111267E 0 E 5 NA
Q10149726E 0 E 6 NA
Q10180230E 0 E 7 NA
Q10185035E 0 E 8 NA
Q10205202E 0 E 9 NA
Q10252966E 0 E 10 NA
Q10444494D 0 E 11 NA
Q10624171D 0 E 12 NA
Q10704108D 0 E 13 NA
Q10750354E 0 E 14 NA
Q10766855E 0 E 15 NA
Q10827611E 0 E 16 NA
Q11093044E 0 E 17 NA
Q11934537E 0 E 18 NA
Q12133466E 0 E 19 NA
Q12264503E 0 E 20 NA
Q12267516E 0 E 21 NA
Q12304084E 0 E 22 NA
Q12443525E 0 E 23 NA
Q12543904E 0 E 24 NA
Q12890205E 0 E 25 NA
Q12891524E 0 E 26 NA
Q12918202E 0 E 27 NA
Q13005653E 0 E 28 NA
Q13073896E 0 E 29 NA
Q13163823E 0 E 30 NA
Q1048694 C 2048095025A 15381951 NA
Q31165 C 2048330818A 15381952 NA
Q40629 C 2049755644A 15381953 NA
Q105584 C 2049926923A 15381954 NA
Q4584301 D 2052339927A 15381955 NA
Q565 C 2052996261A 15381956 NA
Q1868372 E 2056080224A 15381957 NA
Q209330 C 2060928966A 15381958 NA
Q14005 C 2063120071A 15381959 NA
Q918 C 2063217449A 15381960 NA
Q150248 C 2068796814A 15381961 NA
Q866 C 2079749157A 15381962 NA
Q477675 C 2080785713A 15381963 NA
Q1967876 C 2084215818A 15381964 NA
Q750403 C 2084693498A 15381965 NA
Q355 C 2093900731A 15381966 NA
Q623578 C 2097991400A 15381967 NA
Q17299517 D 2105487660A 15381968 NA
Q33999 C 2108672678A 15381969 NA
Q2494649 C 2114531894A 15381970 NA
Q2597810 C 2128920607A 15381971 NA
Q193563 C 2130725560A 15381972 NA
Q423048 C 2136131564A 15381973 NA
Q37312 C 2142913121A 15381974 NA
Q54919 C 2148531382A 15381975 NA
Q36578 C 2229315598A 15381976 NA
Q30 A 2277746226A 15381977 NA
Q6581097 C 3273952711A 15381978 NA
Q5 A 5668008721A 15381979 NA
Q5296 C 12530369761A 15381980 NA
entity_idpredictionpage_viewspop_classseqNumdissonance
Q10040378E 0 E 1 NA
Q10069140E 0 E 2 NA
Q10081695E 0 E 3 NA
Q10092002E 0 E 4 NA
Q10111267E 0 E 5 NA
Q10149726E 0 E 6 NA
Q10180230E 0 E 7 NA
Q10185035E 0 E 8 NA
Q10205202E 0 E 9 NA
Q10252966E 0 E 10 NA
Q10444494D 0 E 11 NA
Q10624171D 0 E 12 NA
Q10704108D 0 E 13 NA
Q10750354E 0 E 14 NA
Q10766855E 0 E 15 NA
Q10827611E 0 E 16 NA
Q11093044E 0 E 17 NA
Q11934537E 0 E 18 NA
Q12133466E 0 E 19 NA
Q12264503E 0 E 20 NA
Q12267516E 0 E 21 NA
Q12304084E 0 E 22 NA
Q12443525E 0 E 23 NA
Q12543904E 0 E 24 NA
Q12890205E 0 E 25 NA
Q12891524E 0 E 26 NA
Q12918202E 0 E 27 NA
Q13005653E 0 E 28 NA
Q13073896E 0 E 29 NA
Q13163823E 0 E 30 NA
Q1048694 C 2048095025A 15381951 NA
Q31165 C 2048330818A 15381952 NA
Q40629 C 2049755644A 15381953 NA
Q105584 C 2049926923A 15381954 NA
Q4584301 D 2052339927A 15381955 NA
Q565 C 2052996261A 15381956 NA
Q1868372 E 2056080224A 15381957 NA
Q209330 C 2060928966A 15381958 NA
Q14005 C 2063120071A 15381959 NA
Q918 C 2063217449A 15381960 NA
Q150248 C 2068796814A 15381961 NA
Q866 C 2079749157A 15381962 NA
Q477675 C 2080785713A 15381963 NA
Q1967876 C 2084215818A 15381964 NA
Q750403 C 2084693498A 15381965 NA
Q355 C 2093900731A 15381966 NA
Q623578 C 2097991400A 15381967 NA
Q17299517 D 2105487660A 15381968 NA
Q33999 C 2108672678A 15381969 NA
Q2494649 C 2114531894A 15381970 NA
Q2597810 C 2128920607A 15381971 NA
Q193563 C 2130725560A 15381972 NA
Q423048 C 2136131564A 15381973 NA
Q37312 C 2142913121A 15381974 NA
Q54919 C 2148531382A 15381975 NA
Q36578 C 2229315598A 15381976 NA
Q30 A 2277746226A 15381977 NA
Q6581097 C 3273952711A 15381978 NA
Q5 A 5668008721A 15381979 NA
Q5296 C 12530369761A 15381980 NA
entity_idpredictionpage_viewspop_classseqNumdissonance
Q10040378E 0 E 1 NA
Q10069140E 0 E 2 NA
Q10081695E 0 E 3 NA
Q10092002E 0 E 4 NA
Q10111267E 0 E 5 NA
Q10149726E 0 E 6 NA
Q10180230E 0 E 7 NA
Q10185035E 0 E 8 NA
Q10205202E 0 E 9 NA
Q10252966E 0 E 10 NA
Q10444494D 0 E 11 NA
Q10624171D 0 E 12 NA
Q10704108D 0 E 13 NA
Q10750354E 0 E 14 NA
Q10766855E 0 E 15 NA
Q10827611E 0 E 16 NA
Q11093044E 0 E 17 NA
Q11934537E 0 E 18 NA
Q12133466E 0 E 19 NA
Q12264503E 0 E 20 NA
Q12267516E 0 E 21 NA
Q12304084E 0 E 22 NA
Q12443525E 0 E 23 NA
Q12543904E 0 E 24 NA
Q12890205E 0 E 25 NA
Q12891524E 0 E 26 NA
Q12918202E 0 E 27 NA
Q13005653E 0 E 28 NA
Q13073896E 0 E 29 NA
Q13163823E 0 E 30 NA
Q1048694 C 2048095025A 15381951 NA
Q31165 C 2048330818A 15381952 NA
Q40629 C 2049755644A 15381953 NA
Q105584 C 2049926923A 15381954 NA
Q4584301 D 2052339927A 15381955 NA
Q565 C 2052996261A 15381956 NA
Q1868372 E 2056080224A 15381957 NA
Q209330 C 2060928966A 15381958 NA
Q14005 C 2063120071A 15381959 NA
Q918 C 2063217449A 15381960 NA
Q150248 C 2068796814A 15381961 NA
Q866 C 2079749157A 15381962 NA
Q477675 C 2080785713A 15381963 NA
Q1967876 C 2084215818A 15381964 NA
Q750403 C 2084693498A 15381965 NA
Q355 C 2093900731A 15381966 NA
Q623578 C 2097991400A 15381967 NA
Q17299517 D 2105487660A 15381968 NA
Q33999 C 2108672678A 15381969 NA
Q2494649 C 2114531894A 15381970 NA
Q2597810 C 2128920607A 15381971 NA
Q193563 C 2130725560A 15381972 NA
Q423048 C 2136131564A 15381973 NA
Q37312 C 2142913121A 15381974 NA
Q54919 C 2148531382A 15381975 NA
Q36578 C 2229315598A 15381976 NA
Q30 A 2277746226A 15381977 None
Q6581097 C 3273952711A 15381978 NA
Q5 A 5668008721A 15381979 None
Q5296 C 12530369761A 15381980 NA

In [35]:
## B: 
articles_by_pop[prediction == 'B' & pop_class <= 'D',
                dissonance := 'High negative'];
articles_by_pop[prediction == 'B' & pop_class == 'C',
                dissonance := 'Moderate negative'];
articles_by_pop[prediction == 'B' & pop_class == 'B',
                dissonance := 'None'];
articles_by_pop[prediction == 'B' & pop_class == 'A',
                dissonance := 'Moderate positive'];


entity_idpredictionpage_viewspop_classseqNumdissonance
Q10040378E 0 E 1 NA
Q10069140E 0 E 2 NA
Q10081695E 0 E 3 NA
Q10092002E 0 E 4 NA
Q10111267E 0 E 5 NA
Q10149726E 0 E 6 NA
Q10180230E 0 E 7 NA
Q10185035E 0 E 8 NA
Q10205202E 0 E 9 NA
Q10252966E 0 E 10 NA
Q10444494D 0 E 11 NA
Q10624171D 0 E 12 NA
Q10704108D 0 E 13 NA
Q10750354E 0 E 14 NA
Q10766855E 0 E 15 NA
Q10827611E 0 E 16 NA
Q11093044E 0 E 17 NA
Q11934537E 0 E 18 NA
Q12133466E 0 E 19 NA
Q12264503E 0 E 20 NA
Q12267516E 0 E 21 NA
Q12304084E 0 E 22 NA
Q12443525E 0 E 23 NA
Q12543904E 0 E 24 NA
Q12890205E 0 E 25 NA
Q12891524E 0 E 26 NA
Q12918202E 0 E 27 NA
Q13005653E 0 E 28 NA
Q13073896E 0 E 29 NA
Q13163823E 0 E 30 NA
Q1048694 C 2048095025A 15381951 NA
Q31165 C 2048330818A 15381952 NA
Q40629 C 2049755644A 15381953 NA
Q105584 C 2049926923A 15381954 NA
Q4584301 D 2052339927A 15381955 NA
Q565 C 2052996261A 15381956 NA
Q1868372 E 2056080224A 15381957 NA
Q209330 C 2060928966A 15381958 NA
Q14005 C 2063120071A 15381959 NA
Q918 C 2063217449A 15381960 NA
Q150248 C 2068796814A 15381961 NA
Q866 C 2079749157A 15381962 NA
Q477675 C 2080785713A 15381963 NA
Q1967876 C 2084215818A 15381964 NA
Q750403 C 2084693498A 15381965 NA
Q355 C 2093900731A 15381966 NA
Q623578 C 2097991400A 15381967 NA
Q17299517 D 2105487660A 15381968 NA
Q33999 C 2108672678A 15381969 NA
Q2494649 C 2114531894A 15381970 NA
Q2597810 C 2128920607A 15381971 NA
Q193563 C 2130725560A 15381972 NA
Q423048 C 2136131564A 15381973 NA
Q37312 C 2142913121A 15381974 NA
Q54919 C 2148531382A 15381975 NA
Q36578 C 2229315598A 15381976 NA
Q30 A 2277746226A 15381977 None
Q6581097 C 3273952711A 15381978 NA
Q5 A 5668008721A 15381979 None
Q5296 C 12530369761A 15381980 NA
entity_idpredictionpage_viewspop_classseqNumdissonance
Q10040378E 0 E 1 NA
Q10069140E 0 E 2 NA
Q10081695E 0 E 3 NA
Q10092002E 0 E 4 NA
Q10111267E 0 E 5 NA
Q10149726E 0 E 6 NA
Q10180230E 0 E 7 NA
Q10185035E 0 E 8 NA
Q10205202E 0 E 9 NA
Q10252966E 0 E 10 NA
Q10444494D 0 E 11 NA
Q10624171D 0 E 12 NA
Q10704108D 0 E 13 NA
Q10750354E 0 E 14 NA
Q10766855E 0 E 15 NA
Q10827611E 0 E 16 NA
Q11093044E 0 E 17 NA
Q11934537E 0 E 18 NA
Q12133466E 0 E 19 NA
Q12264503E 0 E 20 NA
Q12267516E 0 E 21 NA
Q12304084E 0 E 22 NA
Q12443525E 0 E 23 NA
Q12543904E 0 E 24 NA
Q12890205E 0 E 25 NA
Q12891524E 0 E 26 NA
Q12918202E 0 E 27 NA
Q13005653E 0 E 28 NA
Q13073896E 0 E 29 NA
Q13163823E 0 E 30 NA
Q1048694 C 2048095025A 15381951 NA
Q31165 C 2048330818A 15381952 NA
Q40629 C 2049755644A 15381953 NA
Q105584 C 2049926923A 15381954 NA
Q4584301 D 2052339927A 15381955 NA
Q565 C 2052996261A 15381956 NA
Q1868372 E 2056080224A 15381957 NA
Q209330 C 2060928966A 15381958 NA
Q14005 C 2063120071A 15381959 NA
Q918 C 2063217449A 15381960 NA
Q150248 C 2068796814A 15381961 NA
Q866 C 2079749157A 15381962 NA
Q477675 C 2080785713A 15381963 NA
Q1967876 C 2084215818A 15381964 NA
Q750403 C 2084693498A 15381965 NA
Q355 C 2093900731A 15381966 NA
Q623578 C 2097991400A 15381967 NA
Q17299517 D 2105487660A 15381968 NA
Q33999 C 2108672678A 15381969 NA
Q2494649 C 2114531894A 15381970 NA
Q2597810 C 2128920607A 15381971 NA
Q193563 C 2130725560A 15381972 NA
Q423048 C 2136131564A 15381973 NA
Q37312 C 2142913121A 15381974 NA
Q54919 C 2148531382A 15381975 NA
Q36578 C 2229315598A 15381976 NA
Q30 A 2277746226A 15381977 None
Q6581097 C 3273952711A 15381978 NA
Q5 A 5668008721A 15381979 None
Q5296 C 12530369761A 15381980 NA
entity_idpredictionpage_viewspop_classseqNumdissonance
Q10040378E 0 E 1 NA
Q10069140E 0 E 2 NA
Q10081695E 0 E 3 NA
Q10092002E 0 E 4 NA
Q10111267E 0 E 5 NA
Q10149726E 0 E 6 NA
Q10180230E 0 E 7 NA
Q10185035E 0 E 8 NA
Q10205202E 0 E 9 NA
Q10252966E 0 E 10 NA
Q10444494D 0 E 11 NA
Q10624171D 0 E 12 NA
Q10704108D 0 E 13 NA
Q10750354E 0 E 14 NA
Q10766855E 0 E 15 NA
Q10827611E 0 E 16 NA
Q11093044E 0 E 17 NA
Q11934537E 0 E 18 NA
Q12133466E 0 E 19 NA
Q12264503E 0 E 20 NA
Q12267516E 0 E 21 NA
Q12304084E 0 E 22 NA
Q12443525E 0 E 23 NA
Q12543904E 0 E 24 NA
Q12890205E 0 E 25 NA
Q12891524E 0 E 26 NA
Q12918202E 0 E 27 NA
Q13005653E 0 E 28 NA
Q13073896E 0 E 29 NA
Q13163823E 0 E 30 NA
Q1048694 C 2048095025A 15381951 NA
Q31165 C 2048330818A 15381952 NA
Q40629 C 2049755644A 15381953 NA
Q105584 C 2049926923A 15381954 NA
Q4584301 D 2052339927A 15381955 NA
Q565 C 2052996261A 15381956 NA
Q1868372 E 2056080224A 15381957 NA
Q209330 C 2060928966A 15381958 NA
Q14005 C 2063120071A 15381959 NA
Q918 C 2063217449A 15381960 NA
Q150248 C 2068796814A 15381961 NA
Q866 C 2079749157A 15381962 NA
Q477675 C 2080785713A 15381963 NA
Q1967876 C 2084215818A 15381964 NA
Q750403 C 2084693498A 15381965 NA
Q355 C 2093900731A 15381966 NA
Q623578 C 2097991400A 15381967 NA
Q17299517 D 2105487660A 15381968 NA
Q33999 C 2108672678A 15381969 NA
Q2494649 C 2114531894A 15381970 NA
Q2597810 C 2128920607A 15381971 NA
Q193563 C 2130725560A 15381972 NA
Q423048 C 2136131564A 15381973 NA
Q37312 C 2142913121A 15381974 NA
Q54919 C 2148531382A 15381975 NA
Q36578 C 2229315598A 15381976 NA
Q30 A 2277746226A 15381977 None
Q6581097 C 3273952711A 15381978 NA
Q5 A 5668008721A 15381979 None
Q5296 C 12530369761A 15381980 NA
entity_idpredictionpage_viewspop_classseqNumdissonance
Q10040378E 0 E 1 NA
Q10069140E 0 E 2 NA
Q10081695E 0 E 3 NA
Q10092002E 0 E 4 NA
Q10111267E 0 E 5 NA
Q10149726E 0 E 6 NA
Q10180230E 0 E 7 NA
Q10185035E 0 E 8 NA
Q10205202E 0 E 9 NA
Q10252966E 0 E 10 NA
Q10444494D 0 E 11 NA
Q10624171D 0 E 12 NA
Q10704108D 0 E 13 NA
Q10750354E 0 E 14 NA
Q10766855E 0 E 15 NA
Q10827611E 0 E 16 NA
Q11093044E 0 E 17 NA
Q11934537E 0 E 18 NA
Q12133466E 0 E 19 NA
Q12264503E 0 E 20 NA
Q12267516E 0 E 21 NA
Q12304084E 0 E 22 NA
Q12443525E 0 E 23 NA
Q12543904E 0 E 24 NA
Q12890205E 0 E 25 NA
Q12891524E 0 E 26 NA
Q12918202E 0 E 27 NA
Q13005653E 0 E 28 NA
Q13073896E 0 E 29 NA
Q13163823E 0 E 30 NA
Q1048694 C 2048095025A 15381951 NA
Q31165 C 2048330818A 15381952 NA
Q40629 C 2049755644A 15381953 NA
Q105584 C 2049926923A 15381954 NA
Q4584301 D 2052339927A 15381955 NA
Q565 C 2052996261A 15381956 NA
Q1868372 E 2056080224A 15381957 NA
Q209330 C 2060928966A 15381958 NA
Q14005 C 2063120071A 15381959 NA
Q918 C 2063217449A 15381960 NA
Q150248 C 2068796814A 15381961 NA
Q866 C 2079749157A 15381962 NA
Q477675 C 2080785713A 15381963 NA
Q1967876 C 2084215818A 15381964 NA
Q750403 C 2084693498A 15381965 NA
Q355 C 2093900731A 15381966 NA
Q623578 C 2097991400A 15381967 NA
Q17299517 D 2105487660A 15381968 NA
Q33999 C 2108672678A 15381969 NA
Q2494649 C 2114531894A 15381970 NA
Q2597810 C 2128920607A 15381971 NA
Q193563 C 2130725560A 15381972 NA
Q423048 C 2136131564A 15381973 NA
Q37312 C 2142913121A 15381974 NA
Q54919 C 2148531382A 15381975 NA
Q36578 C 2229315598A 15381976 NA
Q30 A 2277746226A 15381977 None
Q6581097 C 3273952711A 15381978 NA
Q5 A 5668008721A 15381979 None
Q5296 C 12530369761A 15381980 NA

In [36]:
## C: 
articles_by_pop[prediction == 'C' & pop_class == 'E',
                dissonance := 'High negative'];
articles_by_pop[prediction == 'C' & pop_class == 'D',
                dissonance := 'Moderate negative'];
articles_by_pop[prediction == 'C' & pop_class == 'C',
                dissonance := 'None'];
articles_by_pop[prediction == 'C' & pop_class == 'B',
                dissonance := 'Moderate positive'];
articles_by_pop[prediction == 'C' & pop_class == 'A',
                dissonance := 'High positive'];


entity_idpredictionpage_viewspop_classseqNumdissonance
Q10040378E 0 E 1 NA
Q10069140E 0 E 2 NA
Q10081695E 0 E 3 NA
Q10092002E 0 E 4 NA
Q10111267E 0 E 5 NA
Q10149726E 0 E 6 NA
Q10180230E 0 E 7 NA
Q10185035E 0 E 8 NA
Q10205202E 0 E 9 NA
Q10252966E 0 E 10 NA
Q10444494D 0 E 11 NA
Q10624171D 0 E 12 NA
Q10704108D 0 E 13 NA
Q10750354E 0 E 14 NA
Q10766855E 0 E 15 NA
Q10827611E 0 E 16 NA
Q11093044E 0 E 17 NA
Q11934537E 0 E 18 NA
Q12133466E 0 E 19 NA
Q12264503E 0 E 20 NA
Q12267516E 0 E 21 NA
Q12304084E 0 E 22 NA
Q12443525E 0 E 23 NA
Q12543904E 0 E 24 NA
Q12890205E 0 E 25 NA
Q12891524E 0 E 26 NA
Q12918202E 0 E 27 NA
Q13005653E 0 E 28 NA
Q13073896E 0 E 29 NA
Q13163823E 0 E 30 NA
Q1048694 C 2048095025A 15381951 NA
Q31165 C 2048330818A 15381952 NA
Q40629 C 2049755644A 15381953 NA
Q105584 C 2049926923A 15381954 NA
Q4584301 D 2052339927A 15381955 NA
Q565 C 2052996261A 15381956 NA
Q1868372 E 2056080224A 15381957 NA
Q209330 C 2060928966A 15381958 NA
Q14005 C 2063120071A 15381959 NA
Q918 C 2063217449A 15381960 NA
Q150248 C 2068796814A 15381961 NA
Q866 C 2079749157A 15381962 NA
Q477675 C 2080785713A 15381963 NA
Q1967876 C 2084215818A 15381964 NA
Q750403 C 2084693498A 15381965 NA
Q355 C 2093900731A 15381966 NA
Q623578 C 2097991400A 15381967 NA
Q17299517 D 2105487660A 15381968 NA
Q33999 C 2108672678A 15381969 NA
Q2494649 C 2114531894A 15381970 NA
Q2597810 C 2128920607A 15381971 NA
Q193563 C 2130725560A 15381972 NA
Q423048 C 2136131564A 15381973 NA
Q37312 C 2142913121A 15381974 NA
Q54919 C 2148531382A 15381975 NA
Q36578 C 2229315598A 15381976 NA
Q30 A 2277746226A 15381977 None
Q6581097 C 3273952711A 15381978 NA
Q5 A 5668008721A 15381979 None
Q5296 C 12530369761A 15381980 NA
entity_idpredictionpage_viewspop_classseqNumdissonance
Q10040378E 0 E 1 NA
Q10069140E 0 E 2 NA
Q10081695E 0 E 3 NA
Q10092002E 0 E 4 NA
Q10111267E 0 E 5 NA
Q10149726E 0 E 6 NA
Q10180230E 0 E 7 NA
Q10185035E 0 E 8 NA
Q10205202E 0 E 9 NA
Q10252966E 0 E 10 NA
Q10444494D 0 E 11 NA
Q10624171D 0 E 12 NA
Q10704108D 0 E 13 NA
Q10750354E 0 E 14 NA
Q10766855E 0 E 15 NA
Q10827611E 0 E 16 NA
Q11093044E 0 E 17 NA
Q11934537E 0 E 18 NA
Q12133466E 0 E 19 NA
Q12264503E 0 E 20 NA
Q12267516E 0 E 21 NA
Q12304084E 0 E 22 NA
Q12443525E 0 E 23 NA
Q12543904E 0 E 24 NA
Q12890205E 0 E 25 NA
Q12891524E 0 E 26 NA
Q12918202E 0 E 27 NA
Q13005653E 0 E 28 NA
Q13073896E 0 E 29 NA
Q13163823E 0 E 30 NA
Q1048694 C 2048095025A 15381951 NA
Q31165 C 2048330818A 15381952 NA
Q40629 C 2049755644A 15381953 NA
Q105584 C 2049926923A 15381954 NA
Q4584301 D 2052339927A 15381955 NA
Q565 C 2052996261A 15381956 NA
Q1868372 E 2056080224A 15381957 NA
Q209330 C 2060928966A 15381958 NA
Q14005 C 2063120071A 15381959 NA
Q918 C 2063217449A 15381960 NA
Q150248 C 2068796814A 15381961 NA
Q866 C 2079749157A 15381962 NA
Q477675 C 2080785713A 15381963 NA
Q1967876 C 2084215818A 15381964 NA
Q750403 C 2084693498A 15381965 NA
Q355 C 2093900731A 15381966 NA
Q623578 C 2097991400A 15381967 NA
Q17299517 D 2105487660A 15381968 NA
Q33999 C 2108672678A 15381969 NA
Q2494649 C 2114531894A 15381970 NA
Q2597810 C 2128920607A 15381971 NA
Q193563 C 2130725560A 15381972 NA
Q423048 C 2136131564A 15381973 NA
Q37312 C 2142913121A 15381974 NA
Q54919 C 2148531382A 15381975 NA
Q36578 C 2229315598A 15381976 NA
Q30 A 2277746226A 15381977 None
Q6581097 C 3273952711A 15381978 NA
Q5 A 5668008721A 15381979 None
Q5296 C 12530369761A 15381980 NA
entity_idpredictionpage_viewspop_classseqNumdissonance
Q10040378E 0 E 1 NA
Q10069140E 0 E 2 NA
Q10081695E 0 E 3 NA
Q10092002E 0 E 4 NA
Q10111267E 0 E 5 NA
Q10149726E 0 E 6 NA
Q10180230E 0 E 7 NA
Q10185035E 0 E 8 NA
Q10205202E 0 E 9 NA
Q10252966E 0 E 10 NA
Q10444494D 0 E 11 NA
Q10624171D 0 E 12 NA
Q10704108D 0 E 13 NA
Q10750354E 0 E 14 NA
Q10766855E 0 E 15 NA
Q10827611E 0 E 16 NA
Q11093044E 0 E 17 NA
Q11934537E 0 E 18 NA
Q12133466E 0 E 19 NA
Q12264503E 0 E 20 NA
Q12267516E 0 E 21 NA
Q12304084E 0 E 22 NA
Q12443525E 0 E 23 NA
Q12543904E 0 E 24 NA
Q12890205E 0 E 25 NA
Q12891524E 0 E 26 NA
Q12918202E 0 E 27 NA
Q13005653E 0 E 28 NA
Q13073896E 0 E 29 NA
Q13163823E 0 E 30 NA
Q1048694 C 2048095025A 15381951 NA
Q31165 C 2048330818A 15381952 NA
Q40629 C 2049755644A 15381953 NA
Q105584 C 2049926923A 15381954 NA
Q4584301 D 2052339927A 15381955 NA
Q565 C 2052996261A 15381956 NA
Q1868372 E 2056080224A 15381957 NA
Q209330 C 2060928966A 15381958 NA
Q14005 C 2063120071A 15381959 NA
Q918 C 2063217449A 15381960 NA
Q150248 C 2068796814A 15381961 NA
Q866 C 2079749157A 15381962 NA
Q477675 C 2080785713A 15381963 NA
Q1967876 C 2084215818A 15381964 NA
Q750403 C 2084693498A 15381965 NA
Q355 C 2093900731A 15381966 NA
Q623578 C 2097991400A 15381967 NA
Q17299517 D 2105487660A 15381968 NA
Q33999 C 2108672678A 15381969 NA
Q2494649 C 2114531894A 15381970 NA
Q2597810 C 2128920607A 15381971 NA
Q193563 C 2130725560A 15381972 NA
Q423048 C 2136131564A 15381973 NA
Q37312 C 2142913121A 15381974 NA
Q54919 C 2148531382A 15381975 NA
Q36578 C 2229315598A 15381976 NA
Q30 A 2277746226A 15381977 None
Q6581097 C 3273952711A 15381978 NA
Q5 A 5668008721A 15381979 None
Q5296 C 12530369761A 15381980 NA
entity_idpredictionpage_viewspop_classseqNumdissonance
Q10040378E 0 E 1 NA
Q10069140E 0 E 2 NA
Q10081695E 0 E 3 NA
Q10092002E 0 E 4 NA
Q10111267E 0 E 5 NA
Q10149726E 0 E 6 NA
Q10180230E 0 E 7 NA
Q10185035E 0 E 8 NA
Q10205202E 0 E 9 NA
Q10252966E 0 E 10 NA
Q10444494D 0 E 11 NA
Q10624171D 0 E 12 NA
Q10704108D 0 E 13 NA
Q10750354E 0 E 14 NA
Q10766855E 0 E 15 NA
Q10827611E 0 E 16 NA
Q11093044E 0 E 17 NA
Q11934537E 0 E 18 NA
Q12133466E 0 E 19 NA
Q12264503E 0 E 20 NA
Q12267516E 0 E 21 NA
Q12304084E 0 E 22 NA
Q12443525E 0 E 23 NA
Q12543904E 0 E 24 NA
Q12890205E 0 E 25 NA
Q12891524E 0 E 26 NA
Q12918202E 0 E 27 NA
Q13005653E 0 E 28 NA
Q13073896E 0 E 29 NA
Q13163823E 0 E 30 NA
Q1048694 C 2048095025A 15381951 NA
Q31165 C 2048330818A 15381952 NA
Q40629 C 2049755644A 15381953 NA
Q105584 C 2049926923A 15381954 NA
Q4584301 D 2052339927A 15381955 NA
Q565 C 2052996261A 15381956 NA
Q1868372 E 2056080224A 15381957 NA
Q209330 C 2060928966A 15381958 NA
Q14005 C 2063120071A 15381959 NA
Q918 C 2063217449A 15381960 NA
Q150248 C 2068796814A 15381961 NA
Q866 C 2079749157A 15381962 NA
Q477675 C 2080785713A 15381963 NA
Q1967876 C 2084215818A 15381964 NA
Q750403 C 2084693498A 15381965 NA
Q355 C 2093900731A 15381966 NA
Q623578 C 2097991400A 15381967 NA
Q17299517 D 2105487660A 15381968 NA
Q33999 C 2108672678A 15381969 NA
Q2494649 C 2114531894A 15381970 NA
Q2597810 C 2128920607A 15381971 NA
Q193563 C 2130725560A 15381972 NA
Q423048 C 2136131564A 15381973 NA
Q37312 C 2142913121A 15381974 NA
Q54919 C 2148531382A 15381975 NA
Q36578 C 2229315598A 15381976 NA
Q30 A 2277746226A 15381977 None
Q6581097 C 3273952711A 15381978 NA
Q5 A 5668008721A 15381979 None
Q5296 C 12530369761A 15381980 NA
entity_idpredictionpage_viewspop_classseqNumdissonance
Q10040378E 0 E 1 NA
Q10069140E 0 E 2 NA
Q10081695E 0 E 3 NA
Q10092002E 0 E 4 NA
Q10111267E 0 E 5 NA
Q10149726E 0 E 6 NA
Q10180230E 0 E 7 NA
Q10185035E 0 E 8 NA
Q10205202E 0 E 9 NA
Q10252966E 0 E 10 NA
Q10444494D 0 E 11 NA
Q10624171D 0 E 12 NA
Q10704108D 0 E 13 NA
Q10750354E 0 E 14 NA
Q10766855E 0 E 15 NA
Q10827611E 0 E 16 NA
Q11093044E 0 E 17 NA
Q11934537E 0 E 18 NA
Q12133466E 0 E 19 NA
Q12264503E 0 E 20 NA
Q12267516E 0 E 21 NA
Q12304084E 0 E 22 NA
Q12443525E 0 E 23 NA
Q12543904E 0 E 24 NA
Q12890205E 0 E 25 NA
Q12891524E 0 E 26 NA
Q12918202E 0 E 27 NA
Q13005653E 0 E 28 NA
Q13073896E 0 E 29 NA
Q13163823E 0 E 30 NA
Q1048694 C 2048095025 A 15381951 High positive
Q31165 C 2048330818 A 15381952 High positive
Q40629 C 2049755644 A 15381953 High positive
Q105584 C 2049926923 A 15381954 High positive
Q4584301 D 2052339927 A 15381955 NA
Q565 C 2052996261 A 15381956 High positive
Q1868372 E 2056080224 A 15381957 NA
Q209330 C 2060928966 A 15381958 High positive
Q14005 C 2063120071 A 15381959 High positive
Q918 C 2063217449 A 15381960 High positive
Q150248 C 2068796814 A 15381961 High positive
Q866 C 2079749157 A 15381962 High positive
Q477675 C 2080785713 A 15381963 High positive
Q1967876 C 2084215818 A 15381964 High positive
Q750403 C 2084693498 A 15381965 High positive
Q355 C 2093900731 A 15381966 High positive
Q623578 C 2097991400 A 15381967 High positive
Q17299517 D 2105487660 A 15381968 NA
Q33999 C 2108672678 A 15381969 High positive
Q2494649 C 2114531894 A 15381970 High positive
Q2597810 C 2128920607 A 15381971 High positive
Q193563 C 2130725560 A 15381972 High positive
Q423048 C 2136131564 A 15381973 High positive
Q37312 C 2142913121 A 15381974 High positive
Q54919 C 2148531382 A 15381975 High positive
Q36578 C 2229315598 A 15381976 High positive
Q30 A 2277746226 A 15381977 None
Q6581097 C 3273952711 A 15381978 High positive
Q5 A 5668008721 A 15381979 None
Q5296 C 12530369761 A 15381980 High positive

In [37]:
## D
articles_by_pop[prediction == 'D' & pop_class == 'E',
                dissonance := 'Moderate negative'];
articles_by_pop[prediction == 'D' & pop_class == 'D',
                dissonance := 'None'];
articles_by_pop[prediction == 'D' & pop_class == 'C',
                dissonance := 'Moderate positive'];
articles_by_pop[prediction == 'D' & pop_class >= 'B',
                dissonance := 'High positive'];


entity_idpredictionpage_viewspop_classseqNumdissonance
Q10040378 E 0 E 1 NA
Q10069140 E 0 E 2 NA
Q10081695 E 0 E 3 NA
Q10092002 E 0 E 4 NA
Q10111267 E 0 E 5 NA
Q10149726 E 0 E 6 NA
Q10180230 E 0 E 7 NA
Q10185035 E 0 E 8 NA
Q10205202 E 0 E 9 NA
Q10252966 E 0 E 10 NA
Q10444494 D 0 E 11 Moderate negative
Q10624171 D 0 E 12 Moderate negative
Q10704108 D 0 E 13 Moderate negative
Q10750354 E 0 E 14 NA
Q10766855 E 0 E 15 NA
Q10827611 E 0 E 16 NA
Q11093044 E 0 E 17 NA
Q11934537 E 0 E 18 NA
Q12133466 E 0 E 19 NA
Q12264503 E 0 E 20 NA
Q12267516 E 0 E 21 NA
Q12304084 E 0 E 22 NA
Q12443525 E 0 E 23 NA
Q12543904 E 0 E 24 NA
Q12890205 E 0 E 25 NA
Q12891524 E 0 E 26 NA
Q12918202 E 0 E 27 NA
Q13005653 E 0 E 28 NA
Q13073896 E 0 E 29 NA
Q13163823 E 0 E 30 NA
Q1048694 C 2048095025 A 15381951 High positive
Q31165 C 2048330818 A 15381952 High positive
Q40629 C 2049755644 A 15381953 High positive
Q105584 C 2049926923 A 15381954 High positive
Q4584301 D 2052339927 A 15381955 NA
Q565 C 2052996261 A 15381956 High positive
Q1868372 E 2056080224 A 15381957 NA
Q209330 C 2060928966 A 15381958 High positive
Q14005 C 2063120071 A 15381959 High positive
Q918 C 2063217449 A 15381960 High positive
Q150248 C 2068796814 A 15381961 High positive
Q866 C 2079749157 A 15381962 High positive
Q477675 C 2080785713 A 15381963 High positive
Q1967876 C 2084215818 A 15381964 High positive
Q750403 C 2084693498 A 15381965 High positive
Q355 C 2093900731 A 15381966 High positive
Q623578 C 2097991400 A 15381967 High positive
Q17299517 D 2105487660 A 15381968 NA
Q33999 C 2108672678 A 15381969 High positive
Q2494649 C 2114531894 A 15381970 High positive
Q2597810 C 2128920607 A 15381971 High positive
Q193563 C 2130725560 A 15381972 High positive
Q423048 C 2136131564 A 15381973 High positive
Q37312 C 2142913121 A 15381974 High positive
Q54919 C 2148531382 A 15381975 High positive
Q36578 C 2229315598 A 15381976 High positive
Q30 A 2277746226 A 15381977 None
Q6581097 C 3273952711 A 15381978 High positive
Q5 A 5668008721 A 15381979 None
Q5296 C 12530369761 A 15381980 High positive
entity_idpredictionpage_viewspop_classseqNumdissonance
Q10040378 E 0 E 1 NA
Q10069140 E 0 E 2 NA
Q10081695 E 0 E 3 NA
Q10092002 E 0 E 4 NA
Q10111267 E 0 E 5 NA
Q10149726 E 0 E 6 NA
Q10180230 E 0 E 7 NA
Q10185035 E 0 E 8 NA
Q10205202 E 0 E 9 NA
Q10252966 E 0 E 10 NA
Q10444494 D 0 E 11 Moderate negative
Q10624171 D 0 E 12 Moderate negative
Q10704108 D 0 E 13 Moderate negative
Q10750354 E 0 E 14 NA
Q10766855 E 0 E 15 NA
Q10827611 E 0 E 16 NA
Q11093044 E 0 E 17 NA
Q11934537 E 0 E 18 NA
Q12133466 E 0 E 19 NA
Q12264503 E 0 E 20 NA
Q12267516 E 0 E 21 NA
Q12304084 E 0 E 22 NA
Q12443525 E 0 E 23 NA
Q12543904 E 0 E 24 NA
Q12890205 E 0 E 25 NA
Q12891524 E 0 E 26 NA
Q12918202 E 0 E 27 NA
Q13005653 E 0 E 28 NA
Q13073896 E 0 E 29 NA
Q13163823 E 0 E 30 NA
Q1048694 C 2048095025 A 15381951 High positive
Q31165 C 2048330818 A 15381952 High positive
Q40629 C 2049755644 A 15381953 High positive
Q105584 C 2049926923 A 15381954 High positive
Q4584301 D 2052339927 A 15381955 NA
Q565 C 2052996261 A 15381956 High positive
Q1868372 E 2056080224 A 15381957 NA
Q209330 C 2060928966 A 15381958 High positive
Q14005 C 2063120071 A 15381959 High positive
Q918 C 2063217449 A 15381960 High positive
Q150248 C 2068796814 A 15381961 High positive
Q866 C 2079749157 A 15381962 High positive
Q477675 C 2080785713 A 15381963 High positive
Q1967876 C 2084215818 A 15381964 High positive
Q750403 C 2084693498 A 15381965 High positive
Q355 C 2093900731 A 15381966 High positive
Q623578 C 2097991400 A 15381967 High positive
Q17299517 D 2105487660 A 15381968 NA
Q33999 C 2108672678 A 15381969 High positive
Q2494649 C 2114531894 A 15381970 High positive
Q2597810 C 2128920607 A 15381971 High positive
Q193563 C 2130725560 A 15381972 High positive
Q423048 C 2136131564 A 15381973 High positive
Q37312 C 2142913121 A 15381974 High positive
Q54919 C 2148531382 A 15381975 High positive
Q36578 C 2229315598 A 15381976 High positive
Q30 A 2277746226 A 15381977 None
Q6581097 C 3273952711 A 15381978 High positive
Q5 A 5668008721 A 15381979 None
Q5296 C 12530369761 A 15381980 High positive
entity_idpredictionpage_viewspop_classseqNumdissonance
Q10040378 E 0 E 1 NA
Q10069140 E 0 E 2 NA
Q10081695 E 0 E 3 NA
Q10092002 E 0 E 4 NA
Q10111267 E 0 E 5 NA
Q10149726 E 0 E 6 NA
Q10180230 E 0 E 7 NA
Q10185035 E 0 E 8 NA
Q10205202 E 0 E 9 NA
Q10252966 E 0 E 10 NA
Q10444494 D 0 E 11 Moderate negative
Q10624171 D 0 E 12 Moderate negative
Q10704108 D 0 E 13 Moderate negative
Q10750354 E 0 E 14 NA
Q10766855 E 0 E 15 NA
Q10827611 E 0 E 16 NA
Q11093044 E 0 E 17 NA
Q11934537 E 0 E 18 NA
Q12133466 E 0 E 19 NA
Q12264503 E 0 E 20 NA
Q12267516 E 0 E 21 NA
Q12304084 E 0 E 22 NA
Q12443525 E 0 E 23 NA
Q12543904 E 0 E 24 NA
Q12890205 E 0 E 25 NA
Q12891524 E 0 E 26 NA
Q12918202 E 0 E 27 NA
Q13005653 E 0 E 28 NA
Q13073896 E 0 E 29 NA
Q13163823 E 0 E 30 NA
Q1048694 C 2048095025 A 15381951 High positive
Q31165 C 2048330818 A 15381952 High positive
Q40629 C 2049755644 A 15381953 High positive
Q105584 C 2049926923 A 15381954 High positive
Q4584301 D 2052339927 A 15381955 NA
Q565 C 2052996261 A 15381956 High positive
Q1868372 E 2056080224 A 15381957 NA
Q209330 C 2060928966 A 15381958 High positive
Q14005 C 2063120071 A 15381959 High positive
Q918 C 2063217449 A 15381960 High positive
Q150248 C 2068796814 A 15381961 High positive
Q866 C 2079749157 A 15381962 High positive
Q477675 C 2080785713 A 15381963 High positive
Q1967876 C 2084215818 A 15381964 High positive
Q750403 C 2084693498 A 15381965 High positive
Q355 C 2093900731 A 15381966 High positive
Q623578 C 2097991400 A 15381967 High positive
Q17299517 D 2105487660 A 15381968 NA
Q33999 C 2108672678 A 15381969 High positive
Q2494649 C 2114531894 A 15381970 High positive
Q2597810 C 2128920607 A 15381971 High positive
Q193563 C 2130725560 A 15381972 High positive
Q423048 C 2136131564 A 15381973 High positive
Q37312 C 2142913121 A 15381974 High positive
Q54919 C 2148531382 A 15381975 High positive
Q36578 C 2229315598 A 15381976 High positive
Q30 A 2277746226 A 15381977 None
Q6581097 C 3273952711 A 15381978 High positive
Q5 A 5668008721 A 15381979 None
Q5296 C 12530369761 A 15381980 High positive
entity_idpredictionpage_viewspop_classseqNumdissonance
Q10040378 E 0 E 1 NA
Q10069140 E 0 E 2 NA
Q10081695 E 0 E 3 NA
Q10092002 E 0 E 4 NA
Q10111267 E 0 E 5 NA
Q10149726 E 0 E 6 NA
Q10180230 E 0 E 7 NA
Q10185035 E 0 E 8 NA
Q10205202 E 0 E 9 NA
Q10252966 E 0 E 10 NA
Q10444494 D 0 E 11 Moderate negative
Q10624171 D 0 E 12 Moderate negative
Q10704108 D 0 E 13 Moderate negative
Q10750354 E 0 E 14 NA
Q10766855 E 0 E 15 NA
Q10827611 E 0 E 16 NA
Q11093044 E 0 E 17 NA
Q11934537 E 0 E 18 NA
Q12133466 E 0 E 19 NA
Q12264503 E 0 E 20 NA
Q12267516 E 0 E 21 NA
Q12304084 E 0 E 22 NA
Q12443525 E 0 E 23 NA
Q12543904 E 0 E 24 NA
Q12890205 E 0 E 25 NA
Q12891524 E 0 E 26 NA
Q12918202 E 0 E 27 NA
Q13005653 E 0 E 28 NA
Q13073896 E 0 E 29 NA
Q13163823 E 0 E 30 NA
Q1048694 C 2048095025 A 15381951 High positive
Q31165 C 2048330818 A 15381952 High positive
Q40629 C 2049755644 A 15381953 High positive
Q105584 C 2049926923 A 15381954 High positive
Q4584301 D 2052339927 A 15381955 High positive
Q565 C 2052996261 A 15381956 High positive
Q1868372 E 2056080224 A 15381957 NA
Q209330 C 2060928966 A 15381958 High positive
Q14005 C 2063120071 A 15381959 High positive
Q918 C 2063217449 A 15381960 High positive
Q150248 C 2068796814 A 15381961 High positive
Q866 C 2079749157 A 15381962 High positive
Q477675 C 2080785713 A 15381963 High positive
Q1967876 C 2084215818 A 15381964 High positive
Q750403 C 2084693498 A 15381965 High positive
Q355 C 2093900731 A 15381966 High positive
Q623578 C 2097991400 A 15381967 High positive
Q17299517 D 2105487660 A 15381968 High positive
Q33999 C 2108672678 A 15381969 High positive
Q2494649 C 2114531894 A 15381970 High positive
Q2597810 C 2128920607 A 15381971 High positive
Q193563 C 2130725560 A 15381972 High positive
Q423048 C 2136131564 A 15381973 High positive
Q37312 C 2142913121 A 15381974 High positive
Q54919 C 2148531382 A 15381975 High positive
Q36578 C 2229315598 A 15381976 High positive
Q30 A 2277746226 A 15381977 None
Q6581097 C 3273952711 A 15381978 High positive
Q5 A 5668008721 A 15381979 None
Q5296 C 12530369761 A 15381980 High positive

In [38]:
## E
articles_by_pop[prediction == 'E' & pop_class == 'E',
                dissonance := 'None'];
articles_by_pop[prediction == 'E' & pop_class == 'D',
                dissonance := 'Moderate positive'];
articles_by_pop[prediction == 'E' & pop_class >= 'C',
                dissonance := 'High positive'];


entity_idpredictionpage_viewspop_classseqNumdissonance
Q10040378 E 0 E 1 None
Q10069140 E 0 E 2 None
Q10081695 E 0 E 3 None
Q10092002 E 0 E 4 None
Q10111267 E 0 E 5 None
Q10149726 E 0 E 6 None
Q10180230 E 0 E 7 None
Q10185035 E 0 E 8 None
Q10205202 E 0 E 9 None
Q10252966 E 0 E 10 None
Q10444494 D 0 E 11 Moderate negative
Q10624171 D 0 E 12 Moderate negative
Q10704108 D 0 E 13 Moderate negative
Q10750354 E 0 E 14 None
Q10766855 E 0 E 15 None
Q10827611 E 0 E 16 None
Q11093044 E 0 E 17 None
Q11934537 E 0 E 18 None
Q12133466 E 0 E 19 None
Q12264503 E 0 E 20 None
Q12267516 E 0 E 21 None
Q12304084 E 0 E 22 None
Q12443525 E 0 E 23 None
Q12543904 E 0 E 24 None
Q12890205 E 0 E 25 None
Q12891524 E 0 E 26 None
Q12918202 E 0 E 27 None
Q13005653 E 0 E 28 None
Q13073896 E 0 E 29 None
Q13163823 E 0 E 30 None
Q1048694 C 2048095025 A 15381951 High positive
Q31165 C 2048330818 A 15381952 High positive
Q40629 C 2049755644 A 15381953 High positive
Q105584 C 2049926923 A 15381954 High positive
Q4584301 D 2052339927 A 15381955 High positive
Q565 C 2052996261 A 15381956 High positive
Q1868372 E 2056080224 A 15381957 NA
Q209330 C 2060928966 A 15381958 High positive
Q14005 C 2063120071 A 15381959 High positive
Q918 C 2063217449 A 15381960 High positive
Q150248 C 2068796814 A 15381961 High positive
Q866 C 2079749157 A 15381962 High positive
Q477675 C 2080785713 A 15381963 High positive
Q1967876 C 2084215818 A 15381964 High positive
Q750403 C 2084693498 A 15381965 High positive
Q355 C 2093900731 A 15381966 High positive
Q623578 C 2097991400 A 15381967 High positive
Q17299517 D 2105487660 A 15381968 High positive
Q33999 C 2108672678 A 15381969 High positive
Q2494649 C 2114531894 A 15381970 High positive
Q2597810 C 2128920607 A 15381971 High positive
Q193563 C 2130725560 A 15381972 High positive
Q423048 C 2136131564 A 15381973 High positive
Q37312 C 2142913121 A 15381974 High positive
Q54919 C 2148531382 A 15381975 High positive
Q36578 C 2229315598 A 15381976 High positive
Q30 A 2277746226 A 15381977 None
Q6581097 C 3273952711 A 15381978 High positive
Q5 A 5668008721 A 15381979 None
Q5296 C 12530369761 A 15381980 High positive
entity_idpredictionpage_viewspop_classseqNumdissonance
Q10040378 E 0 E 1 None
Q10069140 E 0 E 2 None
Q10081695 E 0 E 3 None
Q10092002 E 0 E 4 None
Q10111267 E 0 E 5 None
Q10149726 E 0 E 6 None
Q10180230 E 0 E 7 None
Q10185035 E 0 E 8 None
Q10205202 E 0 E 9 None
Q10252966 E 0 E 10 None
Q10444494 D 0 E 11 Moderate negative
Q10624171 D 0 E 12 Moderate negative
Q10704108 D 0 E 13 Moderate negative
Q10750354 E 0 E 14 None
Q10766855 E 0 E 15 None
Q10827611 E 0 E 16 None
Q11093044 E 0 E 17 None
Q11934537 E 0 E 18 None
Q12133466 E 0 E 19 None
Q12264503 E 0 E 20 None
Q12267516 E 0 E 21 None
Q12304084 E 0 E 22 None
Q12443525 E 0 E 23 None
Q12543904 E 0 E 24 None
Q12890205 E 0 E 25 None
Q12891524 E 0 E 26 None
Q12918202 E 0 E 27 None
Q13005653 E 0 E 28 None
Q13073896 E 0 E 29 None
Q13163823 E 0 E 30 None
Q1048694 C 2048095025 A 15381951 High positive
Q31165 C 2048330818 A 15381952 High positive
Q40629 C 2049755644 A 15381953 High positive
Q105584 C 2049926923 A 15381954 High positive
Q4584301 D 2052339927 A 15381955 High positive
Q565 C 2052996261 A 15381956 High positive
Q1868372 E 2056080224 A 15381957 NA
Q209330 C 2060928966 A 15381958 High positive
Q14005 C 2063120071 A 15381959 High positive
Q918 C 2063217449 A 15381960 High positive
Q150248 C 2068796814 A 15381961 High positive
Q866 C 2079749157 A 15381962 High positive
Q477675 C 2080785713 A 15381963 High positive
Q1967876 C 2084215818 A 15381964 High positive
Q750403 C 2084693498 A 15381965 High positive
Q355 C 2093900731 A 15381966 High positive
Q623578 C 2097991400 A 15381967 High positive
Q17299517 D 2105487660 A 15381968 High positive
Q33999 C 2108672678 A 15381969 High positive
Q2494649 C 2114531894 A 15381970 High positive
Q2597810 C 2128920607 A 15381971 High positive
Q193563 C 2130725560 A 15381972 High positive
Q423048 C 2136131564 A 15381973 High positive
Q37312 C 2142913121 A 15381974 High positive
Q54919 C 2148531382 A 15381975 High positive
Q36578 C 2229315598 A 15381976 High positive
Q30 A 2277746226 A 15381977 None
Q6581097 C 3273952711 A 15381978 High positive
Q5 A 5668008721 A 15381979 None
Q5296 C 12530369761 A 15381980 High positive
entity_idpredictionpage_viewspop_classseqNumdissonance
Q10040378 E 0 E 1 None
Q10069140 E 0 E 2 None
Q10081695 E 0 E 3 None
Q10092002 E 0 E 4 None
Q10111267 E 0 E 5 None
Q10149726 E 0 E 6 None
Q10180230 E 0 E 7 None
Q10185035 E 0 E 8 None
Q10205202 E 0 E 9 None
Q10252966 E 0 E 10 None
Q10444494 D 0 E 11 Moderate negative
Q10624171 D 0 E 12 Moderate negative
Q10704108 D 0 E 13 Moderate negative
Q10750354 E 0 E 14 None
Q10766855 E 0 E 15 None
Q10827611 E 0 E 16 None
Q11093044 E 0 E 17 None
Q11934537 E 0 E 18 None
Q12133466 E 0 E 19 None
Q12264503 E 0 E 20 None
Q12267516 E 0 E 21 None
Q12304084 E 0 E 22 None
Q12443525 E 0 E 23 None
Q12543904 E 0 E 24 None
Q12890205 E 0 E 25 None
Q12891524 E 0 E 26 None
Q12918202 E 0 E 27 None
Q13005653 E 0 E 28 None
Q13073896 E 0 E 29 None
Q13163823 E 0 E 30 None
Q1048694 C 2048095025 A 15381951 High positive
Q31165 C 2048330818 A 15381952 High positive
Q40629 C 2049755644 A 15381953 High positive
Q105584 C 2049926923 A 15381954 High positive
Q4584301 D 2052339927 A 15381955 High positive
Q565 C 2052996261 A 15381956 High positive
Q1868372 E 2056080224 A 15381957 High positive
Q209330 C 2060928966 A 15381958 High positive
Q14005 C 2063120071 A 15381959 High positive
Q918 C 2063217449 A 15381960 High positive
Q150248 C 2068796814 A 15381961 High positive
Q866 C 2079749157 A 15381962 High positive
Q477675 C 2080785713 A 15381963 High positive
Q1967876 C 2084215818 A 15381964 High positive
Q750403 C 2084693498 A 15381965 High positive
Q355 C 2093900731 A 15381966 High positive
Q623578 C 2097991400 A 15381967 High positive
Q17299517 D 2105487660 A 15381968 High positive
Q33999 C 2108672678 A 15381969 High positive
Q2494649 C 2114531894 A 15381970 High positive
Q2597810 C 2128920607 A 15381971 High positive
Q193563 C 2130725560 A 15381972 High positive
Q423048 C 2136131564 A 15381973 High positive
Q37312 C 2142913121 A 15381974 High positive
Q54919 C 2148531382 A 15381975 High positive
Q36578 C 2229315598 A 15381976 High positive
Q30 A 2277746226 A 15381977 None
Q6581097 C 3273952711 A 15381978 High positive
Q5 A 5668008721 A 15381979 None
Q5296 C 12530369761 A 15381980 High positive

In [39]:
## Build a matrix where columns are the metric and rows are classes
create_alt_diss_matrix = function(articledata, metric, classes) {
  d_mtrx = matrix(0, nrow=length(classes), ncol=length(metric));
  rownames(d_mtrx) = classes;
  colnames(d_mtrx) = metric;

  ## NOTE: R matrix values are [row,col] dimensions
  for(real_rating in classes) {
    for(diss_rating in metric) {
      d_mtrx[real_rating, diss_rating] = length(articledata[prediction == real_rating & dissonance == diss_rating]$entity_id);
    }
  }
  d_mtrx;
}

alternative_dissonance_matrix.1 = create_alt_diss_matrix(articles_by_pop,
  dissonance_metric, assessment_classes);

In [40]:
## Normalise by row
round(100*prop.table(alternative_dissonance_matrix.1, 1), 1);


High negativeModerate negativeNoneModerate positiveHigh positive
E 0.0 0.077.215.77.2
D 0.078.612.6 8.70.1
C47.825.325.6 1.30.0
B60.737.0 2.3 0.00.0
A 8.188.7 3.2 0.00.0

In [41]:
## Number of dissonant views per assessment class and amount of dissonance
articles_by_pop[, list(dissonant_views=sum(page_views)), by=list(prediction, dissonance)];


predictiondissonancedissonant_views
E None 2768998426
D Moderate negative 441175827
C High negative 278756129
B High negative 35411946
E Moderate positive 7513265504
D None 1347385159
C Moderate negative 1610405196
A High negative 471760
E High positive 116205642014
C None 47150837192
D Moderate positive 19009924306
B Moderate negative 1153231671
C Moderate positive124536153114
D High positive 68098733649
B None 2872850347
A Moderate negative 4604535252
C High positive 104898337130
A None 7945754947

In [42]:
## Calculations of total number of dissonant views per dissonance
articles_by_pop[, list(dissonant_views=sum(page_views)), by=list(dissonance)];


dissonancedissonant_views
None 62085826071
Moderate negative 7809347946
High negative 314639835
Moderate positive151059342924
High positive 289202712793

In [43]:
articles_by_pop[,sum(as.numeric(page_views))];


510471869569

In [44]:
## Proportions
100*65938379920/545180810059;
100*125047198/545180810059;
100*6713682043/545180810059;
100*120523625541/545180810059;
100*351880075357/545180810059;


12.0947727255594
0.0229368304409811
1.23145971375505
22.107092420945
64.5437383092995

In [45]:
# 87% of views are high positive

In [46]:
100*(articles_by_pop[, list(dissonant_views=sum(page_views)), by=list(dissonance)][1][,c('dissonant_views')]/articles_by_pop[,sum(as.numeric(page_views))])


dissonant_views
12.16244

In [47]:
100*(articles_by_pop[, list(dissonant_views=sum(page_views)), by=list(dissonance)][2][,c('dissonant_views')]/articles_by_pop[,sum(as.numeric(page_views))])


dissonant_views
1.529829

In [48]:
100*(articles_by_pop[, list(dissonant_views=sum(page_views)), by=list(dissonance)][3][,c('dissonant_views')]/articles_by_pop[,sum(as.numeric(page_views))])


dissonant_views
0.06163706

In [49]:
100*(articles_by_pop[, list(dissonant_views=sum(page_views)), by=list(dissonance)][4][,c('dissonant_views')]/articles_by_pop[,sum(as.numeric(page_views))])


dissonant_views
29.5921

In [50]:
100*(articles_by_pop[, list(dissonant_views=sum(page_views)), by=list(dissonance)][5][,c('dissonant_views')]/articles_by_pop[,sum(as.numeric(page_views))])


dissonant_views
56.654