## Computer questionnaire data:
data(computer.df)
computer.df = within(computer.df, {
selfassess = factor(selfassess)
})
computer.fit = lm(score ~ selfassess, data = computer.df)
result = summary1way(computer.fit)
result
Run the code above in your browser using DataLab