AN S Graduate Program Enrollment

Analysis of Enrolled graduate students in ABG and other graduate majors

Load Data

Data Provided by Rose Mary Ross, reformated by Juan Steibel for easier reading.

full_file_path<-str_c(path_main, data_file)

#read data

students<-read_xlsx(full_file_path)

Rearrange data for representation

Reformat and build graphics

student_long<-pivot_longer(students,cols = `Fall 2017`:`Fall 2025`,names_to="year",values_to = "Enrolment")%>%
  mutate(year=parse_number(year),Degree=str_remove_all(Degree, "\\."))
#student_long

Evolution of enrollment for ANS department based programs

Enrollment in ABG is similar to enrollment in other ANS department based programs, except for the ANS graduate degrees.

select_majors<-c("Animal Breeding and Genetics",
                 "Animal Physiology",
                 "Animal Science",
                 "Meat Science")
students_ans<-filter(student_long,Major%in%select_majors)


#ggplot(students_ans,aes(x=year,y=Enrolment))+geom_point()+geom_smooth()+
#  facet_grid(Major~Degree,scales="free")

ggplot(students_ans,aes(x=year,y=Enrolment,color=Major))+
  geom_point()+
  geom_smooth(,se=FALSE)+
  facet_grid(Degree~.,scales="free")

Evolution of enrollment for Genetics and Computational majors

For PhD degrees, as enrollment in IGG and BCB increased, enrollment in the ABG program decreased.

For MSc degrees, enrollment has been low and stable for interdepartmental programs and it has grown for ABG after 2021.

select_majors<-c("Animal Breeding and Genetics",
                 "Bioinformatics and Computational Biology",
                 "Genetics and Genomics")

students_genetics<-filter(student_long,Major%in%select_majors)


#ggplot(students_genetics,aes(x=year,y=Enrolment))+geom_point()+
#  geom_smooth()+  facet_grid(Major~Degree,scales="free")

ggplot(students_genetics,aes(x=year,y=Enrolment,color=Major))+
  geom_point()+
  geom_smooth(,se=FALSE)+
  facet_grid(Degree~.,scales="free")