R语言 调和平均数

在这篇文章中，我们将看到如何在R编程语言中找到谐波平均数。

调和平均数是在需要速率的平均值时使用的，下面是其公式。

n个数字x1, x2, x3, …, xn的谐波平均数可以写成如下。

调和平均数 = n / ((1/x1) + (1/x2) + (1/x3) + . .+ (1/xn))

R语言 harmonic.mean()

在R语言中，我们可以使用harmonic.mean()函数来计算谐波平均数。

语法： harmonic.mean(data)
其中，数据是一个输入向量或数据帧。

但是这个方法在psych包中是可用的，所以我们必须安装并导入它。
Install – install.packages(“psych”)
Import – library(“psych”)

例1 :

在这个例子中，我们要找出10个元素的向量的谐波平均数。

# load the library
library("psych")  
  
# create vector
vector1=c(12:21)
  
# harmonic mean
print(harmonic.mean(vector1))

输出

[1] 15.98769

例2 :

在这个例子中，我们要在一个数据框架中寻找列的谐波平均数。在这里，我们创建了一个有4行3列的数据框架，并找到三列的谐波平均数。查找数据框架中特定列的调和平均数的语法。

dataframe$column

# load the library
library("psych")  
  
# create dataframe
data=data.frame(col1=c(12,2,3,4),
                col2=c(34,32,1,0),
                col3=c(2,45,3,2))
  
# display
print(data)
  
# harmonic mean of column1 
print(datacol1)
  
# harmonic mean of column2
print(datacol2)
  
# harmonic mean of column3
print(data$col3)

输出