Updated demo/jjmTools.R