iemg {biosignalEMG} | R Documentation |
Creates an ‘iemg’ object to store an integrated EMG signal.
iemg(data, calliemg, resetpoints, samplingrate = 0, units = "", data.name = "")
## S3 method for class 'iemg'
print(x, ...)
## S3 method for class 'iemg'
plot(x, type = "l", timeunits = c("seconds", "samples"), reset.lty = 2, add = FALSE, ...)
## S3 method for class 'iemg'
summary(object, ...)
## S3 method for class 'summary.iemg'
print(x, ...)
data |
an object of class ‘emg’. |
calliemg |
a matched |
resetpoints |
the index of the samples in which a reset point occur. |
samplingrate |
number of samples carried per second, measured in Hertz. A value of 0 indicates that this value is missing or unknown. |
units |
a character vector specifying the units (usually "mV.s") of the integrated EMG data. |
data.name |
a string specifying the name of the variable which will appears on the plots. If empty or not provided is taken from the object given as |
object |
an object of class ‘iemg’. |
x |
an object of class ‘iemg’ or ‘summary.iemg’. |
type |
what type of plot should be drawn. See |
timeunits |
a character vector specifying the units (samples or seconds) for the time axis. |
reset.lty |
what type of line should be drawn to represent each reset point. See |
add |
logical; if |
... |
additional arguments to be passed to the generic function. |
returns an object of class ‘iemg’ which is a list with components:
values |
a copy of |
call |
the matched call |
reset.points |
the |
units |
the |
samplingrate |
the |
data.name |
the |
‘iemg’ is not intended to be called directly, but indirectly from the ‘integration’ function.
J.A. Guerrero jaguerrero@correo.uaa.mx
Winter D.A., Rau G., Kadefors R., Broman H., Deluca C.J. (1980) Units, Terms, and Sandards in the Reporting of EMG Research: A Report by the AdHoc Committee of the International Society of Electrophysiology and Kinesiology.
See also integration
# Simulate 5 seconds of an EMG
emgx <- syntheticemg(n.length.out = 5000, on.sd = 1, on.duration.mean = 350,
on.duration.sd = 10, off.sd = 0.05, off.duration.mean = 300, off.duration.sd = 20,
on.mode.pos = 0.75, shape.factor = 0.5, samplingrate = 1000, units = "mV",
data.name = "Synthetic EMG")
# Full-wave rectified EMG
emgr <- rectification(emgx, rtype = "fullwave")
# Integration of the full-wave rectified EMG without reset points
emgi1 <- integration(emgr, reset = FALSE)
print(emgi1)
plot(emgi1, main = "Integrated EMG")
summary(emgi1)