Sample kanji from a set

Usage

samplekan(
  set = c("kyouiku", "jouyou", "jinmeiyou", "kanjidic"),
  size = 1,
  replace = FALSE,
  prob = NULL
)

Arguments

set: a character string specifying the set of kanjis to sample from.
size: a positive number, the number of samples.
replace: logical. Sample with replacement?
prob: currently without effect.

Value

a vector of length size containing the individual characters

Examples

(sam <- samplekan(size = 10))
#>  [1] "民" "火" "産" "系" "貴" "臣" "純" "結" "郵" "春"
#> attr(,"index")
#>  [1] 460  63 485 870 879 559 927 452 998 201
lookup(sam)
#> 民 --> ON: ミン | kun: たみ | nanori: ひと, み
#>        meaning: people, nation, subjects
#> 火 --> ON: カ | kun: ひ, -び, ほ- | nanori: 
#>        meaning: fire
#> 産 --> ON: サン | kun: う.む, う.まれる, うぶ-, む.す | nanori: もと
#>        meaning: products, bear, give birth, yield, childbirth, native, property
#> 系 --> ON: ケイ | kun:  | nanori: 
#>        meaning: lineage, system
#> 貴 --> ON: キ | kun: たっと.い, とうと.い, たっと.ぶ, とうと.ぶ | nanori: きよ, ぎ, たか, たかし, よし
#>        meaning: precious, value, prize, esteem, honor
#> 臣 --> ON: シン, ジン | kun:  | nanori: おみ, たか, と, とみ, み
#>        meaning: retainer, subject
#> 純 --> ON: ジュン | kun:  | nanori: あつ, すみ, み, やすし, よし
#>        meaning: genuine, purity, innocence, net (profit)
#> 結 --> ON: ケツ, ケチ | kun: むす.ぶ, ゆ.う, ゆ.わえる | nanori: ゆい, ゆう
#>        meaning: tie, bind, contract, join, organize, do up hair, fasten
#> 郵 --> ON: ユウ | kun:  | nanori: 
#>        meaning: mail, stagecoach stop
#> 春 --> ON: シュン | kun: はる | nanori: あずま, かす, すの, ひ, わら
#>        meaning: springtime, spring (season)