Generating sub tables in R

I need to translate some Python code to R. What I need to do is sample random rows from a larger table multiple times so I can use it for later. Here is an illustration:

library(data.table)
library(dplyr)

test_table <- data.table(replicate(10, sample(0:1, 10, rep=TRUE)))
test_table

Gives a 10 x 10 table populated with (on some particular run):

So for instance one can get a sample:

sample <- sample_n(test_table, 2)
sample

Which might look like:

However, I don't understand the result when taking multiple samples:

kSampleSize <- 2
kNumSamples <- 3

samples <- replicate(kNumSamples, sample_n(test_table, kSampleSize))
samples

may give:

But it doesn't really look like a "list of sample". I expected samples[1] to give a result similar to sample but instead I get a weird result (varies per run):

1. 1 0

Am I doing something wrong? Am I misinterpreting the output? Is expecting a "list of sample" something to expect in Python but not in R?