Aan de slagGa gratis aan de slag

Leeftijdscategorieën per schelpgewicht-categorieën

Eerder, in hoofdstuk 2, heb je agecat gemaakt voor abalones jonger dan 10,5 jaar (gecodeerd als "< 10.5") versus 10,5 jaar en ouder (gecodeerd als "10.5 and older"). Laten we nu ook de schelpgewichten van de abalone opdelen in categorieën van gelijk aan of lager dan 0,235 gram versus zwaarder dan 0,235 gram.

De gegevensset abaloneKeep met agecat is voor je geladen, samen met het pakket dplyr.

Deze oefening maakt deel uit van de cursus

R voor SAS-gebruikers

Cursus bekijken

Oefeninstructies

  • Gebruik de functie ifelse() om shellcat toe te voegen aan abaloneKeep voor schelpgewicht in 2 categorieën boven en onder 0,235 g, met labels "<= 0.235g" en "> 0.235g".
  • Maak een kruistabel met de naam tableageshell voor agecat bij shellcat. Voer chisq.test() uit op tableageshell.
  • Maak een mozaïekplot van agecat bij shellcat. Gebruik de kleuren "light blue" en "grey". Zet de titel op "Mosaicplot of age by shell categories".

Praktische interactieve oefening

Probeer deze oefening eens door deze voorbeeldcode in te vullen.

# Add shellcat to abaloneKeep
___ <- ___ %>%
  mutate(shellcat = ifelse(___, ___, ___))

# Run chisq.test of agecat by shellcat
tableageshell <- ___ %>% 
  with(___)

chisq.test(___)

# Make mosaicplot of agecat by shellcat
mosaicplot(___ ~ ___, data = ___,
           color = c(___, ___),
           main = ___)
Code bewerken en uitvoeren