Aliases: relevel relevel.default relevel.factor relevel.ordered
### ** Examples warpbreaks$tension <- relevel(warpbreaks$tension, ref = "M") summary(lm(breaks ~ wool + tension, data = warpbreaks))
Call: lm(formula = breaks ~ wool + tension, data = warpbreaks) Residuals: Min 1Q Median 3Q Max -19.500 -8.083 -2.139 6.472 30.722 Coefficients: Estimate Std. Error t value Pr(>|t|) (Intercept) 29.278 3.162 9.260 2e-12 *** woolB -5.778 3.162 -1.827 0.0736 . tensionL 10.000 3.872 2.582 0.0128 * tensionH -4.722 3.872 -1.219 0.2284 --- Signif. codes: 0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1 Residual standard error: 11.62 on 50 degrees of freedom Multiple R-squared: 0.2691, Adjusted R-squared: 0.2253 F-statistic: 6.138 on 3 and 50 DF, p-value: 0.00123