newpred <- c(1, 0 ,0 ,1 ,0, 0, 0, 1, 0, 0, 1, 0, 0, 0, 0, 1, 0,
0, 0, 1, 0, 1, 1, 0, 0, 1, 0, 1, 0, 0, 1, 1, 1, 0,0, 1, 0, 0,
0, 0,0, 1, 0, 0, 0, 0, 0, 0, 1, 0, 1, 0, 0, 1, 0, 1, 1, 0,
0, 1, 0, 1, 0, 0, 1, 0, 0, 0, 0, 0, 1, 0, 1, 1, 1, 1, 0, 0, 0,
1,0, 0, 0, 0, 0, 1, 0, 1, 1, 1, 1, 0, 0, 0, 1,
1, 1, 1, 0, 0, 1, 0, 0, 0, 0, 0, 1, 0, 1, 0, 0)
newlab <- c(0, 0 ,0 ,0 ,0 ,0 ,0 ,1 ,0 ,0 ,0 ,0 ,0 ,0,
0, 0 ,0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
0 ,0, 1, 1, 0, 0, 0, 0, 0, 0, 1,
0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
0, 1 ,0, 0 ,0, 0 ,0, 0 ,1, 0 ,0, 0 ,0, 0 ,0,
0, 0 ,1 ,0 ,0 ,0 ,0 ,0 ,0 ,1,
0 ,1, 0 ,1, 0 ,0, 0 ,0, 0 ,0, 0 ,0, 0 ,0, 0 ,0)
だから、最初のベクトルは私の予測であり、第二のベクターは、参照です。なぜ私のカーブがVのように見えるのかわかりません。このようなROCカーブは見たことがありません!私のアドバイザーは、ポイントを追加して、グラフをよりスムーズにしたい/より多くのポイントを追加して曲線にすることを望んでいます。私はpROCを使ってグラフを作成しようとしましたが、追加できる唯一の引数は予測と参照でした。
私もROCR
print.cutoffs.at=seq(0,1,by=0.1), text.adj=c(-0.2,1.7))
にしようと、どのように私は、曲線を滑らか以上のポイントを追加します。この
を得ましたか。
あなたは1つの独立した変数しか持っていませんか?そしてその可変バイナリですか? – Dason
はい、それはバイナリである単一の独立変数です –
それでは、それはすでに得られるほど滑らかです – Dason