使列的数据等于R除以R中的序列的平均值均值

问题描述

一个简单的函数(每个人)都可以得到相等的值除以平均值(均值),而不是每次更改金额时都将其写出来。在此示例中,我有5。但是我可能想要更多或更少。谢谢。全部加起来为1。我知道我的解释不正确,但是希望您能理解

Amount <- c(Coat=1/5,Boat=1/5,Shop=1/5,Car=1/5,Bike=1/5)

假设我在“专栏”中有5个系列。我希望列中的值全部相等(1/5)。我希望该列总计为1。

sum(Amount) = 1

解决方法

我不知道我是否理解正确,但是我想您想对向量进行转换以保留比例,但总和为1。执行此操作的方法是将向量除以其和:

> amounts = c("car"=2,"bike"=2,"ship"=1)
> amounts = amounts/sum(amounts)
> amounts
 car bike ship 
 0.4  0.4  0.2 

这是您要找的吗?