Update sampleFun.R

Some details
Merge pull request #4 from marcogarieri/patch-1

Merge from Marco's bugfix sampleFun.R