Description Usage Arguments Value Examples
View source: R/compare_excision.R
Takes two unit table of notes and compares the note excisions. Table1 corresponds to manually excised notes, Table2 corresponds to computationally excised notes. The function goes through each note in Table1, tries to match it to a note in Table2 and quantifies the difference. The process is repeated to compare notes in Table2 to those in Table1.
1 | compare_excision(table1, table2)
|
table1: |
A unit table tibble containing the original sound file, start/end times of the note,the note position and note_label. |
table2: |
A unit table tibble containing the original sound file, start/end times of the note and the note position and note_label. |
Tibble containing the sound file, note positions in tables 1 and 2, the square difference in the note intervals, a logical (matched) indicating whether a matching note was found and the class of the original note.
1 2 3 4 5 | table1 = tibble::tibble(start = c(0.30, 0.55, 1.5, 2.5), end = c(0.51, 0.7, 2.2, 3),
sound.files = "JS001.wav", pos =c(1,2,3,4), note_label = "Curve")
table2 = tibble::tibble(start = c(0.25, 0.65, 2), end = c(0.45, 0.75, 2.7),
sound.files = "JS001.wav", pos =c(1,2,3), note_label = "Unclassifed")
compare_excision(table1,table2)
|
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.