powered by
Midx(x, first = NULL)
x <- c(1,3,6,7) Midx(x) Midx(x, 0)
Run the code above in your browser using DataLab