R/addOffsetType.R

addOffsetType <- function(Units, Description){
	#all mandatory
	stopifnot(length(Units) == length(Description))

	#check ref: Units
	UnitsID <- getID("Units",Units)
	if(NROW(existing <- getMetadata("OffsetType",Description=Description, Units = UnitsID))>0){
		warning(paste("Existing OffsetType entry:", Description, ", Skipping all imports"))
		return()
	}
	IaddOffsetType(getOption("odm.handler"), Description=Description, Units=UnitsID)
}

Try the RObsDat package in your browser

Any scripts or data that you put into this service are public.

RObsDat documentation built on May 2, 2019, 5:55 p.m.