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_20150801.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:     225  
 Q100    :       1   1st Qu.:    7.00    1st Qu.:3.300e+01   B:  183651  
 Q1000   :       1   Median :   15.00    Median :2.450e+02   C: 3110157  
 Q10000  :       1   Mean   :   20.67    Mean   :3.033e+04   D: 2946888  
 Q100000 :       1   3rd Qu.:   27.00    3rd Qu.:1.470e+03   E:11020316  
 Q1000000:       1   Max.   :21863.00    Max.   :1.253e+10               
 (Other) :17261231                                                       

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
Q10069140C 0
Q10081695C 0
Q10092002E 0
Q10111267E 0
Q10149726E 0
Q10180230E 0
Q10185035E 0
Q10205202E 0
Q10252966E 0
Q10444494C 0
Q10624171C 0
Q10704108C 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 D 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 D 3273952711
Q5 A 5668008721
Q5296 C 12530369761
entity_idpredictionpage_viewspop_classseqNum
Q10040378E 0 1
Q10069140C 0 2
Q10081695C 0 3
Q10092002E 0 4
Q10111267E 0 5
Q10149726E 0 6
Q10180230E 0 7
Q10185035E 0 8
Q10205202E 0 9
Q10252966E 0 10
Q10444494C 0 11
Q10624171C 0 12
Q10704108C 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 17261208
Q31165 C 2048330818 17261209
Q40629 C 2049755644 17261210
Q105584 C 2049926923 17261211
Q4584301 D 2052339927 17261212
Q565 C 2052996261 17261213
Q1868372 E 2056080224 17261214
Q209330 C 2060928966 17261215
Q14005 D 2063120071 17261216
Q918 C 2063217449 17261217
Q150248 C 2068796814 17261218
Q866 C 2079749157 17261219
Q477675 C 2080785713 17261220
Q1967876 C 2084215818 17261221
Q750403 C 2084693498 17261222
Q355 C 2093900731 17261223
Q623578 C 2097991400 17261224
Q17299517 D 2105487660 17261225
Q33999 C 2108672678 17261226
Q2494649 C 2114531894 17261227
Q2597810 C 2128920607 17261228
Q193563 C 2130725560 17261229
Q423048 C 2136131564 17261230
Q37312 C 2142913121 17261231
Q54919 C 2148531382 17261232
Q36578 C 2229315598 17261233
Q30 A 2277746226 17261234
Q6581097 D 3273952711 17261235
Q5 A 5668008721 17261236
Q5296 C 12530369761 17261237

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 =  11020317"
[1] "start_idx = 11020317 , end_idx =  13967205"
[1] "start_idx = 13967205 , end_idx =  17077362"
[1] "start_idx = 17077362 , end_idx =  17261013"
[1] "start_idx = 17261013 , end_idx =  17261238"

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
E74227111860152169333944093 21
D1706501 619424 59007830837 48
C1774476 449766 78637899404 133
B 116628 17546 40357 9115 5
A 0 0 5 202 18

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.511993781210466

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


0.08

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

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.92

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.92

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
Q15401930 21520415621
Q15980158 14854450488
Q18241050 2045553487 6
Q1868372 205608022445
Q1920566 126904490640

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
E67.416.915.4 0.40
D57.921.020.0 1.00
C57.114.525.3 3.20
B63.5 9.622.0 5.00
A 0.0 0.0 2.289.88

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


