t-тест

library(ggstatsplot)

## You can cite this package as:
##      Patil, I. (2021). Visualizations with statistical details: The 'ggstatsplot' approach.
##      Journal of Open Source Software, 6(61), 3167, doi:10.21105/joss.03167

library(AER)

## Loading required package: car

## Loading required package: carData

## Loading required package: lmtest

## Loading required package: zoo

## 
## Attaching package: 'zoo'

## The following objects are masked from 'package:base':
## 
##     as.Date, as.Date.numeric

## Loading required package: sandwich

## Loading required package: survival

library(dplyr)

## 
## Attaching package: 'dplyr'

## The following object is masked from 'package:car':
## 
##     recode

## The following objects are masked from 'package:stats':
## 
##     filter, lag

## The following objects are masked from 'package:base':
## 
##     intersect, setdiff, setequal, union

library(statsExpressions)
data(mtcars)

data1 <- mtcars
data1$cyl <- as.character(data1$cyl)

ggbetweenstats(
  data = data1, 
  x     = cyl,
  y     = mpg,
  title = "Результаты теста Геймса-Ховелла", 
  caption = "Тест используется в случае наличия 3 и больше независимых выборок", 
  ylab = "Miles/(US) gallon", 
  xlab = "Number of cylinders", 
  p.adjust.method = "none",
  bf.message = FALSE, 
  pairwise.display = "all")