如何复制整个数据帧并将其添加到R中的原始数据帧中?