powered by
There are multiple ways to quantify the number of characters that are exchanged over a scene or act boundary.
hamming(drama, variant = c("Trilcke", "Hamming", "NormalizedHamming"))scenicDifference(drama, norm = length(unique(drama$text$Speaker.figure_id)))
scenicDifference(drama, norm = length(unique(drama$text$Speaker.figure_id)))
The QDDrama Object
For hamming(), variants are "Trilcke" (default), "NormalizedHamming", and "Hamming"
hamming()
For scenicDifference(), specifies the normalization constant
scenicDifference()
A list of values, one for each scene change. The values indicate the (potentially) normalized number of characters that are exchanged.
# NOT RUN { data(rksp.0) dist_trilcke <- hamming(rksp.0) dist_hamming <- hamming(rksp.0, variant = "Hamming") dist_nhamming <- hamming(rksp.0, variant = "NormalizedHamming") # }
Run the code above in your browser using DataLab