Kidney and Liver Weights

## 
## Attaching package: 'dplyr'
## The following objects are masked from 'package:stats':
## 
##     filter, lag
## The following objects are masked from 'package:base':
## 
##     intersect, setdiff, setequal, union

Data

## Warning: package 'tidyverse' was built under R version 4.1.3
## -- Attaching packages --------------------------------------- tidyverse 1.3.1 --
## v ggplot2 3.3.5     v purrr   0.3.4
## v tibble  3.1.6     v stringr 1.4.0
## v tidyr   1.2.0     v forcats 0.5.1
## v readr   2.1.2
## Warning: package 'ggplot2' was built under R version 4.1.3
## Warning: package 'tibble' was built under R version 4.1.3
## Warning: package 'tidyr' was built under R version 4.1.3
## Warning: package 'readr' was built under R version 4.1.3
## Warning: package 'forcats' was built under R version 4.1.3
## -- Conflicts ------------------------------------------ tidyverse_conflicts() --
## x dplyr::filter() masks stats::filter()
## x dplyr::lag()    masks stats::lag()
## Warning: package 'ggpubr' was built under R version 4.1.3
## Warning: package 'rstatix' was built under R version 4.1.3
## 
## Attaching package: 'rstatix'
## The following object is masked from 'package:stats':
## 
##     filter

Mean and Standard Deviation of the Weight of the Kidney

ANOVA

Normality Test

## Warning: package 'car' was built under R version 4.1.3
## Loading required package: carData
## Warning: package 'carData' was built under R version 4.1.3
## 
## Attaching package: 'car'
## The following object is masked from 'package:purrr':
## 
##     some
## The following object is masked from 'package:dplyr':
## 
##     recode

Normality Test

## 
##  Shapiro-Wilk normality test
## 
## data:  res_aov$residuals
## W = 0.93803, p-value = 0.2681

The distribution of the data is normally distributed.

Equality of Variances Test

There is quality of variances among the levels of Dosage.

#One-way ANOVA

##             Df Sum Sq Mean Sq F value Pr(>F)
## Dosage       5 0.5189  0.1038   0.844  0.544
## Residuals   12 1.4759  0.1230

Result: There is no significant differnce among the different Dosages.

No pairwise comparison since the result above is not significant