cufu_wordcoord: cufu_wordcoord

In Christine-Z/cufu:

Usage

cufu_wordcoord(A_ca, B_ca, d_A, d_B)

Arguments

A_ca	output of the performance of correspondence analysis on word matrix A 'A_ca = ca(d_A)'
B_ca	output of the performance of correspondence analysis on word matrix B 'B_ca = ca(d_B)'
d_A	word matrix A 'd_A = cufu_funword(features,A_fnames, A_short_fnames)'
d_A	word matrix B 'd_B = cufu_funword(features,B_fnames, B_short_fnames)'

Note

This package is built to simplify the code in the final report of Methods of Corpus Linguistics

Author(s)

Christine Zhao

Examples

## The function is currently defined as
function(A_ca, B_ca, d_A, d_B){

  A_word_coord <- col_pcoord(A_ca)                # coordinates of function words
  B_word_coord <- col_pcoord(B_ca)

  A_words_df <- tibble(
    word = colnames(d_A),
    x = A_word_coord[, 1],
    y = A_word_coord[, 2])

  B_words_df <- tibble(
    word = colnames(d_B),
    x = B_word_coord[, 1],
    y = B_word_coord[, 2])

  words_df <- rbind(A_words_df, B_words_df)

  return(words_df)
}

Christine-Z/cufu documentation built on Jan. 4, 2022, 12:01 a.m.