changed deprecated diagmm() to scale()

scale is more general, can scale by vector or scalar