###  The subject area that students are studying
Subject =
    c("Humanities", "Social Sciences", "Science", "Economics", "Engineering", 
      "Construction", "Electrical Engineering", "Vehicles and Transport", 
      "Business Studies", "Industrial Engineering", "Agriculture", 
      "Nursing (Care)", "Catering", "Nursing")

###  The percentage of females studying the subject
Female =
    c(85, 71, 52, 56, 19, 1, 4, 4, 62, 3, 50, 87, 58, 92)

###  The area of study (Theory or Vocational)
Area =
    c("Theory", "Theory", "Theory", "Theory", "Theory", "Vocational", 
      "Vocational", "Vocational", "Vocational", "Vocational", "Vocational", 
      "Vocational", "Vocational", "Vocational")