http://koolac.org/r-programming/if/