Displaying 1 result from an estimated 1 matches for "61c61".
Did you mean:
61861
2002 Feb 22
2
R gnome and lda: found the difference
...aring afterwards with diff, I get:
alobo at humboldt:> diff lda.default.gnome.txt lda.default.nognome.txt
1c1
< function (x, grouping, prior = proportions, tol = 1, method =
c("moment",
---
> function (x, grouping, prior = proportions, tol = 1e-04, method =
c("moment",
61c61
< if (all(abs(w - w0) < 0,01))
---
> if (all(abs(w - w0) < 0.01))
109c109
< dist <- 0 * dist - matrix(log(prior), n, ng, byrow = TRUE)
---
> dist <- 0.5 * dist - matrix(log(prior), n, ng, byrow = TRUE)
It's clear then that R with...