Convert each column to an ordered factor with appropriate labels
Loadinthedata.Converteachcolumntoanorderedfactorwithappropriatelabelss50_1995=read.table("s50_1995.txt",header=1)s50_1995$alcohol=factor(s50_1995$alcohol,levels=c(1,2,3,4,5),labels=c("not","onceortwic