Times per second benchmark

In GNU R the simplest way to measure execution time of a piece code is to use system.time. However, sometimes one wants to find out how many times some function can be executed in one second. This is especially useful when we want to compare functions that have significantly different execution speed.
Check out this post:

http://www.r-bloggers.com/times-per-second-benchmark/