library(tidyverse)
library(gt)
library(gmodels)

Encontrarán dos ejercicios de los análisis de Bondad de Ajuste.

Ejercicio #1

Musaraña

Un total de 125 individuals de un mamifero pequeño, musaraña fueron localizado dentro de una jaula, con la misma cantidad de 6 diferentes comida, la frequencia de que cada una de las musaraña selecionarón un tipo de comida esta en la tabla

Photo from: https://www.laguiadelvaron.com/wp-content/uploads/2020/08/reaparece-musarana-elefante-www.laguiadelvaron-1.jpg

musaraña=tribble(
  ~Tipo_comida, ~frecuencia,
  "C1", 13,
  "C2", 26,
  "C3", 39,
  "C4", 14,
  "C5", 28
)
gt(musaraña)
Tipo_comida frecuencia
C1 13
C2 26
C3 39
C4 14
C5 28

Contesta las siguientes preguntas

    1. Cual es el (son) valor(es) esperado para cada grupo.
    1. Prueba si hay preferencia o no para una comida

Ejercicio #1

Mofetas y rabia

Los siguientes datos son las frecuencias de mofetas encontrada con rabia en dos diferentes región geográficas.

##                _                           
## platform       x86_64-apple-darwin20       
## arch           x86_64                      
## os             darwin20                    
## system         x86_64, darwin20            
## status                                     
## major          4                           
## minor          5.0                         
## year           2025                        
## month          04                          
## day            11                          
## svn rev        88135                       
## language       R                           
## version.string R version 4.5.0 (2025-04-11)
## nickname       How About a Twenty-Six

Photo from: https://www.britannica.com/animal/skunk

mofetas=tribble(
  ~TRegion, ~con_rabia, ~sin_rabia,
  "Region1", 14, 29,
  "Region2", 12, 38
  
)
gt(mofetas)
TRegion con_rabia sin_rabia
Region1 14 29
Region2 12 38
    1. Cual es la hipótesis nula?
    1. Conprueba la hipótesis para determinar si tener rabia es igual en las dos regiones?
    1. Cual es el valor esperado de la mofetas sin rabia en la region 2?

AHORA contesta las preguntas en MSTeam.

Hay una fecha limite para la entrega de los ejercicios.