[morpheus.git] / reports / printTime.R

load("timings.RData")
for (d in c(2,5,10))
{
  cat("\n")
  for (n in 4:6)
  {
    cat(mean(sapply(1:100, function(i) tm[[i]]$fm[d,n])))
    cat(" ")
  }
}
Commit	Line	Data
	1	load("timings.RData")
	2	for (d in c(2,5,10))
	3	{
	4	cat("\n")
	5	for (n in 4:6)
	6	{
	7	cat(mean(sapply(1:100, function(i) tm[[i]]$fm[d,n])))
	8	cat(" ")
	9	}
	10	}