bagaimana mengubah nilai negatif menjadi positif di r

z<-z*sign(z)
Dead Dog