File: lsmbasis-test.R

package info (click to toggle)
r-cran-lsmeans 2.30-0-2
  • links: PTS, VCS
  • area: main
  • in suites: bullseye, sid
  • size: 168 kB
  • sloc: makefile: 2
file content (10 lines) | stat: -rw-r--r-- 262 bytes parent folder | download | duplicates (2)
1
2
3
4
5
6
7
8
9
10
# tests for recover.data and lsm.basis

require("lsmeans")

fiber.lm <- lm(strength ~ machine + diameter, data = fiber)

rd <- recover.data(fiber.lm)

lsm.basis(fiber.lm, trms = attr(rd, "terms"), 
          xlev = levels(rd$machine), grid = head(rd))