R/identifyStudy.R

In activpalProcessing: Process activPAL Events Files

Defines functions identifyStudy

Documented in identifyStudy

identifyStudy <-
function(directory=directory,name.of.log.subjects)
{
	list.subs <-read.csv(paste(directory,name.of.log.subjects,".csv",sep=""))
	study <- unique(as.character(list.subs$study))
	return(study)
}

Try the activpalProcessing package in your browser