我试图弄清楚如何解决这个问题。我想使用 paste() 和 seq() 方法将不同的元素存储到一个数组中，例如 xtrain1、xtrain2... xtrainN。这些元素也代表一个变量，应该应用于数组函数。这个想法是创建一个由这些元素组成的字符串，并将其解析为数组函数，该函数识别出这个字符串是函数内部的变量。创建向量 seq_Xtrain 它为字符串中所需数量的 logValues（例如 10）创建元素。如果我将不同的元素直接应用于数组函数，它会起作用。我认为提取字符串内的元素不起作用。如果有人可以帮助我就好了，谢谢！
seq_Xtrain <- paste("xtrain", seq(from=1, to=logValue),sep="", collapse=", ")
### Output of seq_Xtrain
[1] "xtrain1, xtrain2, xtrain3, xtrain4, xtrain5, xtrain6, xtrain7, xtrain8, xtrain9, xtrain10"
x_train <<- array( c(seq_Xtrain), dim=c(dim(xtrain1),logValue))
####### For example this works
##x_train <<- array( c(xtrain1, xtrain2, xtrain3, xtrain4,xtrain5, xtrain6,
## xtrain7, xtrain8,xtrain9, xtrain10, xtrain11, xtrain12,
## xtrain13, xtrain14, xtrain15, xtrain16,xtrain17, xtrain18, xtrain19, xtrain20), dim=c(dim(xtrain1),20))
### Received output
> x_train[2]
[1] "xtest1, xtest2, xtest3, xtest4, xtest5, xtest6, xtest7, xtest8, xtest9, xtest10, xtest11, xtest12, xtest13, xtest14, xtest15, xtest16, xtest17, xtest18, xtest19, xtest20"
### Desired Output
> x_train[2]
[1] 0.4444944
我也不是 100% 确定您想要做什么，因为缺少一些可重现的样本数据。但是看看我使用的这个例子get：
logValue <- log(1:3)
xtrain1 <- log(1)
xtrain2 <- log(2)
xtrain3 <- log(3)
seq_Xtrain <- paste0("xtrain", 1:length(logValue))
x_train <- array(sapply(seq_Xtrain, get))
Get 查找所需名称的对象并检索它们的值。在这种情况下，这会产生
> x_train
[1] 0.0000000 0.6931472 1.0986123
本文收集自互联网，转载请注明来源。
如有侵权，请联系[email protected] 删除。
我来说两句