Learn R Programming

Data2LD (version 3.2.1)

HeadImpactData: Acceleration of brain tissue before and after a blow to the head.

Description

The data are the acceleration of brain tissue in mm/msec in a cadaver before and after five blows to the cranium measured over 60 milliseconds. The times of the blows within this interval were at 14 msec.

Usage

HeadImpactData

Arguments

Format

A 133 by 3 matrix of real numbers. The first column contains row numbers, the second the times of observations, and third the tissue acceleration in millimeters per second per second.

Examples

Run this code
# NOT RUN {
HeadImpactTime <- HeadImpactData[,2]  #  time in milliseconds
HeadImpact     <- HeadImpactData[,3]  #  acceleration in millimeters/millisecond^2
HeadImpactRng  <- c(0,60) # Define range time for estimated model
# plot the data along with a unit pulse
plot(HeadImpactTime, HeadImpact, type="p", xlim=c(0,60),  ylim=c(-1.0,1.5),
     xlab="Time (milliseconds)", ylab="Acceleration (mm/msec^2)")
lines(c( 0,60), c(0,0), lty=3)
lines(c(14,14), c(0,1), lty=2)
lines(c(15,15), c(0,1), lty=2)
lines(c(14,15), c(1,1), lty=2)
# }

Run the code above in your browser using DataLab