Skip to contents

AtmosphericAbsorption: ISO 9613-1 pure-tone absorption coefficient (dB/m). PointSourceLevel: \(L_p = L_W + D_c - (20\log_{10} d + 11) - \alpha d - A_{extra}\). AttenuationDistance: distance at which that level reaches a threshold. GroundAttenuation: ISO 9613-2 alternative ground attenuation and \(D_\Omega\). BarrierAttenuation: ISO 9613-2 screening \(D_z\) (single or double diffraction). FoliageAttenuation: ISO 9613-2 Table A.1. NoiseMap: energetic sum over point sources. NoiseZones: reporting bands and exposed counts.

Usage

AtmosphericAbsorption(
  f,
  temperature_c = 20,
  humidity = 70,
  pressure_kpa = 101.325
)

PointSourceLevel(lw, d, alpha = 0, dc = 0, extra = 0)

AttenuationDistance(lw, threshold, alpha = 0, dc = 0)

GroundAttenuation(dp, hs, hr)

BarrierAttenuation(d_ss, d_sr, d, f, a = 0, e = 0, c = 340)

FoliageAttenuation(df, band)

NoiseMap(lw, sources, receivers, alpha = 0, dc = 0, min_distance = 1)

NoiseZones(levels, breaks = c(55, 60, 65, 70, 75), population = NULL)

Arguments

f

Frequencies (Hz).

temperature_c, humidity, pressure_kpa

Atmospheric state.

lw

Sound power level(s).

d

Distance(s) (m).

alpha

Absorption (dB/m).

dc

Directivity correction (dB).

extra

Further attenuation (dB).

threshold

Target level.

dp, hs, hr

Horizontal distance, source and receiver heights.

d_ss, d_sr

Source-to-edge and edge-to-receiver distances.

a

Lateral offset parallel to the barrier edge.

e

Distance between the two edges (double diffraction).

c

Speed of sound.

df

Path length through foliage.

band

Octave midband frequency (63 to 8000).

sources, receivers

Two-column coordinate matrices.

min_distance

Minimum distance.

levels

Levels to classify into bands.

breaks

Band limits.

population

Optional counts.

Value

Numeric or list.

References

ISO 9613-1:1993 and ISO 9613-2:1996, Acoustics – Attenuation of sound during propagation outdoors, Parts 1 and 2.

Examples

1000 * AtmosphericAbsorption(1000)
#> [1] 4.977811
PointSourceLevel(100, c(10, 100))
#> [1] 69 49
BarrierAttenuation(10, 10, 19, 1000)$Dz
#> [1] 17.84788