R 如何调整数值向量以使其和等于1L？

vec=c（1.349667e-04,1.969667e-04,4.866497e-02,6.196667e-05,3.560097e-02,7.796667e-05， 9.9.7.7万E-0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 1.9 7 7 7 7 0 0 0 0 0 0 0 0 0 0 0 0 0 0 6 6 6 6 6 6 7 7 7 7 7 7 7 7 7 6 6 7 7 7 7 7 7 7 7 7 7 7 7 7 7 7 7 E-0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0，1.4 6 6 6 6 6 6 6 6 6 6 6 6 6 6 6 7 7 7 7 7 7 7 7 7 7 7 7 7 7 7 7 7 7 7 7 7 7 7 7 7 7 7 7 7 7 7 7 7 7 7 7 E-0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0，1，1.7 7 7 7，1.7 7 7 7 7 7 7 7 7 7 7 7 7 7 7 7 7 7 7 7 7 7 7 7 7 7 7 7 7 7 7 7 7 7 7 7 441967e-03,4.049667e-04,4.196667e-05）

如何稍微调整此向量的每个值，使其总和为1L？

您可以这样做：

> sum(vec/sum(vec))==1L
[1] TRUE

你应该读一读

> sum(vec/sum(vec))==1L
[1] TRUE