# NOT RUN {
# basic usage
X <- c(1, 3, 6) # data
aad(X) # returns a value of 1.777
# removing missing data
X <- c(1, 3, NA, 6) # data
aad(X) # returns NA
aad(X, na.rm = TRUE) # returns 1.777
# }
Run the code above in your browser using DataLab