X-Git-Url: https://git.donarmstrong.com/?a=blobdiff_plain;f=man%2Ftheta.s.Rd;h=bd7a3789340814a584e56d1c030101ed902e2480;hb=f512087dd94a7dc3462a9f31b48f61214cdc0f5e;hp=70115d0d5658ad6c1c55b66307a04d89ee8475e3;hpb=c827059eeafc8cbe41c812b26979543ab287803e;p=ape.git

diff --git a/man/theta.s.Rd b/man/theta.s.Rd
index 70115d0..bd7a378 100644
--- a/man/theta.s.Rd
+++ b/man/theta.s.Rd
@@ -40,9 +40,8 @@ theta.s(s, n, variance = FALSE)
 }
 \examples{
 data(woodmouse)
-y <- seg.sites(woodmouse)
-s <- length(y)
-n <- length(woodmouse)
+s <- length(seg.sites(woodmouse))
+n <- nrow(woodmouse)
 theta.s(s, n)
 theta.s(s, n, variance = TRUE)
 }