Atılan Tweetlerin Time Series Grafiği

Bu sayfada, Pınar Gültekin cinayetiyle ilgili 2020-07-21 ve 2022-05-05 tarihlerini kapsayan 474278 adet Tweetden oluşan verimizle ilgili analizler yer alıyor.

load(file = "all.data.RData")
library(ggplot2)
library(plotly)
## 
## Attaching package: 'plotly'
## The following object is masked from 'package:ggplot2':
## 
##     last_plot
## The following object is masked from 'package:stats':
## 
##     filter
## The following object is masked from 'package:graphics':
## 
##     layout
library(dplyr)
## 
## Attaching package: 'dplyr'
## The following objects are masked from 'package:stats':
## 
##     filter, lag
## The following objects are masked from 'package:base':
## 
##     intersect, setdiff, setequal, union
plt <- tweets.raw.df %>% 
  count(created_at_round) %>% 
  ggplot(mapping = aes(x = created_at_round, y = n)) +
  theme_light() +
  geom_line() +
  xlab(label = 'Date') +
  ylab(label = NULL) +
  ggtitle(label = 'Number of Tweets per Hour')

plt %>% ggplotly()

Quoted, retweeted and unique tweet sayıları

library(dplyr)
joined %>%
  count(sourcetweet_type, name = "frequency")

Retweetlerden oluşan verideki (directed) in-degree, out-degree ve betweenness centrality korelasyonları

library(CINNA)
## Registered S3 method overwritten by 'GGally':
##   method from   
##   +.gg   ggplot2
pca_centralities(
  retweeted_graph_test[2:4],
  scale.unit = TRUE,
  cut.off = 80,
  ncp = 5,
  graph = FALSE,
  axes = c(1, 2)
)

visualize_correlations(retweeted_graph_test[,2:4], scale = TRUE, method = "pearson")

Metin analizindeki (undirected) degree, ve closeness ve betweenness korelasyonları

visualize_correlations(node.impo.df[,2:4], scale = TRUE, method = "pearson")

Retweeted - Outdegree Top 20

out_degree_sort[1:20]
##    hakangderolu fatmakayrahotm1  mapulzadenalan   betigulceylan       roosmaand 
##             238             223             216             186             179 
##      vekilimcom         acrgstn    kiziihayaiet sakizmicikletmi hamurab20388347 
##             177             172             171             168             166 
##    mehmetcan198      oksayoksay    kbra03547099      zeynaerica   moonlight4522 
##             157             152             151             147             143 
##      avokado200        aryy1995      yakupatma8  hayriyekaradag         gmrrty3 
##             143             140             134             130             122

Retweeted - Indegree Top 20

in_degree_sort[1:20]
##  gultekindavasi       rterdogan   kadincinayeti     solcugazete  suleicinadalet 
##           58910           23411           15599            7680            7484 
##  avumuryildirim gultekinberkant      mustafahos        besiktas utangacitfayeci 
##            6321            5767            5515            5111            5030 
##     halktvcomtr      medyaadami birgun_gazetesi   galatasaraysk           yoltv 
##            4662            4499            4371            4168            3464 
##       uyanhadi_      gigidatome       yenisafak    muhendisyenn     metinsolmaz 
##            3455            3443            3203            2779            2766

Retweeted - Betweenness Top 20

betwn_nw_sort[1:20]
##     bodrumkadin  gultekindavasi  mugla_kadinddd desteksayfasipg     geckinduygu 
##        57326969        57070305        39469021        32625367        32567796 
## sakizmicikletmi       iremafsin       c_cubukcu efe_cumhurfatma  kampuscadilari 
##        32122012        24765618        19551781        18561760        15836448 
##         kbguclu   fidanataselim   kadincinayeti          esitiz  avumuryildirim 
##        13082451        12254483        12234822        10347395         8868796 
##     solcugazete      dnzdvrmgny    deniz__3_4__      zeynaerica clairdelunexq_k 
##         6150168         5816452         5593118         3751657         3654326

Quoted - Outdegree Top 20

out_degree_sort_quoted[1:20]
##  ahmetaslan_mka       roosmaand engellenemeyen_ guraybilginoglu    kiziihayaiet 
##              59              53              46              33              31 
## belkibirgun2335   akifdemirciii  00beyazhayat00    aantifasistt politicalinnov2 
##              26              23              22              21              21 
##      ayisigi06_     bodrumkadin      emtevbrane          szgclp   tkdfederasyon 
##              20              19              17              16              15 
##       iremafsin     malikejder_         acrgstn   vesilegunes86 kadinkoalisyonu 
##              13              13              13              12              11

Quoted - Indegree Top 20

in_degree_sort_quoted[1:20]
##  gultekindavasi  suleicinadalet  isimsizhareket   kadincinayeti pinarrgultekinn 
##            1892             116             106              82              78 
## birgun_gazetesi  kampuscadilari     akgenclikgm     solcugazete    gizemcnblt16 
##              64              63              60              50              47 
##  avumuryildirim           yoltv      sputnik_tr       pusholder   sgirgin48tbmm 
##              46              45              40              38              38 
##     demetakalin        t24comtr       rterdogan     gazetesozcu    kadindavalar 
##              35              31              30              27              26

Quoted - Betweenness Top 20

betwn_nw_sort_quoted[1:20]
##       roosmaand guraybilginoglu     defnehalman belkibirgun2335    aantifasistt 
##            3495            2856            1488            1374            1062 
##    kiziihayaiet       turkukusu  serpilkemalbay gunes_zalekarad         acrgstn 
##             524             488             482             457             452 
##  suleicinadalet  hayriyekaradag       sartrecee   imabluedesert bir_acayip_pala 
##             428             417             404             391             370 
##     bnkearnshaw         aylabla     sedayilmaz_      edibe_edip      mengenecbn 
##             366             321             316             308             303

Skipgram Metin Analizi: Ağ

library(networkD3)

forceNetwork(
  Links = networkD3.2$links, 
  Nodes = networkD3.2$nodes, 
  Source = 'source', 
  Target = 'target',
  NodeID = 'name',
  Group = 'Group', 
  opacity = 0.9,
  Value = 'Width',
  Nodesize = 'Degree', 
  # We input a JavaScript function.
  linkWidth = JS("function(d) { return Math.sqrt(d.value); }"), 
  fontSize = 12,
  zoom = TRUE, 
  opacityNoHover = 1
)