Sabermetrics (version 2.0)

wrcplus: wRC+

Description

wRC+ is a statistic which attempts to credit a hitter for the value of each outcome.

Usage

wrcplus(wRAA, PA, year, parkfactor, leaguewRC)

Arguments

wRAA

Weighted Runs Above Average (see wraa)

PA

Plate Appearances

year

Season

parkfactor

Park Factor

leaguewRC

League wRC

Value

Returns a value equal to (((wRAA/PA + leaguerpa)+(leaguerpa-parkfactor*leaguerpa))/leaguewRC)*100

Details

wRC+ is scaled so that league average is 100, and each point above or below 100 is 1 percentage point better or worse than league average

References

http://www.fangraphs.com/library/offense/wrc/

See Also

wraa,woba,wrc

Examples

## The function is currently defined as
function (wRAA, PA, year, parkfactor, leaguewRC) 
{
    leaguerpa <- linearWeights$RPerPA[which(linearWeights$Season == 
        year)]
    wrcplus <- (((wRAA/PA + leaguerpa) + (leaguerpa - parkfactor * 
        leaguerpa))/leaguewRC) * 100
  }