cómo convertir valores negativos a positivos en r

z<-z*sign(z)
Dead Dog