added new example to diffusion.Rd