A report generated using R, RStudio and knitr.
This report shows
squid = read.csv("squid.csv")
squid$Sex = factor(squid$Sex, levels = c(1, 2), labels = c("M", "F"))
hist(squid$GSI, main = "Histogram of GSI values", xlab = "All GSI values")
hist(squid$GSI[squid$Sex == "M"], main = "GSI values for Male Squids", xlab = "GSI values")
hist(squid$GSI[squid$Sex == "F"], main = "GSI values for Female Squids", xlab = "GSI values")