R ggplot中KNN模型的轮廓?

R ggplot中KNN模型的轮廓?,r,ggplot2,knn,R,Ggplot2,Knn,我有一个KNN模型,我正在使用等高线功能绘制该模型。这是我正在做的事情的一个简单例子(基于): 库(类) 图书馆(nnet) TrainC在编写代码后,请尝试以下操作: library(ggplot2) p <- ggplot(TrainC, aes(x1, x2)) p + geom_point(aes(colour = as.numeric(y) + 1)) df <- data.frame(x = rep(xp, np), y = rep(yp, each = np), z

我有一个KNN模型,我正在使用
等高线
功能绘制该模型。这是我正在做的事情的一个简单例子(基于):

库(类)
图书馆(nnet)

TrainC在编写代码后,请尝试以下操作:

library(ggplot2)

p <- ggplot(TrainC, aes(x1, x2))
p + geom_point(aes(colour = as.numeric(y) + 1))

df <- data.frame(x = rep(xp, np), y = rep(yp, each = np), z = zp)
p <- ggplot(df, aes(x, y, z = z))
p + stat_contour(bins = 1)
库(ggplot2)

p
d您的代码缺少从中获得函数“class.ind”的包名,即使我通过了那个错误,我也看不出np是在哪里定义的。@dwn对不起……class.ind来自
nnet
;这是正确的。np在定义xp的行上定义(分号后)。您只需拍摄第一张图像并添加
p+stat\u等高线(data=df,aes(x,y,z=z),bins=1)
library(ggplot2)

p <- ggplot(TrainC, aes(x1, x2))
p + geom_point(aes(colour = as.numeric(y) + 1))

df <- data.frame(x = rep(xp, np), y = rep(yp, each = np), z = zp)
p <- ggplot(df, aes(x, y, z = z))
p + stat_contour(bins = 1)
d <- transform(melt(matrix(zp, np)), xp=xp[X1], yp=yp[X2])
ggplot(d, aes(xp, yp, z=value)) + 
  geom_contour() + 
  geom_point(aes(x1, x2, colour=y, z=NULL), data=TrainC)