12 列のデータ フレームがあり、12 列目の曲線の色に基づいて、このデータの R にアンドリュース曲線をプロットしたいと考えています。以下はデータのサンプルです (列が数字と一致していないことをお詫びします)。
Teacher_explaining Teacher_enthusiastic Teacher_material_interesting Material_stimulating Material_useful Clear_marking Marking_fair Feedback_prompt Feedback_clarifies Detailed_comments Notes Year
80 80 80 80 85 85 80 80 80 80 70 3
70 60 30 40 70 60 30 40 70 0 30 3
100 90 90 80 80 100 100 90 100 100 100 MSc
85 85 85 90 90 70 90 50 70 80 100 MSc
90 50 90 90 90 70 100 50 80 100 100 4
100 80 80 75 90 80 80 50 80 80 90 3
このデータから、以下のコードを使用してアンドリュース曲線をプロットしようとしました:
install.packages("andrews")
library(andrews)
col <- as.numeric(factor(course[,12]))
andrews(course[,1:12], clr = 12)
ただし、12 番目の列には 3 つのグループ (3 種類の応答) があり、Excel でデータ フレームを編集せずに、そのうちの 2 つをグループ化し、データのアンドリュース曲線をプロットしたいと考えています。
x <- subset(course, Year == "MSc" & "4")
y <- subset(course, Year == "3")
上記のコードを試しましたが、x の引数が機能しません。"MSc"、"3"、"4" は 12 列目のグループで、MSc と 4 をグループ化して、アンドリュース曲線が同じ色になるようにします。
これを行う方法について何か考えがある場合は、お知らせください。