resamples函数如何在测试集比较多模型性能

问题遇到的现象和发生背景 R语言用resamples函数计较多模型在同一数据集表现，如何让数据集是测试集呢

问题相关代码，请勿粘贴截图

运行结果及报错内容

我的解答思路和尝试过的方法

我想要达到的结果