Label {Lahman} | R Documentation |
Extracts the label for a variable from one or more of the *Labels
files.
Label(var, labels = rbind(battingLabels, pitchingLabels, fieldingLabels))
var |
name of a variable |
labels |
label table(s) to search, a 2-column dataframe containing variable names and labels. |
Returns the variable label, or var
if no label is found
Michael Friendly
battingLabels
,
pitchingLabels
,
fieldingLabels
require(plyr)
# find and plot maximum number of homers per year
batHR <- ddply(subset(Batting, !is.na(HR)), .(yearID),
summarise, max=max(HR))
with(batHR, {
plot(yearID, max,
xlab=Label("yearID"), ylab=paste("Maximum", Label("HR")),
cex=0.8)
lines(lowess(yearID, max), col="blue", lwd=2)
abline(lm(max ~ yearID), col="red", lwd=2)
})