select_counts: Apply Normalization to Term/Token Columns

In trinker/termco: Counts of Terms and Substrings

Description

Apply normalization to a term count columns of termco object without stripping the class & attributes of the object.

Usage

select_counts(x, ...)

Arguments

x	A term_count object.
...	One or more unquoted expressions separated by commas. You can treat variable names like they are positions. See ?dplyr::select for more information on ....

Value

Returns a term_count object.

Examples

## Not run: 
library(dplyr)

term_list <- list(
    `if` = c('if'),
    ands = c('an'),
    or = c('or'),
    buts = c('but')
)

out <- presidential_debates_2012 %>%
     with(term_count(dialogue, TRUE, term_list))

out

out %>%
    select_counts(-or)

out %>%
    select_counts(-c(ands:buts))
    
out %>%
    select_counts(n.words, ands:buts)
    
## Can't print as a term_count object (n n.words)
out %>%
    select_counts(ands:buts)
    
## Token Counts
token_list2 <- list(
    list(
        person = c('sam', 'i')
    ),
    list(
        place = c('here', 'house'),
        thing = c('boat', 'fox', 'rain', 'mouse', 'box', 'eggs', 'ham')
    ),
    list(
        no_like = c('not like'),
        thing = c('train', 'goat'),
        other = c('in')
    ),
    list(
        other = 'i'
    )
)


x <- token_count(sam_i_am, grouping.var = TRUE, token.list = token_list2)

x %>%
    select_counts(-thing)
    
x %>%
    select_counts(-c(person, other))
    
## Handles metatags
tag_list <- list(
    noun = c('person', 'place', 'thing'),
    odd_ones = c('other', 'no_like')
)

x2 <- set_meta_tags(x, tag_list)

x2 %>%
    tidy_counts()
    
x2 %>%
    select_counts(-c(person, other))%>%
    tidy_counts()

## End(Not run)

trinker/termco documentation built on Jan. 7, 2022, 3:32 a.m.