View source: R/sociophonetics.R
lbms_index | R Documentation |
A function to quickly calculate the Low-Back-Merger Shift Index, per Becker (2019).
lbms_index(df, vowel_col, F1_col, F2_col, beet, bit, bet, bat)
df |
The dataframe containing the formant measurements you want to base the calculation off of. |
vowel_col |
The name of the column containing the name of the vowel (e.g. |
F1_col |
The name of the column containing the F1 measurements (e.g. |
F2_col |
The name of the column containing the F2 measurements (e.g. |
beet |
A string that indicates which vowels belong to the BEET class of words (e.g. |
bit |
A string that indicates which vowels belong to the BIT class of words (e.g. |
bet |
A string that indicates which vowels belong to the BET class of words (e.g. |
bat |
A string that indicates which vowels belong to the BAT class of words (e.g. |
If you would like to calculate the LBMS Index for each speaker, be sure to
the data beforehand with group_by()
(see the examples). Also, per Becker's
(2019) recommendation, it is recommended that you exclude tokens before nasals,
laterals, rhotics, and /g/ before the calculation. It is also recommended to
run the function on Lobanov-normalized data.
Note that this is a new function and has not been tested robustly yet.
A summarize
d dataframe with the LBMS Index.
Becker, Kara, ed. The Low-Back-Merger Shift: Uniting the Canadian Vowel Shift, the California Vowel Shift, and Short Front Vowel Shifts across North America. Publication of the American Dialect Society 104. Durham, NC: Duke University Press, 2019.
suppressPackageStartupMessages(library(tidyverse))
# This dataset has following segment and normalized data already
darla <- joeysvowels::darla
darla %>%
filter(!fol_seg %in% c("L", "R", "M", "N", "NG", "G")) %>%
lbms_index(vowel, F1_LobanovNormed_unscaled, F2_LobanovNormed_unscaled, "IY", "IH", "EH", "AE")
# This dataset has multiple speakers and needs to be normalized
idahoans <- joeysvowels::idahoans
idahoans %>%
group_by(speaker) %>%
mutate(F1_lob = scale(F1),
F2_lob = scale(F2)) %>%
lbms_index(vowel, F1_lob, F2_lob, "IY", "IH", "EH", "AE")
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.