我正在尝试使用可用的数据为几种分类方法/ hiper参数制作k倍CV
该集由208行组成,每行有60个属性.我正在使用read.table函数将其读入data.frame.
下一步是将我的数据分成k个折叠,假设k = 5.我的第一次尝试是使用
test < - createFolds(t,k = 5)
我有两个问题.第一个是折叠的长度彼此不相邻:
Run Code Online (Sandbox Code Playgroud)Length Class Mode
Fold1 29 -none-数字
折叠2 14-无 - 数字
折叠3 7-无 - 数字
折叠4 5 - 无 - 数字
折叠5 5 - 无 - 数字
另一个是,这显然是根据属性索引分割我的数据,但我想分割数据本身.我认为通过转置我的data.frame,使用:
test < - t(myDataNumericValues)
但是当我调用createFolds函数时,它给了我这样的东西:
Run Code Online (Sandbox Code Playgroud)Length Class Mode
Fold1 2496 -none-数字
折叠2 2496 -none-数字
折叠3 2495
-none- 数字折叠4 2496
-none- 数字折叠5 2497 -none-数字
长度问题已经解决,但它仍然没有相应地分割我的208数据.
关于我能做什么的任何想法?你认为插入包不是最合适的吗?
提前致谢
我对optim函数不是很熟悉,我想从结果中得到这些信息:a)实现结果需要多少次迭代?和b)绘制部分解的序列,即在每次迭代结束时获得的解.
我的代码到现在看起来像这样:
f1 <- function(x) {
x1 <- x[1]
x2 <- x[2]
x1^2 + 3*x2^2
}
res <- optim(c(1,1), f1, method="CG")
Run Code Online (Sandbox Code Playgroud)
如何改进它以获得更多信息?
提前致谢
让我假设我有一个带数值的变量,我想用10个字符打印它,如下所示:XXX XXXX XXX XXXX
.因此,例如,数字10将打印为000 0000 000 0010
.
我最直接的方式是使用,例如:
int value = 10;
printf("%010D", value);
Run Code Online (Sandbox Code Playgroud)
然而它显然产生:
0000000010
Run Code Online (Sandbox Code Playgroud)
有没有人知道是否有任何可以输出的内置函数
000 0000 000 0010
Run Code Online (Sandbox Code Playgroud)
或者有必要实施一个?
提前致谢