EDCBA
E67.463.154.424.0 9.3
D15.521.019.016.821.3
C16.115.325.354.159.1
B 1.1 0.6 1.3 5.0 2.2
A 0.0 0.0 0.0 0.1 8.0

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/201508_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
Q1061861 A C
Q1063819 A C
Q10726338A D
Q10798782A D
Q10800557A D
Q11028 A C
Q1123836 A D
Q1133733 A D
Q11424 A C
Q11573 A C
Q116933 A C
Q11789729A D
Q11920 A C
Q1200925 A D
Q130232 A C
Q1321 A C
Q13235160A D
Q1373513 A C
Q14005 A D
Q1467610 A D
Q150248 A C
Q15180 A C
Q1526131 A C
Q15401930A E
Q15416 A C
Q156376 A C
Q6581072A D
Q6581097A D
Q6625963A D
Q6655 A C
Q6883832A E
Q712226 A C
Q7184903A C
Q7315186A C
Q732353 A C
Q739 A B
Q750403 A C
Q753110 A C
Q7725310A D
Q7727 A C
Q7737 A C
Q809830 A C
Q82799 A C
Q82955 A C
Q829984 A C
Q830077 A C
Q83552 A C
Q853614 A C
Q855091 A C
Q866 A C
Q918 A C
Q937857 A C
Q9384291A D
Q938726 A D
Q947873 A C
Q953058 A C

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/201508_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/201508_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/201508_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
Q10069140C 0 E 2
Q10081695C 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
Q10444494C 0 E 11
Q10624171C 0 E 12
Q10704108C 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 17261208
Q31165 C 2048330818A 17261209
Q40629 C 2049755644A 17261210
Q105584 C 2049926923A 17261211
Q4584301 D 2052339927A 17261212
Q565 C 2052996261A 17261213
Q1868372 E 2056080224A 17261214
Q209330 C 2060928966A 17261215
Q14005 D 2063120071A 17261216
Q918 C 2063217449A 17261217
Q150248 C 2068796814A 17261218
Q866 C 2079749157A 17261219
Q477675 C 2080785713A 17261220
Q1967876 C 2084215818A 17261221
Q750403 C 2084693498A 17261222
Q355 C 2093900731A 17261223
Q623578 C 2097991400A 17261224
Q17299517 D 2105487660A 17261225
Q33999 C 2108672678A 17261226
Q2494649 C 2114531894A 17261227
Q2597810 C 2128920607A 17261228
Q193563 C 2130725560A 17261229
Q423048 C 2136131564A 17261230
Q37312 C 2142913121A 17261231
Q54919 C 2148531382A 17261232
Q36578 C 2229315598A 17261233
Q30 A 2277746226A 17261234
Q6581097 D 3273952711A 17261235
Q5 A 5668008721A 17261236
Q5296 C 12530369761A 17261237

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
Q10069140C 0 E 2 NA
Q10081695C 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
Q10444494C 0 E 11 NA
Q10624171C 0 E 12 NA
Q10704108C 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 17261208 NA
Q31165 C 2048330818A 17261209 NA
Q40629 C 2049755644A 17261210 NA
Q105584 C 2049926923A 17261211 NA
Q4584301 D 2052339927A 17261212 NA
Q565 C 2052996261A 17261213 NA
Q1868372 E 2056080224A 17261214 NA
Q209330 C 2060928966A 17261215 NA
Q14005 D 2063120071A 17261216 NA
Q918 C 2063217449A 17261217 NA
Q150248 C 2068796814A 17261218 NA
Q866 C 2079749157A 17261219 NA
Q477675 C 2080785713A 17261220 NA
Q1967876 C 2084215818A 17261221 NA
Q750403 C 2084693498A 17261222 NA
Q355 C 2093900731A 17261223 NA
Q623578 C 2097991400A 17261224 NA
Q17299517 D 2105487660A 17261225 NA
Q33999 C 2108672678A 17261226 NA
Q2494649 C 2114531894A 17261227 NA
Q2597810 C 2128920607A 17261228 NA
Q193563 C 2130725560A 17261229 NA
Q423048 C 2136131564A 17261230 NA
Q37312 C 2142913121A 17261231 NA
Q54919 C 2148531382A 17261232 NA
Q36578 C 2229315598A 17261233 NA
Q30 A 2277746226A 17261234 NA
Q6581097 D 3273952711A 17261235 NA
Q5 A 5668008721A 17261236 NA
Q5296 C 12530369761A 17261237 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
Q10069140C 0 E 2 NA
Q10081695C 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
Q10444494C 0 E 11 NA
Q10624171C 0 E 12 NA
Q10704108C 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 17261208 NA
Q31165 C 2048330818A 17261209 NA
Q40629 C 2049755644A 17261210 NA
Q105584 C 2049926923A 17261211 NA
Q4584301 D 2052339927A 17261212 NA
Q565 C 2052996261A 17261213 NA
Q1868372 E 2056080224A 17261214 NA
Q209330 C 2060928966A 17261215 NA
Q14005 D 2063120071A 17261216 NA
Q918 C 2063217449A 17261217 NA
Q150248 C 2068796814A 17261218 NA
Q866 C 2079749157A 17261219 NA
Q477675 C 2080785713A 17261220 NA
Q1967876 C 2084215818A 17261221 NA
Q750403 C 2084693498A 17261222 NA
Q355 C 2093900731A 17261223 NA
Q623578 C 2097991400A 17261224 NA
Q17299517 D 2105487660A 17261225 NA
Q33999 C 2108672678A 17261226 NA
Q2494649 C 2114531894A 17261227 NA
Q2597810 C 2128920607A 17261228 NA
Q193563 C 2130725560A 17261229 NA
Q423048 C 2136131564A 17261230 NA
Q37312 C 2142913121A 17261231 NA
Q54919 C 2148531382A 17261232 NA
Q36578 C 2229315598A 17261233 NA
Q30 A 2277746226A 17261234 NA
Q6581097 D 3273952711A 17261235 NA
Q5 A 5668008721A 17261236 NA
Q5296 C 12530369761A 17261237 NA
entity_idpredictionpage_viewspop_classseqNumdissonance
Q10040378E 0 E 1 NA
Q10069140C 0 E 2 NA
Q10081695C 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
Q10444494C 0 E 11 NA
Q10624171C 0 E 12 NA
Q10704108C 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 17261208 NA
Q31165 C 2048330818A 17261209 NA
Q40629 C 2049755644A 17261210 NA
Q105584 C 2049926923A 17261211 NA
Q4584301 D 2052339927A 17261212 NA
Q565 C 2052996261A 17261213 NA
Q1868372 E 2056080224A 17261214 NA
Q209330 C 2060928966A 17261215 NA
Q14005 D 2063120071A 17261216 NA
Q918 C 2063217449A 17261217 NA
Q150248 C 2068796814A 17261218 NA
Q866 C 2079749157A 17261219 NA
Q477675 C 2080785713A 17261220 NA
Q1967876 C 2084215818A 17261221 NA
Q750403 C 2084693498A 17261222 NA
Q355 C 2093900731A 17261223 NA
Q623578 C 2097991400A 17261224 NA
Q17299517 D 2105487660A 17261225 NA
Q33999 C 2108672678A 17261226 NA
Q2494649 C 2114531894A 17261227 NA
Q2597810 C 2128920607A 17261228 NA
Q193563 C 2130725560A 17261229 NA
Q423048 C 2136131564A 17261230 NA
Q37312 C 2142913121A 17261231 NA
Q54919 C 2148531382A 17261232 NA
Q36578 C 2229315598A 17261233 NA
Q30 A 2277746226A 17261234 NA
Q6581097 D 3273952711A 17261235 NA
Q5 A 5668008721A 17261236 NA
Q5296 C 12530369761A 17261237 NA
entity_idpredictionpage_viewspop_classseqNumdissonance
Q10040378E 0 E 1 NA
Q10069140C 0 E 2 NA
Q10081695C 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
Q10444494C 0 E 11 NA
Q10624171C 0 E 12 NA
Q10704108C 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 17261208 NA
Q31165 C 2048330818A 17261209 NA
Q40629 C 2049755644A 17261210 NA
Q105584 C 2049926923A 17261211 NA
Q4584301 D 2052339927A 17261212 NA
Q565 C 2052996261A 17261213 NA
Q1868372 E 2056080224A 17261214 NA
Q209330 C 2060928966A 17261215 NA
Q14005 D 2063120071A 17261216 NA
Q918 C 2063217449A 17261217 NA
Q150248 C 2068796814A 17261218 NA
Q866 C 2079749157A 17261219 NA
Q477675 C 2080785713A 17261220 NA
Q1967876 C 2084215818A 17261221 NA
Q750403 C 2084693498A 17261222 NA
Q355 C 2093900731A 17261223 NA
Q623578 C 2097991400A 17261224 NA
Q17299517 D 2105487660A 17261225 NA
Q33999 C 2108672678A 17261226 NA
Q2494649 C 2114531894A 17261227 NA
Q2597810 C 2128920607A 17261228 NA
Q193563 C 2130725560A 17261229 NA
Q423048 C 2136131564A 17261230 NA
Q37312 C 2142913121A 17261231 NA
Q54919 C 2148531382A 17261232 NA
Q36578 C 2229315598A 17261233 NA
Q30 A 2277746226A 17261234 None
Q6581097 D 3273952711A 17261235 NA
Q5 A 5668008721A 17261236 None
Q5296 C 12530369761A 17261237 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
Q10069140C 0 E 2 NA
Q10081695C 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
Q10444494C 0 E 11 NA
Q10624171C 0 E 12 NA
Q10704108C 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 17261208 NA
Q31165 C 2048330818A 17261209 NA
Q40629 C 2049755644A 17261210 NA
Q105584 C 2049926923A 17261211 NA
Q4584301 D 2052339927A 17261212 NA
Q565 C 2052996261A 17261213 NA
Q1868372 E 2056080224A 17261214 NA
Q209330 C 2060928966A 17261215 NA
Q14005 D 2063120071A 17261216 NA
Q918 C 2063217449A 17261217 NA
Q150248 C 2068796814A 17261218 NA
Q866 C 2079749157A 17261219 NA
Q477675 C 2080785713A 17261220 NA
Q1967876 C 2084215818A 17261221 NA
Q750403 C 2084693498A 17261222 NA
Q355 C 2093900731A 17261223 NA
Q623578 C 2097991400A 17261224 NA
Q17299517 D 2105487660A 17261225 NA
Q33999 C 2108672678A 17261226 NA
Q2494649 C 2114531894A 17261227 NA
Q2597810 C 2128920607A 17261228 NA
Q193563 C 2130725560A 17261229 NA
Q423048 C 2136131564A 17261230 NA
Q37312 C 2142913121A 17261231 NA
Q54919 C 2148531382A 17261232 NA
Q36578 C 2229315598A 17261233 NA
Q30 A 2277746226A 17261234 None
Q6581097 D 3273952711A 17261235 NA
Q5 A 5668008721A 17261236 None
Q5296 C 12530369761A 17261237 NA
entity_idpredictionpage_viewspop_classseqNumdissonance
Q10040378E 0 E 1 NA
Q10069140C 0 E 2 NA
Q10081695C 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
Q10444494C 0 E 11 NA
Q10624171C 0 E 12 NA
Q10704108C 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 17261208 NA
Q31165 C 2048330818A 17261209 NA
Q40629 C 2049755644A 17261210 NA
Q105584 C 2049926923A 17261211 NA
Q4584301 D 2052339927A 17261212 NA
Q565 C 2052996261A 17261213 NA
Q1868372 E 2056080224A 17261214 NA
Q209330 C 2060928966A 17261215 NA
Q14005 D 2063120071A 17261216 NA
Q918 C 2063217449A 17261217 NA
Q150248 C 2068796814A 17261218 NA
Q866 C 2079749157A 17261219 NA
Q477675 C 2080785713A 17261220 NA
Q1967876 C 2084215818A 17261221 NA
Q750403 C 2084693498A 17261222 NA
Q355 C 2093900731A 17261223 NA
Q623578 C 2097991400A 17261224 NA
Q17299517 D 2105487660A 17261225 NA
Q33999 C 2108672678A 17261226 NA
Q2494649 C 2114531894A 17261227 NA
Q2597810 C 2128920607A 17261228 NA
Q193563 C 2130725560A 17261229 NA
Q423048 C 2136131564A 17261230 NA
Q37312 C 2142913121A 17261231 NA
Q54919 C 2148531382A 17261232 NA
Q36578 C 2229315598A 17261233 NA
Q30 A 2277746226A 17261234 None
Q6581097 D 3273952711A 17261235 NA
Q5 A 5668008721A 17261236 None
Q5296 C 12530369761A 17261237 NA
entity_idpredictionpage_viewspop_classseqNumdissonance
Q10040378E 0 E 1 NA
Q10069140C 0 E 2 NA
Q10081695C 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
Q10444494C 0 E 11 NA
Q10624171C 0 E 12 NA
Q10704108C 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 17261208 NA
Q31165 C 2048330818A 17261209 NA
Q40629 C 2049755644A 17261210 NA
Q105584 C 2049926923A 17261211 NA
Q4584301 D 2052339927A 17261212 NA
Q565 C 2052996261A 17261213 NA
Q1868372 E 2056080224A 17261214 NA
Q209330 C 2060928966A 17261215 NA
Q14005 D 2063120071A 17261216 NA
Q918 C 2063217449A 17261217 NA
Q150248 C 2068796814A 17261218 NA
Q866 C 2079749157A 17261219 NA
Q477675 C 2080785713A 17261220 NA
Q1967876 C 2084215818A 17261221 NA
Q750403 C 2084693498A 17261222 NA
Q355 C 2093900731A 17261223 NA
Q623578 C 2097991400A 17261224 NA
Q17299517 D 2105487660A 17261225 NA
Q33999 C 2108672678A 17261226 NA
Q2494649 C 2114531894A 17261227 NA
Q2597810 C 2128920607A 17261228 NA
Q193563 C 2130725560A 17261229 NA
Q423048 C 2136131564A 17261230 NA
Q37312 C 2142913121A 17261231 NA
Q54919 C 2148531382A 17261232 NA
Q36578 C 2229315598A 17261233 NA
Q30 A 2277746226A 17261234 None
Q6581097 D 3273952711A 17261235 NA
Q5 A 5668008721A 17261236 None
Q5296 C 12530369761A 17261237 NA
entity_idpredictionpage_viewspop_classseqNumdissonance
Q10040378E 0 E 1 NA
Q10069140C 0 E 2 NA
Q10081695C 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
Q10444494C 0 E 11 NA
Q10624171C 0 E 12 NA
Q10704108C 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 17261208 NA
Q31165 C 2048330818A 17261209 NA
Q40629 C 2049755644A 17261210 NA
Q105584 C 2049926923A 17261211 NA
Q4584301 D 2052339927A 17261212 NA
Q565 C 2052996261A 17261213 NA
Q1868372 E 2056080224A 17261214 NA
Q209330 C 2060928966A 17261215 NA
Q14005 D 2063120071A 17261216 NA
Q918 C 2063217449A 17261217 NA
Q150248 C 2068796814A 17261218 NA
Q866 C 2079749157A 17261219 NA
Q477675 C 2080785713A 17261220 NA
Q1967876 C 2084215818A 17261221 NA
Q750403 C 2084693498A 17261222 NA
Q355 C 2093900731A 17261223 NA
Q623578 C 2097991400A 17261224 NA
Q17299517 D 2105487660A 17261225 NA
Q33999 C 2108672678A 17261226 NA
Q2494649 C 2114531894A 17261227 NA
Q2597810 C 2128920607A 17261228 NA
Q193563 C 2130725560A 17261229 NA
Q423048 C 2136131564A 17261230 NA
Q37312 C 2142913121A 17261231 NA
Q54919 C 2148531382A 17261232 NA
Q36578 C 2229315598A 17261233 NA
Q30 A 2277746226A 17261234 None
Q6581097 D 3273952711A 17261235 NA
Q5 A 5668008721A 17261236 None
Q5296 C 12530369761A 17261237 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
Q10040378 E 0 E 1 NA
Q10069140 C 0 E 2 High negative
Q10081695 C 0 E 3 High negative
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 C 0 E 11 High negative
Q10624171 C 0 E 12 High negative
Q10704108 C 0 E 13 High 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 2048095025A 17261208 NA
Q31165 C 2048330818A 17261209 NA
Q40629 C 2049755644A 17261210 NA
Q105584 C 2049926923A 17261211 NA
Q4584301 D 2052339927A 17261212 NA
Q565 C 2052996261A 17261213 NA
Q1868372 E 2056080224A 17261214 NA
Q209330 C 2060928966A 17261215 NA
Q14005 D 2063120071A 17261216 NA
Q918 C 2063217449A 17261217 NA
Q150248 C 2068796814A 17261218 NA
Q866 C 2079749157A 17261219 NA
Q477675 C 2080785713A 17261220 NA
Q1967876 C 2084215818A 17261221 NA
Q750403 C 2084693498A 17261222 NA
Q355 C 2093900731A 17261223 NA
Q623578 C 2097991400A 17261224 NA
Q17299517 D 2105487660A 17261225 NA
Q33999 C 2108672678A 17261226 NA
Q2494649 C 2114531894A 17261227 NA
Q2597810 C 2128920607A 17261228 NA
Q193563 C 2130725560A 17261229 NA
Q423048 C 2136131564A 17261230 NA
Q37312 C 2142913121A 17261231 NA
Q54919 C 2148531382A 17261232 NA
Q36578 C 2229315598A 17261233 NA
Q30 A 2277746226A 17261234 None
Q6581097 D 3273952711A 17261235 NA
Q5 A 5668008721A 17261236 None
Q5296 C 12530369761A 17261237 NA
entity_idpredictionpage_viewspop_classseqNumdissonance
Q10040378 E 0 E 1 NA
Q10069140 C 0 E 2 High negative
Q10081695 C 0 E 3 High negative
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 C 0 E 11 High negative
Q10624171 C 0 E 12 High negative
Q10704108 C 0 E 13 High 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 2048095025A 17261208 NA
Q31165 C 2048330818A 17261209 NA
Q40629 C 2049755644A 17261210 NA
Q105584 C 2049926923A 17261211 NA
Q4584301 D 2052339927A 17261212 NA
Q565 C 2052996261A 17261213 NA
Q1868372 E 2056080224A 17261214 NA
Q209330 C 2060928966A 17261215 NA
Q14005 D 2063120071A 17261216 NA
Q918 C 2063217449A 17261217 NA
Q150248 C 2068796814A 17261218 NA
Q866 C 2079749157A 17261219 NA
Q477675 C 2080785713A 17261220 NA
Q1967876 C 2084215818A 17261221 NA
Q750403 C 2084693498A 17261222 NA
Q355 C 2093900731A 17261223 NA
Q623578 C 2097991400A 17261224 NA
Q17299517 D 2105487660A 17261225 NA
Q33999 C 2108672678A 17261226 NA
Q2494649 C 2114531894A 17261227 NA
Q2597810 C 2128920607A 17261228 NA
Q193563 C 2130725560A 17261229 NA
Q423048 C 2136131564A 17261230 NA
Q37312 C 2142913121A 17261231 NA
Q54919 C 2148531382A 17261232 NA
Q36578 C 2229315598A 17261233 NA
Q30 A 2277746226A 17261234 None
Q6581097 D 3273952711A 17261235 NA
Q5 A 5668008721A 17261236 None
Q5296 C 12530369761A 17261237 NA
entity_idpredictionpage_viewspop_classseqNumdissonance
Q10040378 E 0 E 1 NA
Q10069140 C 0 E 2 High negative
Q10081695 C 0 E 3 High negative
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 C 0 E 11 High negative
Q10624171 C 0 E 12 High negative
Q10704108 C 0 E 13 High 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 2048095025A 17261208 NA
Q31165 C 2048330818A 17261209 NA
Q40629 C 2049755644A 17261210 NA
Q105584 C 2049926923A 17261211 NA
Q4584301 D 2052339927A 17261212 NA
Q565 C 2052996261A 17261213 NA
Q1868372 E 2056080224A 17261214 NA
Q209330 C 2060928966A 17261215 NA
Q14005 D 2063120071A 17261216 NA
Q918 C 2063217449A 17261217 NA
Q150248 C 2068796814A 17261218 NA
Q866 C 2079749157A 17261219 NA
Q477675 C 2080785713A 17261220 NA
Q1967876 C 2084215818A 17261221 NA
Q750403 C 2084693498A 17261222 NA
Q355 C 2093900731A 17261223 NA
Q623578 C 2097991400A 17261224 NA
Q17299517 D 2105487660A 17261225 NA
Q33999 C 2108672678A 17261226 NA
Q2494649 C 2114531894A 17261227 NA
Q2597810 C 2128920607A 17261228 NA
Q193563 C 2130725560A 17261229 NA
Q423048 C 2136131564A 17261230 NA
Q37312 C 2142913121A 17261231 NA
Q54919 C 2148531382A 17261232 NA
Q36578 C 2229315598A 17261233 NA
Q30 A 2277746226A 17261234 None
Q6581097 D 3273952711A 17261235 NA
Q5 A 5668008721A 17261236 None
Q5296 C 12530369761A 17261237 NA
entity_idpredictionpage_viewspop_classseqNumdissonance
Q10040378 E 0 E 1 NA
Q10069140 C 0 E 2 High negative
Q10081695 C 0 E 3 High negative
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 C 0 E 11 High negative
Q10624171 C 0 E 12 High negative
Q10704108 C 0 E 13 High 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 2048095025A 17261208 NA
Q31165 C 2048330818A 17261209 NA
Q40629 C 2049755644A 17261210 NA
Q105584 C 2049926923A 17261211 NA
Q4584301 D 2052339927A 17261212 NA
Q565 C 2052996261A 17261213 NA
Q1868372 E 2056080224A 17261214 NA
Q209330 C 2060928966A 17261215 NA
Q14005 D 2063120071A 17261216 NA
Q918 C 2063217449A 17261217 NA
Q150248 C 2068796814A 17261218 NA
Q866 C 2079749157A 17261219 NA
Q477675 C 2080785713A 17261220 NA
Q1967876 C 2084215818A 17261221 NA
Q750403 C 2084693498A 17261222 NA
Q355 C 2093900731A 17261223 NA
Q623578 C 2097991400A 17261224 NA
Q17299517 D 2105487660A 17261225 NA
Q33999 C 2108672678A 17261226 NA
Q2494649 C 2114531894A 17261227 NA
Q2597810 C 2128920607A 17261228 NA
Q193563 C 2130725560A 17261229 NA
Q423048 C 2136131564A 17261230 NA
Q37312 C 2142913121A 17261231 NA
Q54919 C 2148531382A 17261232 NA
Q36578 C 2229315598A 17261233 NA
Q30 A 2277746226A 17261234 None
Q6581097 D 3273952711A 17261235 NA
Q5 A 5668008721A 17261236 None
Q5296 C 12530369761A 17261237 NA
entity_idpredictionpage_viewspop_classseqNumdissonance
Q10040378 E 0 E 1 NA
Q10069140 C 0 E 2 High negative
Q10081695 C 0 E 3 High negative
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 C 0 E 11 High negative
Q10624171 C 0 E 12 High negative
Q10704108 C 0 E 13 High 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 17261208 High positive
Q31165 C 2048330818 A 17261209 High positive
Q40629 C 2049755644 A 17261210 High positive
Q105584 C 2049926923 A 17261211 High positive
Q4584301 D 2052339927 A 17261212 NA
Q565 C 2052996261 A 17261213 High positive
Q1868372 E 2056080224 A 17261214 NA
Q209330 C 2060928966 A 17261215 High positive
Q14005 D 2063120071 A 17261216 NA
Q918 C 2063217449 A 17261217 High positive
Q150248 C 2068796814 A 17261218 High positive
Q866 C 2079749157 A 17261219 High positive
Q477675 C 2080785713 A 17261220 High positive
Q1967876 C 2084215818 A 17261221 High positive
Q750403 C 2084693498 A 17261222 High positive
Q355 C 2093900731 A 17261223 High positive
Q623578 C 2097991400 A 17261224 High positive
Q17299517 D 2105487660 A 17261225 NA
Q33999 C 2108672678 A 17261226 High positive
Q2494649 C 2114531894 A 17261227 High positive
Q2597810 C 2128920607 A 17261228 High positive
Q193563 C 2130725560 A 17261229 High positive
Q423048 C 2136131564 A 17261230 High positive
Q37312 C 2142913121 A 17261231 High positive
Q54919 C 2148531382 A 17261232 High positive
Q36578 C 2229315598 A 17261233 High positive
Q30 A 2277746226 A 17261234 None
Q6581097 D 3273952711 A 17261235 NA
Q5 A 5668008721 A 17261236 None
Q5296 C 12530369761 A 17261237 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 C 0 E 2 High negative
Q10081695 C 0 E 3 High negative
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 C 0 E 11 High negative
Q10624171 C 0 E 12 High negative
Q10704108 C 0 E 13 High 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 17261208 High positive
Q31165 C 2048330818 A 17261209 High positive
Q40629 C 2049755644 A 17261210 High positive
Q105584 C 2049926923 A 17261211 High positive
Q4584301 D 2052339927 A 17261212 NA
Q565 C 2052996261 A 17261213 High positive
Q1868372 E 2056080224 A 17261214 NA
Q209330 C 2060928966 A 17261215 High positive
Q14005 D 2063120071 A 17261216 NA
Q918 C 2063217449 A 17261217 High positive
Q150248 C 2068796814 A 17261218 High positive
Q866 C 2079749157 A 17261219 High positive
Q477675 C 2080785713 A 17261220 High positive
Q1967876 C 2084215818 A 17261221 High positive
Q750403 C 2084693498 A 17261222 High positive
Q355 C 2093900731 A 17261223 High positive
Q623578 C 2097991400 A 17261224 High positive
Q17299517 D 2105487660 A 17261225 NA
Q33999 C 2108672678 A 17261226 High positive
Q2494649 C 2114531894 A 17261227 High positive
Q2597810 C 2128920607 A 17261228 High positive
Q193563 C 2130725560 A 17261229 High positive
Q423048 C 2136131564 A 17261230 High positive
Q37312 C 2142913121 A 17261231 High positive
Q54919 C 2148531382 A 17261232 High positive
Q36578 C 2229315598 A 17261233 High positive
Q30 A 2277746226 A 17261234 None
Q6581097 D 3273952711 A 17261235 NA
Q5 A 5668008721 A 17261236 None
Q5296 C 12530369761 A 17261237 High positive
entity_idpredictionpage_viewspop_classseqNumdissonance
Q10040378 E 0 E 1 NA
Q10069140 C 0 E 2 High negative
Q10081695 C 0 E 3 High negative
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 C 0 E 11 High negative
Q10624171 C 0 E 12 High negative
Q10704108 C 0 E 13 High 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 17261208 High positive
Q31165 C 2048330818 A 17261209 High positive
Q40629 C 2049755644 A 17261210 High positive
Q105584 C 2049926923 A 17261211 High positive
Q4584301 D 2052339927 A 17261212 NA
Q565 C 2052996261 A 17261213 High positive
Q1868372 E 2056080224 A 17261214 NA
Q209330 C 2060928966 A 17261215 High positive
Q14005 D 2063120071 A 17261216 NA
Q918 C 2063217449 A 17261217 High positive
Q150248 C 2068796814 A 17261218 High positive
Q866 C 2079749157 A 17261219 High positive
Q477675 C 2080785713 A 17261220 High positive
Q1967876 C 2084215818 A 17261221 High positive
Q750403 C 2084693498 A 17261222 High positive
Q355 C 2093900731 A 17261223 High positive
Q623578 C 2097991400 A 17261224 High positive
Q17299517 D 2105487660 A 17261225 NA
Q33999 C 2108672678 A 17261226 High positive
Q2494649 C 2114531894 A 17261227 High positive
Q2597810 C 2128920607 A 17261228 High positive
Q193563 C 2130725560 A 17261229 High positive
Q423048 C 2136131564 A 17261230 High positive
Q37312 C 2142913121 A 17261231 High positive
Q54919 C 2148531382 A 17261232 High positive
Q36578 C 2229315598 A 17261233 High positive
Q30 A 2277746226 A 17261234 None
Q6581097 D 3273952711 A 17261235 NA
Q5 A 5668008721 A 17261236 None
Q5296 C 12530369761 A 17261237 High positive
entity_idpredictionpage_viewspop_classseqNumdissonance
Q10040378 E 0 E 1 NA
Q10069140 C 0 E 2 High negative
Q10081695 C 0 E 3 High negative
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 C 0 E 11 High negative
Q10624171 C 0 E 12 High negative
Q10704108 C 0 E 13 High 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 17261208 High positive
Q31165 C 2048330818 A 17261209 High positive
Q40629 C 2049755644 A 17261210 High positive
Q105584 C 2049926923 A 17261211 High positive
Q4584301 D 2052339927 A 17261212 NA
Q565 C 2052996261 A 17261213 High positive
Q1868372 E 2056080224 A 17261214 NA
Q209330 C 2060928966 A 17261215 High positive
Q14005 D 2063120071 A 17261216 NA
Q918 C 2063217449 A 17261217 High positive
Q150248 C 2068796814 A 17261218 High positive
Q866 C 2079749157 A 17261219 High positive
Q477675 C 2080785713 A 17261220 High positive
Q1967876 C 2084215818 A 17261221 High positive
Q750403 C 2084693498 A 17261222 High positive
Q355 C 2093900731 A 17261223 High positive
Q623578 C 2097991400 A 17261224 High positive
Q17299517 D 2105487660 A 17261225 NA
Q33999 C 2108672678 A 17261226 High positive
Q2494649 C 2114531894 A 17261227 High positive
Q2597810 C 2128920607 A 17261228 High positive
Q193563 C 2130725560 A 17261229 High positive
Q423048 C 2136131564 A 17261230 High positive
Q37312 C 2142913121 A 17261231 High positive
Q54919 C 2148531382 A 17261232 High positive
Q36578 C 2229315598 A 17261233 High positive
Q30 A 2277746226 A 17261234 None
Q6581097 D 3273952711 A 17261235 NA
Q5 A 5668008721 A 17261236 None
Q5296 C 12530369761 A 17261237 High positive
entity_idpredictionpage_viewspop_classseqNumdissonance
Q10040378 E 0 E 1 NA
Q10069140 C 0 E 2 High negative
Q10081695 C 0 E 3 High negative
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 C 0 E 11 High negative
Q10624171 C 0 E 12 High negative
Q10704108 C 0 E 13 High 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 17261208 High positive
Q31165 C 2048330818 A 17261209 High positive
Q40629 C 2049755644 A 17261210 High positive
Q105584 C 2049926923 A 17261211 High positive
Q4584301 D 2052339927 A 17261212 High positive
Q565 C 2052996261 A 17261213 High positive
Q1868372 E 2056080224 A 17261214 NA
Q209330 C 2060928966 A 17261215 High positive
Q14005 D 2063120071 A 17261216 High positive
Q918 C 2063217449 A 17261217 High positive
Q150248 C 2068796814 A 17261218 High positive
Q866 C 2079749157 A 17261219 High positive
Q477675 C 2080785713 A 17261220 High positive
Q1967876 C 2084215818 A 17261221 High positive
Q750403 C 2084693498 A 17261222 High positive
Q355 C 2093900731 A 17261223 High positive
Q623578 C 2097991400 A 17261224 High positive
Q17299517 D 2105487660 A 17261225 High positive
Q33999 C 2108672678 A 17261226 High positive
Q2494649 C 2114531894 A 17261227 High positive
Q2597810 C 2128920607 A 17261228 High positive
Q193563 C 2130725560 A 17261229 High positive
Q423048 C 2136131564 A 17261230 High positive
Q37312 C 2142913121 A 17261231 High positive
Q54919 C 2148531382 A 17261232 High positive
Q36578 C 2229315598 A 17261233 High positive
Q30 A 2277746226 A 17261234 None
Q6581097 D 3273952711 A 17261235 High positive
Q5 A 5668008721 A 17261236 None
Q5296 C 12530369761 A 17261237 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 C 0 E 2 High negative
Q10081695 C 0 E 3 High negative
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 C 0 E 11 High negative
Q10624171 C 0 E 12 High negative
Q10704108 C 0 E 13 High 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 17261208 High positive
Q31165 C 2048330818 A 17261209 High positive
Q40629 C 2049755644 A 17261210 High positive
Q105584 C 2049926923 A 17261211 High positive
Q4584301 D 2052339927 A 17261212 High positive
Q565 C 2052996261 A 17261213 High positive
Q1868372 E 2056080224 A 17261214 NA
Q209330 C 2060928966 A 17261215 High positive
Q14005 D 2063120071 A 17261216 High positive
Q918 C 2063217449 A 17261217 High positive
Q150248 C 2068796814 A 17261218 High positive
Q866 C 2079749157 A 17261219 High positive
Q477675 C 2080785713 A 17261220 High positive
Q1967876 C 2084215818 A 17261221 High positive
Q750403 C 2084693498 A 17261222 High positive
Q355 C 2093900731 A 17261223 High positive
Q623578 C 2097991400 A 17261224 High positive
Q17299517 D 2105487660 A 17261225 High positive
Q33999 C 2108672678 A 17261226 High positive
Q2494649 C 2114531894 A 17261227 High positive
Q2597810 C 2128920607 A 17261228 High positive
Q193563 C 2130725560 A 17261229 High positive
Q423048 C 2136131564 A 17261230 High positive
Q37312 C 2142913121 A 17261231 High positive
Q54919 C 2148531382 A 17261232 High positive
Q36578 C 2229315598 A 17261233 High positive
Q30 A 2277746226 A 17261234 None
Q6581097 D 3273952711 A 17261235 High positive
Q5 A 5668008721 A 17261236 None
Q5296 C 12530369761 A 17261237 High positive
entity_idpredictionpage_viewspop_classseqNumdissonance
Q10040378 E 0 E 1 None
Q10069140 C 0 E 2 High negative
Q10081695 C 0 E 3 High negative
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 C 0 E 11 High negative
Q10624171 C 0 E 12 High negative
Q10704108 C 0 E 13 High 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 17261208 High positive
Q31165 C 2048330818 A 17261209 High positive
Q40629 C 2049755644 A 17261210 High positive
Q105584 C 2049926923 A 17261211 High positive
Q4584301 D 2052339927 A 17261212 High positive
Q565 C 2052996261 A 17261213 High positive
Q1868372 E 2056080224 A 17261214 NA
Q209330 C 2060928966 A 17261215 High positive
Q14005 D 2063120071 A 17261216 High positive
Q918 C 2063217449 A 17261217 High positive
Q150248 C 2068796814 A 17261218 High positive
Q866 C 2079749157 A 17261219 High positive
Q477675 C 2080785713 A 17261220 High positive
Q1967876 C 2084215818 A 17261221 High positive
Q750403 C 2084693498 A 17261222 High positive
Q355 C 2093900731 A 17261223 High positive
Q623578 C 2097991400 A 17261224 High positive
Q17299517 D 2105487660 A 17261225 High positive
Q33999 C 2108672678 A 17261226 High positive
Q2494649 C 2114531894 A 17261227 High positive
Q2597810 C 2128920607 A 17261228 High positive
Q193563 C 2130725560 A 17261229 High positive
Q423048 C 2136131564 A 17261230 High positive
Q37312 C 2142913121 A 17261231 High positive
Q54919 C 2148531382 A 17261232 High positive
Q36578 C 2229315598 A 17261233 High positive
Q30 A 2277746226 A 17261234 None
Q6581097 D 3273952711 A 17261235 High positive
Q5 A 5668008721 A 17261236 None
Q5296 C 12530369761 A 17261237 High positive
entity_idpredictionpage_viewspop_classseqNumdissonance
Q10040378 E 0 E 1 None
Q10069140 C 0 E 2 High negative
Q10081695 C 0 E 3 High negative
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 C 0 E 11 High negative
Q10624171 C 0 E 12 High negative
Q10704108 C 0 E 13 High 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 17261208 High positive
Q31165 C 2048330818 A 17261209 High positive
Q40629 C 2049755644 A 17261210 High positive
Q105584 C 2049926923 A 17261211 High positive
Q4584301 D 2052339927 A 17261212 High positive
Q565 C 2052996261 A 17261213 High positive
Q1868372 E 2056080224 A 17261214 High positive
Q209330 C 2060928966 A 17261215 High positive
Q14005 D 2063120071 A 17261216 High positive
Q918 C 2063217449 A 17261217 High positive
Q150248 C 2068796814 A 17261218 High positive
Q866 C 2079749157 A 17261219 High positive
Q477675 C 2080785713 A 17261220 High positive
Q1967876 C 2084215818 A 17261221 High positive
Q750403 C 2084693498 A 17261222 High positive
Q355 C 2093900731 A 17261223 High positive
Q623578 C 2097991400 A 17261224 High positive
Q17299517 D 2105487660 A 17261225 High positive
Q33999 C 2108672678 A 17261226 High positive
Q2494649 C 2114531894 A 17261227 High positive
Q2597810 C 2128920607 A 17261228 High positive
Q193563 C 2130725560 A 17261229 High positive
Q423048 C 2136131564 A 17261230 High positive
Q37312 C 2142913121 A 17261231 High positive
Q54919 C 2148531382 A 17261232 High positive
Q36578 C 2229315598 A 17261233 High positive
Q30 A 2277746226 A 17261234 None
Q6581097 D 3273952711 A 17261235 High positive
Q5 A 5668008721 A 17261236 None
Q5296 C 12530369761 A 17261237 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.067.416.915.8
D 0.057.921.020.0 1.0
C57.114.525.3 3.2 0.0
B73.122.0 5.0 0.0 0.0
A 2.289.8 8.0 0.0 0.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 997396904
C High negative 181184535
D Moderate negative 287693781
B High negative 34733926
E Moderate positive 2420110324
C Moderate negative 612929063
D None 803662848
E High positive 84962612627
D Moderate positive 11398970624
C None 20138337159
B Moderate negative 1204065759
A High negative 343759
C Moderate positive106580951138
D High positive 88411880962
B None 13170808061
A Moderate negative 4068491149
A None 12934693771
C High positive 172604857571
B Moderate positive 2657529415

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 48044898743
High negative 216262220
Moderate negative 6173179752
Moderate positive123057561501
High positive 345979351160

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


523471253376

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
9.178135

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
0.0413131

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
1.179278

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
23.50799

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
66.09329