powered by
concentration_ratio(x, g, ex = order(x, decreasing = TRUE))
exogeny
herfindahl
rosenbluth
set.seed(1234) x <- sample(100000, 10) # Data o <- sample(10) # Exogenous order concentration_ratio(x, 3) concentration_ratio(x, 3, ex = o)
Run the code above in your browser using DataLab