R/testcpu.R

Defines functions testcpu

testcpu <- function(size){
	repeat{
		#one iteration should take approx 30 to 60 seconds.
		A1 <- matrix(runif(size),1e3);
		return(unclass(system.time(svd(A1))));
	}	
}
jeroenooms/opencpu.tools documentation built on May 19, 2019, 6:16 a.m.