Chapter 3 Import dataframe
calotriton_resp1 <- read_excel("calotriton_resp1_metadata.xlsx")
calotriton_resp1$individual<-as.factor(calotriton_resp1$individual)
calotriton_resp1$population<-as.factor(calotriton_resp1$population)
calotriton_resp1$time_point<-as.factor(calotriton_resp1$time_point)
calotriton_resp1$elevation<-as.factor(calotriton_resp1$elevation)
calotriton_resp1$temperature<-as.factor(calotriton_resp1$temperature)