Nothing
###_ + Plotting
if (!isGeneric("plotTDR")) {
setGeneric("plotTDR",
function(x, y, ...) standardGeneric("plotTDR"))
}
if (!isGeneric("plotZOC")) {
setGeneric("plotZOC",
function(x, y, ...) standardGeneric("plotZOC"))
}
if (!isGeneric("plotDiveModel")) {
setGeneric("plotDiveModel",
function(x, y, ...) standardGeneric("plotDiveModel"))
}
if (!isGeneric("plotBouts")) {
setGeneric("plotBouts",
function(fit, obj, ...) standardGeneric("plotBouts"))
}
###_ + Accessors
if (!isGeneric("getFileName")) { # File name accessor
setGeneric("getFileName", function(x) standardGeneric("getFileName"))
}
if (!isGeneric("getTime")) { # time accessor
setGeneric("getTime", function(x) standardGeneric("getTime"))
}
if (!isGeneric("getDepth")) { # Depth accessor
setGeneric("getDepth", function(x) standardGeneric("getDepth"))
}
if (!isGeneric("getSpeed")) { # speed accessor
setGeneric("getSpeed", function(x) standardGeneric("getSpeed"))
}
if (!isGeneric("getDtime")) { # interval accessor
setGeneric("getDtime", function(x) standardGeneric("getDtime"))
}
if (!isGeneric("getCCData")) { # concurrent data accessor
setGeneric("getCCData", function(x, y) standardGeneric("getCCData"))
}
if (!isGeneric("getTDR")) { # zoc'ed TDR accessor
setGeneric("getTDR", function(x) standardGeneric("getTDR"))
}
if (!isGeneric("getGAct")) { # gross activity accessor
setGeneric("getGAct", function(x, y) standardGeneric("getGAct"))
}
if (!isGeneric("getDAct")) { # dive activity accessor
setGeneric("getDAct", function(x, y) standardGeneric("getDAct"))
}
if (!isGeneric("getDPhaseLab")) { # dive phase label accessor
setGeneric("getDPhaseLab",
function(x, diveNo) standardGeneric("getDPhaseLab"))
}
if (!isGeneric("getDiveModel")) { # dive model accessor
setGeneric("getDiveModel",
function(x, diveNo) standardGeneric("getDiveModel"))
}
if (!isGeneric("getDiveDeriv")) { # dive derivative accessor
setGeneric("getDiveDeriv",
function(x, ...) standardGeneric("getDiveDeriv"))
}
if (!isGeneric("getSpeedCoef")) { # speed calibration coefs accessor
setGeneric("getSpeedCoef", function(x) standardGeneric("getSpeedCoef"))
}
###_ + Coercions and Replacements
if (!isGeneric("as.TDRspeed")) { # coerce to TDRspeed
setGeneric("as.TDRspeed", function(x) standardGeneric("as.TDRspeed"))
}
if (!isGeneric("depth<-")) { # depth replacement
setGeneric("depth<-", function(x, value) standardGeneric("depth<-"))
}
if (!isGeneric("speed<-")) { # speed replacement
setGeneric("speed<-", function(x, value) standardGeneric("speed<-"))
}
if (!isGeneric("ccData<-")) { # concurrent data replacement
setGeneric("ccData<-", function(x, value) standardGeneric("ccData<-"))
}
###_ + Generators and Summaries
if (!isGeneric("extractDive")) { # extract a dive
setGeneric("extractDive",
function(obj, diveNo, id) standardGeneric("extractDive"))
}
if (!isGeneric("timeBudget")) {
setGeneric("timeBudget",
function(obj, ignoreZ) standardGeneric("timeBudget"))
}
###_ . Bouts
if (!isGeneric("boutsNLSll")) {
setGeneric("boutsNLSll",
function(obj, coefs)
standardGeneric("boutsNLSll"))
}
if (!isGeneric("boutinit")) {
setGeneric("boutinit",
function(obj, x.break, plot=TRUE, ...)
standardGeneric("boutinit"))
}
if (!isGeneric("fitNLSbouts")) {
setGeneric("fitNLSbouts",
function(obj, start, maxiter, ...)
standardGeneric("fitNLSbouts"))
}
if (!isGeneric("fitMLEbouts")) {
setGeneric("fitMLEbouts",
function(obj, start, ...)
standardGeneric("fitMLEbouts"))
}
if (!isGeneric("bec")) {
setGeneric("bec", function(fit) standardGeneric("bec"))
}
if (!isGeneric("labelBouts")) {
setGeneric("labelBouts",
function(obj, becs, ...) standardGeneric("labelBouts"))
}
if (!isGeneric("plotBoutsCDF")) {
setGeneric("plotBoutsCDF",
function(fit, obj, ...) standardGeneric("plotBoutsCDF"))
}
###_ + Emacs local variables
## Local variables:
## allout-layout: (+ : 0)
## End:
Any scripts or data that you put into this service are public.
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.