File: lsmbasis-test.out

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 (74 lines) | stat: -rw-r--r-- 2,132 bytes parent folder | download | duplicates (2)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74

R version 3.5.1 (2018-07-02) -- "Feather Spray"
Copyright (C) 2018 The R Foundation for Statistical Computing
Platform: x86_64-w64-mingw32/x64 (64-bit)

R is free software and comes with ABSOLUTELY NO WARRANTY.
You are welcome to redistribute it under certain conditions.
Type 'license()' or 'licence()' for distribution details.

R is a collaborative project with many contributors.
Type 'contributors()' for more information and
'citation()' on how to cite R or R packages in publications.

Type 'demo()' for some demos, 'help()' for on-line help, or
'help.start()' for an HTML browser interface to help.
Type 'q()' to quit R.

> # tests for recover.data and lsm.basis
> 
> require("lsmeans")
Loading required package: lsmeans
Loading required package: emmeans
The 'lsmeans' package is now basically a front end for 'emmeans'.
Users are encouraged to switch the rest of the way.
See help('transition') for more information, including how to
convert old 'lsmeans' objects and scripts to work with 'emmeans'.
> 
> 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))
$X
  (Intercept) machineB machineC diameter
1           1        0        0       20
2           1        0        0       25
3           1        0        0       24
4           1        0        0       25
5           1        0        0       32
6           1        1        0       22

$bhat
[1] 17.3595092  1.0368098 -1.5840491  0.9539877

$nbasis
     [,1]
[1,]   NA

$V
            (Intercept)    machineB    machineC    diameter
(Intercept)   8.7688080 -0.24661297 -1.81994128 -0.32777673
machineB     -0.2466130  1.02599320  0.46721191 -0.01040561
machineC     -1.8199413  0.46721191  1.22578092  0.05202805
diameter     -0.3277767 -0.01040561  0.05202805  0.01300701

$dffun
function (k, dfargs) 
dfargs$df
<bytecode: 0x000000001d3b0338>
<environment: 0x000000001d3aea80>

$dfargs
$dfargs$df
[1] 11


$misc
list()

> 
> proc.time()
   user  system elapsed 
   0.93    0.34    1.26