R/init.theta.R

In TIMP: Fitting Separable Nonlinear Models in Spectroscopy and Microscopy

setClass("theta", representation(
  kinpar = "vector", specpar = "list",
  irfpar = "vector", parmu = "list", partau = "vector", dummy = "vector",
  clpequ = "vector", specdisppar = "list", kinscal = "vector",
  prel = "vector", oscpar = "vector", coh = "vector", drel = "vector", cohirf = "vector",
  kinpar2 = "vector", kin2scal = "vector", jvec = "vector",
  anipar = "vector", peakpar = "list", amplitudes = "vector",
  shift = "vector", amps = "list", kinscalspecial = "list",
  eigenvaluesK = "vector"
),
prototype = list(
  kinpar = vector(), specpar = list(), dummy = vector(),
  irfpar = vector(), parmu = list(), partau = vector(),
  clpequ = vector(), specdisppar = list(), drel = vector(), oscpar = vector(),
  coh = vector(), kinscal = vector(), prel = vector(),
  jvec = vector(), cohirf = vector(), kinpar2 = vector(),
  kin2scal = vector(), anipar = vector(), peakpar = list(),
  amplitudes = vector(), shift = vector(), amps = list(),
  kinscalspecial = list(), eigenvaluesK = vector()
)
)