Skip to content

Instantly share code, notes, and snippets.

@ianmcook

ianmcook/closed_box_equations.R

Created February 12, 2019 15:35
Show Gist options
  • Star 0 You must be signed in to star a gist
  • Fork 0 You must be signed in to fork a gist
  • Save ianmcook/f0c3a8213f0841aa4f7a0f158c206822 to your computer and use it in GitHub Desktop.
Save ianmcook/f0c3a8213f0841aa4f7a0f158c206822 to your computer and use it in GitHub Desktop.
Download ZIP
Closed box loudspeaker equations
Raw
closed_box_equations.R
# closed box loudspeaker equations
Qtc <- 0.707 # you choose this; see LDC p.24
Qts <- 0.40 # property of driver
fs <- 19 # property of driver
Vas <- 260 # property of driver
alpha <- (Qtc/Qts) ^ 2 - 1
fc <- (Qtc * fs) / Qts
f3 <- sqrt(((1/(Qtc ^ 2) - 2) + sqrt((1/(Qtc ^ 2) - 2) ^ 2 + 4)) / 2) * fc
f3 # Hz
Vb <- Vas / alpha
Vb / 28.3169 # cubic feet
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment