# NOT RUN {
dataset <- arrow_feather_dataset(
list('/path/to/a.feather', '/path/to/b.feather'),
columns = reticulate::tuple(0L, 1L),
output_types = reticulate::tuple(tf$int32, tf$float32),
output_shapes = reticulate::tuple(list(), list())) %>%
dataset_repeat(1)
sess <- tf$Session()
iterator <- make_iterator_one_shot(dataset)
next_batch <- iterator_get_next(iterator)
until_out_of_range({
batch <- sess$run(next_batch)
print(batch)
})
# }
# NOT RUN {
# }
Run the code above in your browser using DataLab