Description Usage Arguments Note See Also Examples
View source: R/word_network_plot.R
A network plot of words. Shows the interconnected and supporting use of words between textual units containing key terms.
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 | word_network_plot(
text.var,
grouping.var = 1:length(text.var),
target.words = NULL,
stopwords = qdapDictionaries::Top100Words,
label.cex = 0.8,
label.size = 0.5,
edge.curved = TRUE,
vertex.shape = "circle",
edge.color = "gray70",
label.colors = "black",
layout = NULL,
title.name = NULL,
title.padj = -4.5,
title.location = 3,
title.font = NULL,
title.cex = 0.8,
log.labels = FALSE,
title.color = "black",
legend = NULL,
legend.cex = 0.8,
legend.location = c(-1.54, 1.41),
plot = TRUE,
char2space = "~~",
...
)
|
text.var |
The text variable. |
grouping.var |
The grouping variables. Default uses the sequence along the length of text variable (this may be the connection of sentences or turn of talk as the textual unit). Also takes a single grouping variable or a list of 1 or more grouping variables. |
target.words |
A named list of vectors of words whose length corresponds
to |
stopwords |
Words to exclude from the analysis (default is Top100Words). |
label.cex |
The magnification to be used for network plot labels relative to the current setting of cex. Default is .8. |
label.size |
An optional sizing constant to add to labels if log.labels
is |
edge.curved |
logical. If |
vertex.shape |
The shape of the vertices (see
|
edge.color |
A character vector of length one corresponding to the color of the plot edges. |
label.colors |
A character vector of length one corresponding to the color of the labels. |
layout |
Layout types supported by igraph. See
|
title.name |
The title of the plot. |
title.padj |
Adjustment for the network plot title. For strings parallel to the axes, padj = 0 means right or top alignment, and padj = 1 means left or bottom alignment. |
title.location |
On which side of the network plot (1=bottom, 2=left, 3=top, 4=right). |
title.font |
The font family of the cloud title. |
title.cex |
Character expansion factor for the title. |
log.labels |
logical. If |
title.color |
A character vector of length one corresponding to the color of the title. |
legend |
A character vector of names corresponding to the number of
vectors in |
legend.cex |
Character expansion factor for the network plot legend.
|
legend.location |
The x and y co-ordinates to be used to position the
network plot legend. The location may also be specified by setting x to a
single keyword from the list |
plot |
logical. If |
char2space |
A vector of characters to be turned into spaces. If
|
... |
Other arguments passed to |
Words can be kept as one by inserting a double tilde ("~~"
), or
other character strings passed to char2space, as a single word/entry. This is
useful for keeping proper names as a single unit.
word_network_plot
,
graph.adjacency
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 | ## Not run:
word_network_plot(text.var=DATA$state)
word_network_plot(text.var=DATA$state, stopwords=NULL)
word_network_plot(text.var=DATA$state, DATA$person)
word_network_plot(text.var=DATA$state, DATA$person, stopwords=NULL)
word_network_plot(text.var=DATA$state, grouping.var=list(DATA$sex,
DATA$adult))
word_network_plot(text.var=DATA$state, grouping.var=DATA$person,
title.name = "TITLE", log.labels=TRUE)
word_network_plot(text.var=raj.act.1$dialogue, grouping.var=raj.act.1$person,
stopwords = Top200Words)
#insert double tilde ("~~") to keep dual words (e.g., first last name)
alts <- c(" fun", "I ")
state2 <- mgsub(alts, gsub("\\s", "~~", alts), DATA$state)
word_network_plot(text.var=state2, grouping.var=DATA$person)
## Invisibly returns the igraph model
x <- word_network_plot(text.var=DATA$state, DATA$person)
str(x)
library(igraph)
plot(x, vertex.size=0, vertex.color="white", edge.curved = TRUE)
x2 <- word_network_plot(text.var=DATA$state, grouping.var=DATA$person,
title.name = "TITLE", log.labels = TRUE, label.size = 1.2)
l <- layout.drl(x2, options=list(simmer.attraction=0))
plot(x2, vertex.size=0, layout = l)
## End(Not run)
|
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.