attenu

The Joyner--Boore Attenuation Data

This data gives peak accelerations measured at various observation stations for 23 earthquakes in California. The data have been used by various workers to estimate the attenuating affect of distance on ground acceleration.

Keywords
datasets
Usage
attenu
Format

A data frame with 182 observations on 5 variables.

[,1] event numeric Event Number
[,2] mag numeric Moment Magnitude
[,3] station factor Station Number
[,4] dist numeric Station-hypocenter distance (km)

References

Boore, D. M. and Joyner, W. B.(1982). The empirical prediction of ground motion, Bulletin of the Seismological Society of America, 72, S269--S268.

Bolt, B. A. and Abrahamson, N. A. (1982). New attenuation relations for peak and expected accelerations of strong ground motion. Bulletin of the Seismological Society of America, 72, 2307--2321.

Bolt B. A. and Abrahamson, N. A. (1983). Reply to W. B. Joyner & D. M. Boore's “Comments on: New attenuation relations for peak and expected accelerations for peak and expected accelerations of strong ground motion”, Bulletin of the Seismological Society of America, 73, 1481--1483.

Brillinger, D. R. and Preisler, H. K. (1984). An exploratory analysis of the Joyner-Boore attenuation data, Bulletin of the Seismological Society of America, 74, 1441--1449.

Brillinger, D. R. and Preisler, H. K. (1984). Further analysis of the Joyner-Boore attenuation data. Manuscript.

Aliases
  • attenu
Examples
library(datasets) # NOT RUN { require(graphics) ## check the data class of the variables sapply(attenu, data.class) summary(attenu) pairs(attenu, main = "attenu data") coplot(accel ~ dist | as.factor(event), data = attenu, show.given = FALSE) coplot(log(accel) ~ log(dist) | as.factor(event), data = attenu, panel = panel.smooth, show.given = FALSE) # }
Documentation reproduced from package datasets, version 3.6.1, License: Part of R 3.6.1

Community examples

Looks like there are no examples yet.