Raw Message

Message-ID: <1B36B995-8ABE-41AC-A530-B08AA24FE4CB@gmail.com>
Date: 2023-02-16T16:02:52Z
From: Emilio L. Cano
Subject: [R-es] SVM plot duda
In-Reply-To: <CANuuowNTxqtxfd7LB7=x4PdZZVQGUet_8o5m=t4=bMXU-tu26w@mail.gmail.com>

Hola,

El mensaje es claro: el modelo svmfit no existe, tú has llamado al ajuste ?modelo?. De todas formas, aparte de eso tendrías que especificar qué dimensiones (variables predictivas) quieres representar. Si miras en la ayuda de ?plot.svm lo tienes explicado.

Esto sí funcionaría:

plot(modelo,df11, LDH ~ INL )

Gracias por proporcionar el código y los datos para poder reproducir el error.

Un saludo,

Emilio L. Cano



> El 16 feb 2023, a las 12:44, Jose Betancourt Bethencourt <betanster en gmail.com> escribió:
> 
> Estimados
> En este modelo no puedo hacer el plot(svmfit,df11 ) #AQUI NO TRABAJA
> Le adjunto Excel
> 
> 
> library(readxl)
> 
> df11
> attach(df11)
> 
> df11$fallecido=factor(df11$fallecido)
> 
> # Selección de una submuestra del 70% de los datos
> set.seed(101)
> tamano.total <- nrow(df11)
> tamano.entreno <- round(tamano.total*0.7)
> datos.indices <- sample(1:tamano.total , size=tamano.entreno)
> datos.entreno <- df11[datos.indices,]
> datos.test <- df11[-datos.indices,]
> 
> # Ejecución del modelo SVM
> modelo <- svm(fallecido~., data=datos.entreno)
> 
> # Predicción de los restantes
> prediccion <- predict(modelo,new=datos.test)
> 
> # Tabla de confusión.
> 
> (mc <- with(datos.test,(table(prediccion,fallecido))))
> 
> 
> # % correctamente clasificados
> (correctos <- sum(diag(mc)) / nrow(datos.test) *100)
> 
> 
> plot(svmfit,df11 ) #AQUI NO TRABAJA
> 
> Saludos José
> <df11.xlsx>_______________________________________________
> R-help-es mailing list
> R-help-es en r-project.org
> https://stat.ethz.ch/mailman/listinfo/r-help-es


	[[alternative HTML version deleted]]