
Calculating the location quotient (a.k.a. Hoover-Balassa quotient) for a given number of
locq2(e_ij, industry.id, region.id, LQ.norm = "none",
LQ.output = "mat", na.rm = TRUE)
a vector with the employment of industry
a vector containing the IDs of the industries
a vector containing the IDs of the regions
Type of normalization of the location quotients: no normalization (default: LQ.norm = "none"
), z values (LQ.norm = "OG"
) or z values of logged location quotients (LQ.norm = "T"
)
Type of output: matrix (default: CI.output = "mat"
) or data frame (CI.output = "df"
)
logical argument that indicates whether NA values should be excluded before computing results
A matrix or data frame containing
The location quotient is a simple measure for the concentration of an industry (gini.conc()
). The function returns the value
Two types of normalization are available: z values of the location quotients (O'Donoghue/Gleave 2004) or z values of logged location quotients (Tian 2013).
Farhauer, O./Kroell, A. (2014): “Standorttheorien: Regional- und Stadtoekonomik in Theorie und Praxis”. Wiesbaden : Springer.
Hoen A.R./Oosterhaven, J. (2006): “On the measure of comparative advantage”. In: The Annals of Regional Science, 40, 3, p. 677-691.
Nakamura, R./Morrison Paul, C. J. (2009): “Measuring agglomeration”. In: Capello, R./Nijkamp, P. (eds.): Handbook of Regional Growth and Development Theories. Cheltenham: Elgar. p. 305-328.
O'Donoghue, D./Gleave, B. (2004): “A Note on Methods for Measuring Industrial Agglomeration”. In: Regional Studies, 38, 4, p. 419-427.
Tian, Z. (2013): “Measuring agglomeration using the standardized location quotient with a bootstrap method”. In: Journal of Regional Analysis and Policy, 43, 2, p. 186-197.
litzenberger
, gini.conc
, gini.spec
, locq
, hoover
, ellison.a
, ellison.a2
, ellison.c
, ellison.c2
# NOT RUN {
data (G.regions.industries)
lqs <- locq2(e_ij = G.regions.industries$emp_all,
G.regions.industries$ind_code, G.regions.industries$region_code,
LQ.output = "df")
# output as data frame
lqs_sort <- lqs[order(lqs$LQ, decreasing = TRUE),]
# Sort decreasing by size of LQ
lqs_sort[1:5,]
# }
Run the code above in your browser using DataLab