Rprof()
foo()
Rprof(NULL)
summaryRprof()