从R导出SVM结果

Question

我在SVM中使用R构建了一个分类模型。我想导出结果，以便它可以用于在R中创建GUI。必须实现模型以预测来自未知数据的类结果。我无法找到导出模型的方法。

请帮助我完成在GUI中生成模型的步骤。

Answer 1

为什么不使用R Shiny在R中使用GUI？在R中使用简单的SVM GUI：

# Graphical user interface for support vector machines 
# If you don't have r shiny installed: install.packages("shiny")

library(shiny)
library(e1071)
library(MASS)

server <- function(input, output) {

  output$svmSummary <- renderPrint({
    data(cats)
    svmmodel <- svm(Sex~., data = cats)
    print(summary(svmmodel))
  })
}

ui <- shinyUI(fluidPage(
  sidebarLayout(
    sidebarPanel(
    "Simple UI for SVM"
    ),
    mainPanel(verbatimTextOutput("svmSummary"))

  )
))

shinyApp(ui = ui, server = server)

有关R Shiny的更多信息：Shiny