R/accessor.R

decondata <- function(data){
	class(data) <- "decon"
	data
}
searchdata <- function(data){
	class(data) <- "search"
	data
}
fitdata <- function(data){
	class(data) <- "fit"
	data
}
heckendorfc/BTDR documentation built on May 17, 2019, 3:20 p.m.