objSize <- seq(10, 30, by=5) # cm
objDst <- 25 # m
getMOA(objSize, dst=objDst, conversion='m2cm')
## check rounding problems
## this should return objSize
fromMOA(getMOA(objSize, objDst, conversion='m2cm'),
objDst, conversion='m2cm')
Run the code above in your browser using DataLab