给出以下代码:
dataset <- read.csv2("/DATASET/dataset.csv", header = FALSE)
# Create my_data
my_data <- dataset
# Convert to a tibble
library("tibble")
my_data <- as_data_frame(my_data)
A <- my_data[1:10,3]
B <- my_data[1:10,4]
n = nrow(A)
trainIndex = sample(1:n, size = round(0.7*n), replace=TRUE)
train = A[trainIndex ,]
test = B[-trainIndex ,]
在以70%的训练和30%的测试对数据集进行拆分之后,我想创建一个包含输出列表“ train”的列表“输出”,然后将水平添加的“ test”列表仅添加到一个列表中。
例如:
output <- append(train,test)
但是“输出”必须是新的单个列表。 我已经尝试过:
output <- append(train,test)
但是它将两个列表合二为一,而不仅仅是一个列表。 你能帮助我吗?谢谢
答案 0 :(得分:0)
您必须使用unlist
函数来使列表变平。有一个名为recursive
的可选参数,默认为TRUE。
final_output = unlist(output)