R/weight_to.R

weight_to <-
function(vector,names) {
	
	if (!is.vector(vector)) stop("Input must be vector")

	names(vector) <- names
	
	return(vector)
	
}
lorenc5/Rweights3 documentation built on May 29, 2019, 11:05 p.m.