Duckworth-Lewis-Stern calculator to calculate the revised target

Question

With the Cricket World Cup going on, I wanted to create a Duckworth-Lewis calculator of my own for One Day Internationals using R.

This is a challenge I assigned myself, to push myself in understanding more on R, and what I could do. Duckworth-Lewis is an algorithm used in cricket when unexpected delays (notably bad weather) takes centre stage. The algorithm (in One Day Internationals) involves calculating Team 2's Par Score, which is where 'Team 2 Target' equals 'Team 1 Score' times the quotient of 'Team 2 Resources' and 'Team 1 Resources', and we add 1 to find the target (otherwise it creates room for a South Africa 2003 World Cup scenario).

team2_target = function(team1_score, team1_resources, team2_resources) {
  return((team1_score * (team2_resources/team1_resources) + 1)
}

I want to make my function use the number of wickets lost, as well as the overs remaining to calculate the 'Team 2 Resources' variable. For example, if Team 1 scored 277 out of its full 50 overs and Team 2 scored 240, with the loss of 4 wickets after 40 overs, I want to be able to use the 'Overs' and 'Wickets Lost' as variables. It sounds really simple, but both these factors matter, and if either of my desired variables change, the team2_resources variable itself will change

Answer 1

From the "Interruption" menu, select Team 2's innings to be postponed.
Put 30 in the "Overs available" box for Team 1.

To inform the calculator how many runs Team 1 scored, enter 231 in the box.

In the "Overs available" variable for Team 2, enter 28.

According to the DLS technique, Team 2 requires 221 runs to win.

Team 2's par score = S * (R2/R1) = 231 * (71.8/75.1) = 220.85

Team 1 scored 268 runs from 50 overs, while Team 2 got to 229 runs from 45 overs and lost 6 wickets. Using our Duckworth Lewis calculator, let's see if Team 2 won.

1. Select Team 2's innings cut short from the "Interruption" option.
2. Enter 50 overs and 268 runs for Team 1.
3. Enter 45 overs and 6 wickets lost for Team 2.
4. We get a target of 230 runs for Team 2 to win the match.
5. Entering Team 2's 229 runs that they scored, we see that the match is a draw, according to the Duckworth Lewis algorithm.

Calculating this result manually using the resources table, we first lookup the resources Team 2 couldn't use. They had 5 overs left after losing 6 wickets, corresponding to 14.3% of resources. Therefore, Team 2 used 100% - 14.3% = 85.7% during their innings. Calculating Team 2's par score:

Team 2's par score = S * (R2/R1) = 268 * (85.7/100) = 229.68

Rounding this up, we get a target to win for Team 2 of 221 runs.