Relevel関数について

Question

前提・実現したいこと

統計処理をしています。
LME4を実施する中で水準内の参照値を変えたいと思い、relevel関数を用いようとしたところエラーが発生した。
今まで同様のことをしていて発生したことはありませんでした。

発生している問題・エラーメッセージ

cc$Type<-relevel(cc$Type,ref="A")
relevel.default(cc$Type, ref = "A") でエラー:
'relevel' only for (unordered) factors

該当のソースコード

R言語
ソースコード
a1<-read.table("clipboard",header=TRUE)
fix(a1)
IDふりをしたものをnumericからcharactorに変更しました

subset関数を使ってnumericのみを取り出しscaleし、data.frameでaaとしました
subset関数を使ってcharactorのみを取り出しdata.frameでbbとしました

cc<-cbind(aa,bb)
str(cc)で確認したところデータに異常はありませんでした。

試したこと

ここに問題に対して試したことを記載してください。

補足情報（FW/ツールのバージョンなど）

R4.03
Rstudio