The R Project SVN R-packages

Rev

Rev 1689 | Show entire file | Ignore whitespace | Details | Blame | Last modification | View Log | RSS feed

Rev 1689 Rev 3798
Line 11... Line 11...
11
 
11
 
12
levelplot(z ~ x * y, subset(foo, z > 150), contour = T)
12
levelplot(z ~ x * y, subset(foo, z > 150), contour = T)
13
levelplot(z ~ x * y, foo, subset = z > 150, contour = T)
13
levelplot(z ~ x * y, foo, subset = z > 150, contour = T)
14
contourplot(z ~ x * y, foo, subset = z > 150, cuts = 10)
14
contourplot(z ~ x * y, foo, subset = z > 150, cuts = 10)
15
 
15
 
16
## subset group interaction has problems:
16
## subset group interaction has problems (does it any longer):
17
 
17
 
18
cloud(Sepal.Length ~ Petal.Length * Petal.Width, 
18
cloud(Sepal.Length ~ Petal.Length * Petal.Width, 
19
      data = iris, cex = 0.8, groups = Species, subpanel = panel.superpose, 
19
      data = iris, cex = 0.8, groups = Species, subpanel = panel.superpose, 
20
      main = "Stereo", screen = list(z = 20, x = -70, y = 0), subset = 30:60)
20
      main = "Stereo", screen = list(z = 20, x = -70, y = 0), subset = 30:60)
21
 
21
 
-
 
22
cloud(Sepal.Length ~ Petal.Length * Petal.Width, 
-
 
23
      data = iris[30:60, ], cex = 0.8, groups = Species, subpanel = panel.superpose, 
-
 
24
      main = "Stereo", screen = list(z = 20, x = -70, y = 0))
-
 
25
 
22
 
26
 
23
levelplot(Sepal.Length ~ Petal.Length * Petal.Width, 
27
levelplot(Sepal.Length ~ Petal.Length * Petal.Width, 
24
          data = iris, groups = Species, 
28
          data = iris, groups = Species, 
25
          subset = 30:60)
29
          subset = 30:60)
26
 
30
 
27
 
31
 
28
## error
-
 
29
## wireframe(z ~ x * y, foo, subset = z > 150)
-
 
30
 
-
 
31
## what's this supposed to do ?
-
 
32
## weird thing is, result is random
-
 
33
wireframe(z + I(z + 100) ~ x * y, foo, subset = z > 150)
-
 
34
 
32
 
35
 
33
 
36
cloud(z ~ x * y, foo)
34
cloud(z ~ x * y, foo)
37
cloud(z ~ x * y, foo, subset = z > 150)
35
cloud(z ~ x * y, foo, subset = z > 150)
38
 
36
 
39
 
37
 
40
wireframe(z ~ x * y, foo)
-
 
41
 
38
 
-
 
39
## long format: NA's clipped at the beginning (??)
-
 
40
 
-
 
41
splom(~iris[,1:4], iris, groups = Species)
-
 
42
splom(~iris[,1:4], iris, groups = Species, subset = 70:130, auto.key = T)
42
## error
43
 
43
## wireframe(z ~ x * y, foo, subset = z > 150)
44
parallel(~iris[,1:4] | Species, iris, subset = 30:130)
-
 
45
 
-
 
46
## NA-s in matrix
44
 
47
 
45
volna <- volcano
48
volna <- volcano
46
volna[20:40, 20:40] <- NA
49
volna[20:40, 20:40] <- NA
47
levelplot(volna)
50
levelplot(volna)
48
cloud(volna)
51
cloud(volna)
49
 
-
 
50
wireframe(volna)
52
wireframe(volna)
51
 
53
 
52
## long format: NA's clipped at the beginning (??)
-
 
53
 
-
 
54
 
-
 
55
 
54
 
56
splom(~iris[,1:4], iris, groups = Species)
-
 
57
splom(~iris[,1:4], iris, groups = Species, subset = 70:130, auto.key = T)
-
 
58
 
-
 
59
parallel(~iris[,1:4] | Species, iris, subset = 30:130)
-
 
60
 
55
 
61
dev.off()
56
dev.off()
62
 
57
 
63
 
58
 
64
 
59