Create 20140318 JackKnife in R