質問をすることでしか得られない、回答やアドバイスがある。

15分調べてもわからないことは、質問しよう!

ただいまの
回答率

90.23%

RでのSVMのプロットについて

受付中

回答 0

投稿 編集

  • 評価
  • クリップ 1
  • VIEW 1,115

Mtw0706

score 23

以下の様なプログラムで、ファイル.csvの5列目のクラスを識別対象としてプロットを行いたいと思っています。
予定では横軸、縦軸はcsvの6列目と12列目の情報を用いるつもりです。
しかしながら実行すると、
Only plots of classification ksvm objects supported
というエラーメッセージが表示されます。
原因がわかる方が居ましたら回答よろしくお願いします。

library(kernlab)

x<-read.csv("ファイル.csv") #csv読み込み
rowdata<-nrow(x) #データ数

set.seed(100) 
n<-sample(rowdata,rowdata*0.01) #実験的に1%を訓練様に

x_train<-as.matrix(x[n,5]) #1/0で区別される要素
x_test<-as.matrix(x[-n,5]) #1/0で区別される要素

y_train<-cbind(x[n,6],x[n,12]) #6列目は1~100の乱数
y_test<-cbind(x[-n,6],x[-n,12]) #12列目は0~100000の乱数

z_train<-data.frame(y_train,x_train) #データフレームにまとめ
z_test<-data.frame(y_test,x_test)

x.ksvm<-ksvm(x_train~.,data=z_train) #svm

plot(x.ksvm,data=z_train[,1:2]) #プロット

  • 気になる質問をクリップする

    クリップした質問は、後からいつでもマイページで確認できます。

    またクリップした質問に回答があった際、通知やメールを受け取ることができます。

    クリップを取り消します

  • 良い質問の評価を上げる

    以下のような質問は評価を上げましょう

    • 質問内容が明確
    • 自分も答えを知りたい
    • 質問者以外のユーザにも役立つ

    評価が高い質問は、TOPページの「注目」タブのフィードに表示されやすくなります。

    質問の評価を上げたことを取り消します

  • 評価を下げられる数の上限に達しました

    評価を下げることができません

    • 1日5回まで評価を下げられます
    • 1日に1ユーザに対して2回まで評価を下げられます

    質問の評価を下げる

    teratailでは下記のような質問を「具体的に困っていることがない質問」、「サイトポリシーに違反する質問」と定義し、推奨していません。

    • プログラミングに関係のない質問
    • やってほしいことだけを記載した丸投げの質問
    • 問題・課題が含まれていない質問
    • 意図的に内容が抹消された質問
    • 広告と受け取られるような投稿

    評価が下がると、TOPページの「アクティブ」「注目」タブのフィードに表示されにくくなります。

    質問の評価を下げたことを取り消します

    この機能は開放されていません

    評価を下げる条件を満たしてません

    評価を下げる理由を選択してください

    詳細な説明はこちら

    上記に当てはまらず、質問内容が明確になっていない質問には「情報の追加・修正依頼」機能からコメントをしてください。

    質問の評価を下げる機能の利用条件

    この機能を利用するためには、以下の事項を行う必要があります。

まだ回答がついていません

15分調べてもわからないことは、teratailで質問しよう!

  • ただいまの回答率 90.23%
  • 質問をまとめることで、思考を整理して素早く解決
  • テンプレート機能で、簡単に質問をまとめられる

同じタグがついた質問を見る