Add Custom Similarity Data

Allows users to add their own similarity mappings to kanji data.

Usage

wk_add_similarity(kanji_df, similarity_map)

Arguments

kanji_df

Data frame from wk_extract_kanji

similarity_map

Named list where names are kanji IDs and values are comma-separated similar kanji IDs

Value

Updated data frame with custom similarity information

Examples

if (FALSE) { # \dontrun{
# Create custom similarity mappings
custom_similarity <- list(
  "479" = "717, 832, 1486, 537, 913",  # 水 (water)
  "481" = "505, 453",                   # 犬 (dog)
  "482" = "528, 1286, 794, 679, 1745"  # 王 (king)
)

kanji_table <- wk_get_kanji_table(levels = 1:3, include_similarity = FALSE)
kanji_with_custom <- wk_add_similarity(kanji_table, custom_similarity)
} # }