The R Project SVN R

Rev

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

Rev 75196 Rev 77311
Line 230... Line 230...
230 
}
 230 
}
231 
if(interactive()) # not regularly, where pdf is stored
 231 
if(interactive()) # not regularly, where pdf is stored
232 
plotNchk(y74) # gives 3 warnings; 1. from pretty(): "very small range"
 232 
plotNchk(y74) # gives 3 warnings; 1. from pretty(): "very small range"
233 
plotNchk(y74[1:8]) # 3 warnings *and* no error anymore
 233 
plotNchk(y74[1:8]) # 3 warnings *and* no error anymore
234 
plotNchk(y74[1:2]) #    (ditto)
 234 
plotNchk(y74[1:2]) #    (ditto)
- 
 
 235 
 
- 
 
 236 
 
- 
 
 237 
## dotchart(*, pch=., groups=*) -- PR#16953
- 
 
 238 
x <- setNames(0:5, c('a','aa', 'aaa', 'b', 'bb', 'bbb'))
- 
 
 239 
y <- nchar(names(x)) # (minimal plot:)
- 
 
 240 
dotchart(x, color=y, pch=y, groups=y, xaxt="n", frame.plot=FALSE)
- 
 
 241 
## now pch and colors match groups