Original

Mitchell Starc v India’s openers

Objective

The purpose of our data is to inform the audience of the performance of Indian opening batsmen against left-handed fast bowler Mitchel Starc. The data concentrates on the performance of the athletes from the 2015 World Cup to July 2019. While conducting this study, all cricket viewers, Indian cricket team supporters, and Australian cricket team fans were taken into account. It has been determined the average number of runs scored against Mitchal Starc and the number of batsmen dismissed by left-handed seamers.

The selected visualisation had the following three primary issues:

  • Data is improperly scaled. Some athletes have higher average runs scored, whereas others have been dismissed more frequently. Without appropriate scales, it is unclear how they have been positioned.

  • There are no labels, rendering it extremely ambiguous which figure represents what. The red circle represents the quantity of terminations, which is not specified in the visualised data. One cannot reach a conclusion by merely observing the image.

  • The left measure is completely meaningless because it does not indicate whether it represents the average or the dismissals.

Reference * How India can beat Australia, Indian Batsmen vs Left Arm pace. from ESPN cricket info website: https://www.espncricinfo.com/story/_/id/26927142/how-india-beat-australia

Code

# Load the required libraries
library(ggplot2)

# Define the data frame
Ind_Batsmen <- data.frame(Player = c("KOHLI", "JADHAV", "SHARMA", "DHAWAN", "DHONI"),
                          Dismissal = c(5, 1, 10, 12, 9),
                          Average = c(100, 62, 51.9, 34.4, 24.77))

# Create the base plot
Ind_bat <- ggplot(data = Ind_Batsmen, aes(x = Player, y = Dismissal, group = 1))

# Add line and point geometries
Ind <- Ind_bat +
  geom_line(stat = "identity", colour = "turquoise3") +
  geom_point(colour = "turquoise3") +
  
  # Add labels for average runs
  geom_text(aes(label = paste(Average)), nudge_y = -1) +
  
  # Set plot title and axis labels
  labs(
    title = "Indian Batsmen Average Runs vs Mitchell Starc",
    y = "Number of Times Dismissed"
  ) +
  
  # Set the theme to minimal
  theme_minimal() +
  
  # Set y-axis limits
  scale_y_continuous(limits = c(0, 12))

Data Reference * How India can beat Australia, Indian Batsmen vs Left Arm pace. from ESPN cricket info website: https://www.espncricinfo.com/story/_/id/26927142/how-india-beat-australia

Reconstruction

The following plot fixes the main issues in the original.