Skip to content

Conversation

@SeitaroSugawara
Copy link

Fixed minor typos.

n1 <- length(g1); n2 <- length(g2)
sp <- sqrt( ((n1 - 1) * sd(x1)^2 + (n2-1) * sd(x2)^2) / (n1 + n2-2))
Error in is.data.frame(x) : object 'x1' not found
sp <- sqrt( ((n1 - 1) * sd(g1)^2 + (n2-1) * sd(g2)^2) / (n1 + n2-2))
sp
[1] 1.898625

SeitaroSugawara added 2 commits June 6, 2015 15:32
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment

Labels

None yet

Projects

None yet

Development

Successfully merging this pull request may close these issues.

1 participant