模拟目录树

Question

有没有一种工具可以帮助我模拟这样的目录布局：

data.table::setDT(store22)[,lapply(.SD,function(x){na.omit(as.numeric(as.character(x)))}),by="product"]

#   product HD HS HR HO DF
#1:      ab 12 23 34 NA NA
#2:      ac NA NA NA 23 24

我知道我可以使用tempfile.mkdtemp（）并创建一个像这样的目录树，但是我问自己是否没有更简单的方法？

另一个答案显示了如何使用模拟。

在我的情况下，我选择foo/bar.txt foo/bar2.txt foo/blu/bar.txt 。