トップ
新規
一覧
単語検索
最終更新
ヘルプ
ログイン
アールメカブ
R_SupportVectorMachines
をテンプレートにして作成
開始行:
Baayen p.174 より，古フランス語テキスト集合oldFrenchを，G...
genre.svm <- svm(oldFrench, oldFrenchMeta$Genre)
# サポートベクトルを ＋ で明示する
plot(cmdscale(dist(oldFrench)),
col = c("blue","red")
[as.integer(oldFrenchMeta$Genre)],
pch = c("o", "+")[1:nrow(oldFrenchMeta)
%in% genre.svm$index + 1])
# ここで最後の +1 は，直前の %in% を含む式（の結果生成さ...
終了行:
Baayen p.174 より，古フランス語テキスト集合oldFrenchを，G...
genre.svm <- svm(oldFrench, oldFrenchMeta$Genre)
# サポートベクトルを ＋ で明示する
plot(cmdscale(dist(oldFrench)),
col = c("blue","red")
[as.integer(oldFrenchMeta$Genre)],
pch = c("o", "+")[1:nrow(oldFrenchMeta)
%in% genre.svm$index + 1])
# ここで最後の +1 は，直前の %in% を含む式（の結果生成さ...
ページ名:
