In pmcharrison/wang13: Implementation of Wang et al.'s (2013) Roughness Model

knitr::opts_chunk$set(
  collapse = TRUE,
  comment = "#>",
  fig.path = "man/figures/README-",
  out.width = "100%"
)

wang13: Wang et al.'s (2013) Roughness Model

The wang13 R package implements Wang et al.'s (2013) roughness model.

Try an interactive demo here!

Installation

Within R, you can install the current version of wang13 from Github as follows:

if (!require(devtools)) install.packages("devtools")
devtools::install_github("wang13")

Usage

Higher scores correspond to greater roughness.

library(wang13)

# Octave
roughness_wang(c(60, 72))

# Semitone
roughness_wang(c(60, 61))

References

Wang, Y. S., Shen, G. Q., Guo, H., Tang, X. L., & Hamade, T. (2013). Roughness modelling based on human auditory perception for sound quality evaluation of vehicle interior noise. Journal of Sound and Vibration, 332(16), 3893–3904. https://doi.org/10.1016/j.jsv.2013.02.030

pmcharrison/wang13 documentation built on June 14, 2019, 11:08 p.m.