## Not run:
# ## First read in a labour relations formatted excel file:
# df <- read.lar("Spain_1900_(JMTL-Sept2011).xlsx")
#
# ## Next, draw a treemap of the labour relations:
# draw.lar(df)
#
# ## Treemap with example data set for Spain in 1900
# data(spain.1900)
# draw.lar(spain.1900)
# ## End(Not run)
Run the code above in your browser using DataCamp Workspace