How Workout Duration and Gender Influence Heart Rate

library(tidyverse)

Warning: package 'tidyverse' was built under R version 4.5.3

Warning: package 'readr' was built under R version 4.5.3

Warning: package 'dplyr' was built under R version 4.5.3

── Attaching core tidyverse packages ──────────────────────── tidyverse 2.0.0 ──
✔ dplyr     1.2.0     ✔ readr     2.2.0
✔ forcats   1.0.1     ✔ stringr   1.6.0
✔ ggplot2   4.0.2     ✔ tibble    3.3.1
✔ lubridate 1.9.5     ✔ tidyr     1.3.2
✔ purrr     1.2.1     
── Conflicts ────────────────────────────────────────── tidyverse_conflicts() ──
✖ dplyr::filter() masks stats::filter()
✖ dplyr::lag()    masks stats::lag()
ℹ Use the conflicted package (<http://conflicted.r-lib.org/>) to force all conflicts to become errors

df <- read_csv("C:/Users/14408/Downloads/exercise.csv")

Rows: 15000 Columns: 8
── Column specification ────────────────────────────────────────────────────────
Delimiter: ","
chr (1): Gender
dbl (7): User_ID, Age, Height, Weight, Duration, Heart_Rate, Body_Temp

ℹ Use `spec()` to retrieve the full column specification for this data.
ℹ Specify the column types or set `show_col_types = FALSE` to quiet this message.

ggplot(df, aes(x = Duration, y = Heart_Rate, color = Gender)) +
  geom_point() +
  geom_smooth(method = "lm") +
  labs(
    title = "Workout Duration vs Heart Rate",
    x = "Workout Duration",
    y = "Heart Rate",
    color = "Gender",
    caption = "Source: Exercise dataset (exercise.csv), originally from Kaggle"
  ) +
  theme_minimal()

`geom_smooth()` using formula = 'y ~ x'

This graph shows the relationship between workout duration and heart rate. As workout duration increases, heart rate also tends to increase, which makes sense because longer workouts require more physical effort. The regression line highlights this positive trend, and the different colors represent gender differences across individuals.

Exercise dataset (exercise.csv), originally sourced from Kaggle.