read.dic | R Documentation |
Read in or write dictionary files in Comma-Separated Values (.csv; weighted) or Linguistic Inquiry and Word Count (.dic; non-weighted) format.
read.dic(path, cats = NULL, type = "asis", as.weighted = FALSE,
dir = getOption("lingmatch.dict.dir"), ..., term.name = "term",
category.name = "category", raw = FALSE)
write.dic(dict, filename = NULL, type = "asis", as.weighted = FALSE,
save = TRUE)
path |
Path to a file, a name corresponding to a file in |
cats |
A character vector of category names to be returned. All categories are returned by default. |
type |
A character indicating whether and how terms should be altered. Unspecified or matching 'asis'
leaves terms as they are. Other options change wildcards to regular expressions:
|
as.weighted |
Logical; if |
dir |
Path to a folder containing dictionaries, or where you would like dictionaries to be downloaded;
passed to |
... |
Passes arguments to |
term.name , category.name |
Strings identifying column names in |
raw |
Logical or a character. As logical, indicates if |
dict |
A |
filename |
The name of the file to be saved. |
save |
Logical: if |
read.dic
: A list
(unweighted) with an entry for each category containing
character vectors of terms, or a data.frame
(weighted) with columns for terms (first, "term") and
weights (all subsequent, with category labels as names).
write.dic
: A version of the written dictionary – a raw character vector for
unweighted dictionaries, or a data.frame
for weighted dictionaries.
Other Dictionary functions:
dictionary_meta()
,
download.dict()
,
lma_patcat()
,
lma_termcat()
,
report_term_matches()
,
select.dict()
# make a small murder related dictionary
dict <- list(
kill = c("kill*", "murd*", "wound*", "die*"),
death = c("death*", "dying", "die*", "kill*")
)
# convert it to a weighted format
(dict_weighted <- read.dic(dict, as.weighted = TRUE))
# categorize it back
read.dic(dict_weighted)
# convert it to a string without writing to a file
cat(raw_dict <- write.dic(dict, save = FALSE))
# parse it back in
read.dic(raw = raw_dict)
## Not run:
# save it as a .dic file
write.dic(dict, "murder")
# read it back in as a list
read.dic("murder.dic")
# read in the Moral Foundations or LUSI dictionaries from urls
moral_dict <- read.dic("https://osf.io/download/whjt2")
lusi_dict <- read.dic("https://osf.io/download/29ayf")
# save and read in a version of the General Inquirer dictionary
inquirer <- read.dic("inquirer", dir = "~/Dictionaries")
## End(Not run)
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.