Eetgedrag
knaagdieren:
Een bioloog onderzocht het effect van schimmelinfecties in voeding op
het eetgedrag van knaagdieren. Geïnfecteerde appels werden gegeven aan
een groep van 8 knaagdieren, steriele appels aan een groep van 4
knaagdieren. De hoeveelheid gegeten appel (gram) per lichaamsgewicht
(kilogram) werden gemeten. De data is beschikbaar in dataset
“knaagdieren”.
suppressPackageStartupMessages({
library(tidyverse)
library(ggplot2)})
knaagdieren <- data.frame(weight=c(11,33,48,34,112,369,64,44,177,80,141,332),group=as.factor(c(rep("treat",8),rep("ctrl",4))))
Analyseer of er een
verschil is in de gemiddelde hoeveelheid appels die gegeten worden in
beide groepen appels. Noteer de verschillende analysestappen en schrijf
een conclusie.
LS0tCnRpdGxlOiAiUHJhY3RpY3VtIDE6IFZvb3JiZXJlaWRpbmcgMyIKb3V0cHV0OiBodG1sX2RvY3VtZW50Ci0tLQoKYGBge3Igc2V0dXAsIGluY2x1ZGU9RkFMU0V9CmtuaXRyOjpvcHRzX2NodW5rJHNldChlY2hvID0gVFJVRSkKYGBgCgoKIyBFZXRnZWRyYWcga25hYWdkaWVyZW46CgpFZW4gYmlvbG9vZyBvbmRlcnpvY2h0IGhldCBlZmZlY3QgdmFuIHNjaGltbWVsaW5mZWN0aWVzIGluIHZvZWRpbmcgb3AgaGV0IGVldGdlZHJhZyB2YW4ga25hYWdkaWVyZW4uIEdlw69uZmVjdGVlcmRlIGFwcGVscyB3ZXJkZW4gZ2VnZXZlbiBhYW4gZWVuIGdyb2VwIHZhbiA4IGtuYWFnZGllcmVuLCBzdGVyaWVsZSBhcHBlbHMgYWFuIGVlbiBncm9lcCB2YW4gNCBrbmFhZ2RpZXJlbi4gRGUgaG9ldmVlbGhlaWQgZ2VnZXRlbiBhcHBlbCAoZ3JhbSkgcGVyIGxpY2hhYW1zZ2V3aWNodCAoa2lsb2dyYW0pIHdlcmRlbiBnZW1ldGVuLiBEZSBkYXRhIGlzIGJlc2NoaWtiYWFyIGluIGRhdGFzZXQgImtuYWFnZGllcmVuIi4KYGBge3J9CnN1cHByZXNzUGFja2FnZVN0YXJ0dXBNZXNzYWdlcyh7CmxpYnJhcnkodGlkeXZlcnNlKQpsaWJyYXJ5KGdncGxvdDIpfSkKYGBgCgoKCmBgYHtyfQprbmFhZ2RpZXJlbiA8LSBkYXRhLmZyYW1lKHdlaWdodD1jKDExLDMzLDQ4LDM0LDExMiwzNjksNjQsNDQsMTc3LDgwLDE0MSwzMzIpLGdyb3VwPWFzLmZhY3RvcihjKHJlcCgidHJlYXQiLDgpLHJlcCgiY3RybCIsNCkpKSkKYGBgCgojIEFuYWx5c2VlciBvZiBlciBlZW4gdmVyc2NoaWwgaXMgaW4gZGUgZ2VtaWRkZWxkZSBob2V2ZWVsaGVpZCBhcHBlbHMgZGllIGdlZ2V0ZW4gd29yZGVuIGluIGJlaWRlIGdyb2VwZW4gYXBwZWxzLiBOb3RlZXIgZGUgdmVyc2NoaWxsZW5kZSBhbmFseXNlc3RhcHBlbiBlbiBzY2hyaWpmIGVlbiBjb25jbHVzaWUuCg==