powered by
"units"(x) <- value
units
a <- with(ud_units, 1:3 * m/s) units(a) <- with(ud_units, km/h) a
Run the code above in your browser using DataLab