fst_cn_compare_plot {finnsurveytext}

Concept Network- Plot comparison Concept Network

Description

Creates a Concept Network plot from a list of edges and nodes (and their respective weights) which indicates unique words in this plot in comparison to another Network.

Usage

fst_cn_compare_plot(
  edges,
  nodes,
  concepts,
  unique_lemmas,
  name = NULL,
  concept_colour = "#cd1719",
  unique_colour = "#4DAF4A",
  min_edge = NULL,
  max_edge = NULL,
  min_node = NULL,
  max_node = NULL
)

Arguments

edges

Output of ‘fst_cn_edges()', dataframe of ’edges' connecting two words.

nodes

Output of 'fst_cn_nodes()', dataframe of relevant lemmas and their associated pagerank.

concepts

List of terms which have been searched for, separated by commas.

unique_lemmas

List of unique lemmas, output of 'fst_cn_get_unique()'

name

An optional "name" for the plot, default is 'NULL' and a generic title ("Textrank extracted keyword occurrences") will be used.

concept_colour

Colour to display concept words, default is '"indianred"'.

unique_colour

Colour to display unique words, default is '"darkgreen"'.

min_edge

A numeric value for the scale of the edges, the smallest co_occurrence value for an edge across all Networks to be plotted together.

max_edge

A numeric value for the scale of the edges, the largest co_occurrence value for an edge across all Networks to be plotted together.

min_node

A numeric value for the scale of the nodes, the smallest pagerank value for a node across all Networks to be plotted together.

max_node

A numeric value for the scale of the nodes, the largest pagerank value for a node across all Networks to be plotted together.

Value

Plot of concept network with concept and unique words (nodes) highlighted.

Examples

cb <- conllu_cb_bullying_iso
pos_filter = c("NOUN", "VERB", "ADJ", "ADV")
e1 <- fst_cn_edges(cb, "lyödä", pos_filter = pos_filter)
e2 <- fst_cn_edges(cb, "lyöminen", pos_filter = pos_filter)
n1 <- fst_cn_nodes(cb, e1)
n2 <- fst_cn_nodes(cb, e2)
u <- fst_cn_get_unique(n1, n2)

fst_cn_compare_plot(e1, n1, "lyödä", unique_lemma = u)
fst_cn_compare_plot(e2, n2, "lyöminen", u, unique_colour = "purple")