Skip to content

sd(x1)^2 -> sd(g1)^2 ... sd(x2)^2 -> sd(g2)^2#20

Open
SeitaroSugawara wants to merge 2 commits intobcaffo:masterfrom
SeitaroSugawara:master
Open

sd(x1)^2 -> sd(g1)^2 ... sd(x2)^2 -> sd(g2)^2#20
SeitaroSugawara wants to merge 2 commits intobcaffo:masterfrom
SeitaroSugawara:master

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