在R keras中，我想使用predict_generator（）函数来获得真正的y值

我想用R keras中的predict_生成器函数得到真正的y值，但我不知道如何得到

但我能得到的是模型预测的y值

我想得到生成器函数生成的测试数据的真实y值

我需要帮助

model <- keras_model_sequential() %>%
layer_gru(units = 32, dropout = 0.2, recurrent_dropout = 0.5,
input_shape = list(NULL, dim(data)[[-1]]-1)) %>%
layer_dense(units = 1, activation = 'sigmoid')

model %>% compile(
optimizer = optimizer_rmsprop(),
loss = "mse",
metrics = 'accuracy'
)  

history <- model %>% fit_generator(
train_gen,
steps_per_epoch = 80,
epoch = 10,
validation_data = val_gen,
validation_steps = val_steps,

)

pred1 <- predict_generator(model, test_gen, steps=test_steps)
write.csv(pred1,"test(delay=48).csv")

型号%
图层gru（单位=32，衰减=0.2，重复衰减=0.5，
输入形状=列表（空，尺寸（数据）[-1]]-1））%>%
层密度（单位=1，激活='sigmoid'）
模型%>%编译(
优化器=优化器_rmsprop（），
loss=“mse”，
指标=‘准确度’
)  
历史%fit\u生成器(
火车站，
每个历元的步数=80，
历元=10，
验证数据=val\U gen，
验证步骤=验证步骤，
)
pred1