merge: [!!!] Merge a hyperSpec object and a data frame

In GegznaV/spHelper: Extension of Package `hyperSpec` and Various Convenience Functions

[!!!] Merge a hyperSpec object and a data frame

Description

Merge a hyperSpec object and a data frame.

Usage

## S4 method for signature 'hyperSpec,data.frame'
merge(x, y, ...)

Arguments

x	a hyperSpec object
y	a data.frame object
...	handed to merge.data.frame

Value

A hyperSpec object, with updated slot @data.

Author(s)

V. Gegzna

See Also

merge, merge.

collapse combines hyperSpec objects that do not share the wavelength axis. rbind, and cbind for combining hyperSpec objects that.

Examples

merge(chondro [1:10,, 600], chondro[5:15,, 600]$.., by = c("x", "y"))$.
tmp <- merge (chondro [1:10,, 610], chondro [5:15,, 610]$..,
              by = c("x", "y"), all = TRUE)
tmp$.
wl (tmp)

## remove duplicated wavelengths:
approxfun <- function (y, wl, new.wl){
  approx (wl, y, new.wl, method = "constant",
          ties = function (x) mean (x, na.rm = TRUE)
          )$y
}

merged <- merge (chondro [1:7,, 610 ~ 620], chondro [5:10,, 615 ~ 625], all = TRUE)
merged$.
merged <- apply (merged, 1, approxfun,
                 wl = wl (merged), new.wl = unique (wl (merged)),
                 new.wavelength = "new.wl")
merged$.

GegznaV/spHelper documentation built on April 16, 2023, 1:42 p.m.