Rの因子を任意の順番に並び替える

元データ: qba_all:

y MOYORIEKI
0 大津駅
1 山科関
0 石山駅
1 大津駅
0 彦根駅
0 南草津駅
1 彦根駅

計算: 因子の順番を駅の順番を揃える

stalist<-c("山科駅","大津駅","膳所駅","石山駅","瀬田駅","南草津駅","草津駅","栗東駅","守山駅","野洲駅","篠原駅","近江八幡駅","安土駅","能登川駅","稲枝駅","河瀬駅","南彦根駅","彦根駅")
qb_learn<-qb_all
qb_learn$MOYORIEKI<-factor(qb_learn$MOYORIEKI,levels=stalist)