如何将数字矢量截断为R中指定的小数位数?