Update jjmTools_demo.R