Mean Intensities
Arguments
- ...
Any object that can be interpreted in a suitable way (see
grDevices::xy.coords()
).
Value
Returns a list
with two components x
and y
.
See also
Other signal processing methods:
signal_bind()
,
signal_correct()
,
signal_drift()
,
signal_shift()
,
subset()
Examples
## X-ray diffraction
data("XRD")
XRD1 <- signal_drift(XRD, lag = 1500)
## Bind
XRD_bind <- signal_bind(XRD, XRD1)
XRD_bind[, 1:10]
#> [,1] [,2] [,3] [,4] [,5] [,6] [,7] [,8] [,9] [,10]
#> XRD 6780 6786 6773 6961 6958 6796 6920 6910 6785 6879
#> XRD1 8280 8286 8273 8461 8458 8296 8420 8410 8285 8379
## Mean
XRD_mean <- signal_mean(XRD, XRD1)
plot(NULL, type = "l", xlim = c(10, 70) , ylim = c(3000, 36000),
xlab = expression(2*theta), ylab = "Count")
lines(XRD, type = "l")
lines(XRD1, type = "l")
lines(XRD_mean, type = "l", col = "red")