added example in tps3d.Rd