Displaying 1 result from an estimated 1 matches for "copdurationsecs".
2009 Oct 07
3
graphics
...quot;Age of Male ", ylab = "Proportion of Eggs Hatched")
plot(proportion~femweight, pch=shapes[maleage], col=colors[maleage],bg="gray", xlab= "Female Weight (grams) ", ylab = " Proportion of Eggs Hatched")
abline(lm(proportion~femweight))
plot(proportion~copdurationsecs, pch=shapes[maleage], col=colors[maleage],bg="gray", xlab= "Copulation Duration (minutes) ", ylab = " Proportion of Eggs Hatched")
abline(lm(proportion~copdurationsecs))
legend(locator(1), as.character(levels(factor(maleage))),pch=shapes[maleage], col=colors[maleage])(...