Displaying 1 result from an estimated 1 matches for "x1coord".
Did you mean:
xcoord
2012 Feb 11
1
object not found - Can not figure out why I get this error: Error in NROW(yCoordinatesOfLines) : object 'low' not found
...add_HorizontalLine<-function(yCoordinatesOfLines, on=1, ...) {
lenv <- new.env()
lenv$add_horizontalline <- function(x, yCoordinatesOfLines, ...) {
xdata <- x$Env$xdata
xsubset <- x$Env$xsubset
x0coords <- rep(1, NROW(yCoordinatesOfLines))
x1coords <- rep(NROW(xdata[xsubset]), NROW(yCoordinatesOfLines))
if ((NROW(x0coords) > 0) & (NROW(x1coords) > 0)) {
segments(x0coords,
yCoordinatesOfLines,
x1coords,
yCoordinatesOfLines, ...)
# ablin...