🎾 Tennis Analytics in R: Exploring Match Statistics with Data

R Programming — Sun, 21 Sep 2025 20:12:00 +0000

Tennis has evolved into a sport driven not only by athleticism but also by data-driven insights. From serve percentages to rally lengths, analytics can help uncover what really makes players successful. With R, we can turn raw tennis match data into powerful visualizations and predictive models.

In this article, we’ll walk through a simple workflow for tennis analytics in R. If you’d like to dive much deeper, check out my full guide: Mastering Tennis Analytics with R: Data Science for Player Performance and Match Strategy .

📊 Creating a Sample Tennis Dataset

Let’s start with a simulated dataset that mimics tennis match statistics:


library(dplyr)
library(ggplot2)

set.seed(123)

matches <- data.frame(
  player = sample(paste("Player", 1:8), 40, replace = TRUE),
  opponent = sample(paste("Player", 1:8), 40, replace = TRUE),
  aces = rpois(40, lambda = 6),
  double_faults = rpois(40, lambda = 2),
  winners = rpois(40, lambda = 25),
  unforced_errors = rpois(40, lambda = 18),
  first_serve_pct = round(runif(40, 55, 75), 1),
  match_duration = round(rnorm(40, mean = 110, sd = 25))
)

head(matches)

⚡ Offensive Index Metric

One way to measure player efficiency is by combining positive actions (aces + winners) and subtracting negative ones (double faults + unforced errors). Let’s call this the Offensive Index:


matches <- matches %>%
  mutate(
    offensive_index = (aces + winners) - (double_faults + unforced_errors)
  )

head(matches)

📈 Visualizing Player Performance

We can now compare first serve percentage against offensive index to see which players combine consistency with aggression:


ggplot(matches, aes(x = first_serve_pct, y = offensive_index, color = player)) +
  geom_point(size = 3, alpha = 0.7) +
  labs(
    title = "Serve Percentage vs Offensive Index",
    x = "First Serve %",
    y = "Offensive Index"
  ) +
  theme_minimal()

This scatterplot highlights well-balanced players and those who trade consistency for power.

🔮 Predicting Match Duration

We can also explore whether unforced errors are linked to longer match durations using a linear regression model:


model <- lm(match_duration ~ unforced_errors, data = matches)
summary(model)

ggplot(matches, aes(x = unforced_errors, y = match_duration)) +
  geom_point(color = "darkgreen") +
  geom_smooth(method = "lm", se = FALSE, color = "black") +
  labs(
    title = "Unforced Errors vs Match Duration",
    x = "Unforced Errors",
    y = "Match Duration (minutes)"
  ) +
  theme_minimal()

The regression can show whether higher error counts are associated with longer matches.

🏆 Key Takeaways

Tennis data offers rich opportunities for analysis: serves, winners, errors, and match duration.
R makes it easy to calculate custom performance metrics like the Offensive Index.
Visualization and regression modeling can uncover patterns not visible in raw stats.

And this is just scratching the surface. If you want to take your tennis analytics to the next level — building detailed performance models and strategy insights — check out my full guide: Mastering Tennis Analytics with R: Data Science for Player Performance and Match Strategy .

With the right tools, you can transform tennis data into a winning strategy.

🏀 Sports Analytics in R: From Raw Data to Insights

R Programming — Sun, 21 Sep 2025 20:03:05 +0000

Sports analytics has become a key tool for coaches, managers, and even fans who want to understand the game beyond the scoreboard. With R, we can transform raw sports data into actionable insights using statistical models, visualization, and machine learning.

In this post, we’ll walk through an example of analyzing basketball player statistics using R. If you’re looking for more resources to learn R, you can check out rprogrammingbooks.com
.

📊 Dataset

For simplicity, we’ll simulate a dataset of basketball players, including points, assists, rebounds, and minutes played.

Load libraries

library(dplyr)
library(ggplot2)

Simulated dataset

set.seed(123)
players <- data.frame(
player = paste("Player", 1:20),
points = round(rnorm(20, mean = 15, sd = 5)),
assists = round(rnorm(20, mean = 5, sd = 2)),
rebounds = round(rnorm(20, mean = 7, sd = 3)),
minutes = round(runif(20, min = 20, max = 40))
)

head(players)

⚡ Efficiency Metrics

One of the key aspects in sports analytics is efficiency. Instead of just looking at total points, we can measure how productive a player is per minute on the court.

players <- players %>%
mutate(
points_per_min = points / minutes,
assists_per_min = assists / minutes,
rebounds_per_min = rebounds / minutes
)

head(players)

📈 Visualizing Performance

Let’s compare scoring efficiency (points_per_min) against playing time (minutes) to identify under- or over-performing players.

ggplot(players, aes(x = minutes, y = points_per_min, label = player)) +
geom_point(color = "blue", size = 3) +
geom_text(vjust = -0.8, size = 3) +
labs(
title = "Scoring Efficiency vs. Minutes Played",
x = "Minutes Played",
y = "Points per Minute"
) +
theme_minimal()

This scatterplot quickly shows which players score efficiently even with limited playing time.

🔮 Predicting Performance with Regression

We can also use a simple linear regression to see how well minutes explain total points scored.

model <- lm(points ~ minutes, data = players)
summary(model)

Plot regression line

ggplot(players, aes(x = minutes, y = points)) +
geom_point(color = "darkred") +
geom_smooth(method = "lm", se = FALSE, color = "black") +
labs(
title = "Relationship Between Minutes and Points",
x = "Minutes Played",
y = "Total Points"
) +
theme_minimal()

The regression line highlights whether playing more minutes significantly contributes to scoring output.

🏆 Takeaways

Efficiency metrics often reveal hidden gems — players who contribute a lot in limited time.

Visualization helps coaches and analysts identify outliers and patterns quickly.

Simple regression can uncover relationships between workload (minutes) and performance (points, assists, rebounds).

Sports analytics in R empowers us to go beyond raw numbers and uncover stories hidden in the data. Whether you’re analyzing your favorite team, managing a fantasy league, or working in professional sports, R offers powerful tools to gain a competitive edge.

If you’d like to dive deeper into learning R with books and tutorials, visit rprogrammingbooks.com
.

DEV Community: R Programming