README.md

joeysvowels

The joeysvowels package provides a handful of datasets, some subsets of others, that contain formant measurements and other information about the vowels in my own speech. The purpose of the package is to make vowel data easily accessible for demonstrating code snippets when demonstrating working with sociophonetic data.

There are no functions contained in joeysvowels; it’s a data-only package.

Installation

You can install joeysvowels through GitHub:

remotes::install_github("joeystanley/joeysvowels")

You can then load the package like normally:

library(joeysvowels)

Contents

Currently, there are six datasets contained in joeysvowels:

Example

You can access the datasets using data(). I’ll briefly visualize the datasets.

library(joeysvowels)
library(ggplot2)
library(tidyr)
library(dplyr)

The darla dataset is messy.

data(darla)
ggplot(darla, aes(F2, F1, color = vowel)) + 
  geom_point() + 
  scale_x_reverse() + 
  scale_y_reverse()

The coronals trajectories show clear influence from the surrounding consonants.

data(coronals)
avg_trajs <- coronals %>%
  group_by(vowel, percent) %>%
  summarize(across(c(F1, F2), mean)) %>%
  print()
## `summarise()` regrouping output by 'vowel' (override with `.groups` argument)

## # A tibble: 273 x 4
## # Groups:   vowel [13]
##    vowel percent    F1    F2
##    <fct>   <dbl> <dbl> <dbl>
##  1 LOT         0  454. 1616.
##  2 LOT         5  592. 1346.
##  3 LOT        10  648. 1283.
##  4 LOT        15  651. 1238.
##  5 LOT        20  661. 1178.
##  6 LOT        25  651. 1176.
##  7 LOT        30  636. 1152.
##  8 LOT        35  630. 1148.
##  9 LOT        40  633. 1153.
## 10 LOT        45  625. 1158.
## # … with 263 more rows
ggplot(avg_trajs, aes(F2, F1, color = vowel)) + 
  geom_path(aes(group = vowel), 
            arrow = arrow(angle = 20, length = unit(0.15, "in"), type = "closed")) + 
  scale_x_reverse() + 
  scale_y_reverse()

midpoints is pretty clean.

data(midpoints)
ggplot(midpoints, aes(F2, F1, color = vowel)) + 
  geom_point() + 
  scale_x_reverse() + 
  scale_y_reverse()

mouth shows pretty good trajectories.

data(mouth)
ggplot(mouth, aes(percent, hz, color = formant)) + 
  geom_path(aes(group = traj_id))

mouth_lite is just smaller.

data(mouth_lite)
ggplot(mouth_lite, aes(percent, hz, color = formant)) + 
  geom_path(aes(group = traj_id))

data(idahoans)
ggplot(idahoans, aes(F2, F1, color = vowel)) + 
  geom_point() + 
  scale_x_reverse() + 
  scale_y_reverse() + 
  facet_wrap(~speaker)



JoeyStanley/joeysvowels documentation built on Oct. 3, 2020, 10:08 a.m.