Jak konwertować wartości ujemne na dodatnie w R

z<-z*sign(z)
Dead Dog