The R Project SVN R

Rev

Rev 61153 | Rev 67599 | Go to most recent revision | Show entire file | Ignore whitespace | Details | Blame | Last modification | View Log | RSS feed

Rev 61153 Rev 61168
Line 105... Line 105...
105
}
105
}
106
 
106
 
107
\examples{
107
\examples{
108
if (interactive()) {
108
if (interactive()) {
109
par(bg = "white")           # default is likely to be transparent
109
par(bg = "white")           # default is likely to be transparent
110
split.screen(c(2,1))        # split display into two screens
110
split.screen(c(2, 1))       # split display into two screens
111
split.screen(c(1,3), screen = 2) # now split the bottom half into 3
111
split.screen(c(1, 3), screen = 2) # now split the bottom half into 3
112
screen(1) # prepare screen 1 for output
112
screen(1) # prepare screen 1 for output
113
plot(10:1)
113
plot(10:1)
114
screen(4) # prepare screen 4 for output
114
screen(4) # prepare screen 4 for output
115
plot(10:1)
115
plot(10:1)
116
close.screen(all = TRUE)    # exit split-screen mode
116
close.screen(all = TRUE)    # exit split-screen mode
117
 
117
 
118
split.screen(c(2,1))        # split display into two screens
118
split.screen(c(2, 1))       # split display into two screens
119
split.screen(c(1,2),2)      # split bottom half in two
119
split.screen(c(1, 2), 2)    # split bottom half in two
120
plot(1:10)                  # screen 3 is active, draw plot
120
plot(1:10)                  # screen 3 is active, draw plot
121
erase.screen()              # forgot label, erase and redraw
121
erase.screen()              # forgot label, erase and redraw
122
plot(1:10, ylab = "ylab 3")
122
plot(1:10, ylab = "ylab 3")
123
screen(1)                   # prepare screen 1 for output
123
screen(1)                   # prepare screen 1 for output
124
plot(1:10)
124
plot(1:10)