This is analogous to categorizing the scores into bins. The assumption of normality of residuals is violated.
# Load libraries
library(haven)
# Read in data
odata <- read_dta("https://stats.idre.ucla.edu/stat/data/ologit.dta")
# ols model with the single quantitative predictor
misfit <- lm(apply ~ gpa, data = odata)
summary(misfit)
#>
#> Call:
#> lm(formula = apply ~ gpa, data = odata)
#>
#> Residuals:
#> Min 1Q Median 3Q Max
#> -0.7917 -0.5554 -0.3962 0.4786 1.6012
#>
#> Coefficients:
#> Estimate Std. Error t value Pr(>|t|)
#> (Intercept) -0.22016 0.25224 -0.873 0.38329
#> gpa 0.25681 0.08338 3.080 0.00221 **
#> ---
#> Signif. codes: 0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1
#>
#> Residual standard error: 0.6628 on 398 degrees of freedom
#> Multiple R-squared: 0.02328, Adjusted R-squared: 0.02083
#> F-statistic: 9.486 on 1 and 398 DF, p-value: 0.002214
plot(misfit,2)

# changing response variable to a factor throws an error
odata$apply <- factor(odata$apply)
misfit <- lm(apply ~ gpa, data = odata)
#> Warning in model.response(mf, "numeric"): using type = "numeric" with a factor
#> response will be ignored
#> Warning in Ops.factor(y, z$residuals): '-' not meaningful for factors