如何编写一个程序来找到R中的Hellinger距离

Question

所以，我最近了解了Hellinger Distance。现在，我想用R生成泊松分布的随机样本，然后使用它来估计$ \ lambda $。现在，生成样本并计算相对频率很容易。但是，我无法实现Poisson pmf $ f_ \ lambda（x）$，它应该有$ x，\ lambda $作为变量。但是，我不知道如何宣布这一点。我将$ \ lambda $替换为$ a $，我尝试了f<-function(x){exp{-a}*a^x/factorial(x)} 但它没有用。现在，有人可以告诉我，这之后该怎么办？感谢。

Answer 1

f<-function(x,a){exp{-a}*a^x/factorial(x)}