Skip to contents

Computes site-amplified spectral acceleration Sa_F using the 2017-generation NGA-East non-linear site factor model (PEER Report 2017/05 lineage; see F_ST17). This wrapper calls the underlying F_ST17() function.

Usage

SaF_ST17(Sa, pga, Tn, vs30, vref = 760)

Arguments

Sa

numeric vector - rock spectral accelerations at period Tn (g)

pga

numeric vector - peak ground acceleration on rock (g), same length as Sa

Tn

numeric scalar - oscillator period (s)

vs30

numeric scalar - time-averaged shear-wave velocity to 30 m (m/s)

vref

numeric scalar - reference velocity (m/s), default 760

Value

A data.table with columns:

muLnSaF

natural-log mean of amplified Sa

sdLnSaF

natural-log standard deviation of amplified Sa

ID

character string "ST17"

References

Hashash, Y.M.A. et al. (2017) "Recommendation for Ergodic Nonlinear Site Amplification in Central and Eastern North America." PEER Report 2017/05, Pacific Earthquake Engineering Research Center.

See also

F_ST17 for the underlying site factor model

fitSaF for Monte-Carlo site amplification analysis

Examples

library(data.table)
#> 
#> Attaching package: ‘data.table’
#> The following object is masked from ‘package:base’:
#> 
#>     %notin%

# Site amplification for soft soil site
Sa_rock <- c(0.1, 0.2, 0.3, 0.4)
PGA_rock <- c(0.1, 0.1, 0.1, 0.1)

result <- SaF_ST17(
  Sa = Sa_rock,
  pga = PGA_rock,
  Tn = 0.5,      # 0.5s period
  vs30 = 300,    # Soft soil
  vref = 760     # Rock reference
)

print(result)
#>       muLnSaF   sdLnSaF     ID
#>         <num>     <num> <char>
#> 1: -1.9411223 0.2316648   ST17
#> 2: -1.2479751 0.2316648   ST17
#> 3: -0.8425100 0.2316648   ST17
#> 4: -0.5548279 0.2316648   ST17