Usage
ggally_nostic_hat(data, mapping, ..., linePosition = 2 *
sum(eval_data_col(data, mapping$y))/nrow(data),
lineColor = brew_colors("grey"), lineSize = 0.5, lineAlpha = 1,
lineType = 2, avgLinePosition = sum(eval_data_col(data,
mapping$y))/nrow(data), avgLineColor = brew_colors("grey"),
avgLineSize = lineSize, avgLineAlpha = lineAlpha, avgLineType = 1)