我有一个序列，例如：{A，B，A，B，A，A，A，A，B，A}，然后我们可以得到A和B的这个序列的频率。
A 7 \theta
B 3 1-\theta
根据BIC的定义：在这种情况下我应-2*log(maximum likelihood of A and B)+K*log(Obs)，K = 1且Obs = 10，\ theta的最大似然估计值为7/10。我知道如何用正常的步骤做到这一点，但是此时，我想用R中的函数，'BIC'来快速得到结果，任何人都可以给我一个解释来做到这一点？
由于