r - 在 R 中为逻辑回归模型创建合成数据集
问题描述
我正在尝试为随机创建的200
样本点创建一个(合成)数据集。问题是我得到重复的列名,但我的要求是我只想要一target
列y
这是我的方法:
#For samples
library(mvtnorm)
library(fontawesome)
a1 <- c(1, 0)
a2 <- c(0, 1)
M <- cbind(a1, a2)
C0 <- rmvnorm(100, c(0, 0), M)
C1 <- rmvnorm(100, c(5, 0), M)
#Creating synthetic dataset
dat <- rbind(C0, C1)
y <- sign(-1 - 2 * x1 + 4 * x2 )
y[y == -1] <- 0
df1 <- cbind.data.frame(y, C)
df1
想知道我的过程中有什么问题
解决方案
如果需要从 'dat' 创建 'y'
y <- sign(-1 - 2 * dat[,1] + 4 * dat[,2] )
现在,“df”将是
head(df1)
# y X1 X2
#1 0 -0.7846368 0.2959261
#2 0 1.6764476 0.8565073
#3 0 -0.9609016 -0.2585588
#4 0 0.5455316 0.2600099
#5 1 -1.5251354 0.2887918
#6 0 -0.1563197 0.2524742
推荐阅读
- javascript - Jquery 从选中的 jquery 对象集合中选择
- php - HHVM Repo Authoritative - 删除源
- javascript - Java Script中构造函数和另一个函数之间的共享逻辑
- xml - XSLT 比较属性和值
- xquery - 将结果输出到文本文件时出现 XQuery 基数错误
- c# - ASP.NET 对大文件抛出 404,对超大文件抛出 400
- python - 检查变化的数字是低于还是高于上次
- json - Amazon Athena:更改表以忽略格式错误的 json 错误
- html - 为什么这个 HTML 没有结束
- 标签?
- javascript - '无法读取未定义的属性'DataTable''将 Google 图表实施到我的 SAPUI5 项目中