e <- c(a, a, b, b) * 486; e 2 * sum(o * log(o/e)) # lrt, same as above sum( (o - e)^2 / e) # Pearson
Add the following code to your website.
REMOVE THIS Copy to clipboard
For more information on customizing the embed code, read Embedding Snippets.