Skip to contents

Mean Intensities

Usage

signal_mean(...)

# S4 method for class 'ANY'
signal_mean(...)

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()

Author

N. Frerebeau

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")