fix bug in examples.R; minor change