Update example01.R