TS.sphere: Calculate the analytical solution for a weakly scattering...

In AustralianAntarcticDivision/ZooScatR: ZooScatR - Acoustic Scattering of zooplankton using DWBA

Calculate the analytical solution for a weakly scattering sphere

Description

Scattered pressure from an incident plane wave upon a fluid sphere. Based on: Anderson, V. C. (1950). "Sound scattering from a fluid sphere." The Journal of the Acoustical Society of America, 22(4), 426-431.

Usage

TS.sphere(f, r, a, c, h, g, rho, theta = pi)

Arguments

f	Frequency in Hz (s^-1)
r	Range in m from center of sphere
a	Radius of sphere
c	Soundspeed in surrounding fluid m/s
h	Soundspeed contrast inside/surrounding fluid
g	Density contrast inside/surrounding fluid
rho	Density of surrounding fluid
theta	Scattering angle

Examples

f <- 200000
r <- 10
a <- 0.01
c <- 1477.4
rho <- 1026.8
g <- 1028.9/rho
h <- 1480.3/c
theta = pi #For backscatter
ts<- TS.sphere(f=200000,r,a,c,h,g, rho)
#For a range of frequencies
ts<- TS.sphere(f=seq(10,400)*1000,r,a,c,h,g, rho, theta=pi)
plot(ts~seq(10,400),xlab="Frequency [kHz]", ylab="TS [dB re m2]", type="l",ylim=c(-160,-80))

AustralianAntarcticDivision/ZooScatR documentation built on Aug. 13, 2022, 1:21 a.m.