R/util.R

In stcos: Space-Time Change of Support

Defines functions logger printf

printf = function(msg, ...)
{
	cat(sprintf(msg, ...))
}

logger = function(msg, ...)
{
	sys.time = as.character(Sys.time())
	cat(sys.time, "-", sprintf(msg, ...))
}

Try the stcos package in your browser