Displaying 1 result from an estimated 1 matches for "sub_0".
Did you mean:
ssub_0
2009 May 24
1
Timing issue using locator() in loop containing print()
..._subsets,ncol=4)
print("begin selections")
# .........................Loop for multiple rectangle selections on
image.....................................................
for (i in 1:tot_subsets) {
print("Select lower left and upper right for this rectangle")
sub_0<- locator(n=2)
rect(sub_0$x[1],sub_0$y[1],sub_0$x[2],sub_0$y[2],col="red",density=0)
text(sub_0$x[1]+(sub_0$x[2]-sub_0$x[1])/2,sub_0$y[1]+(sub_0$y[2]-sub_0$y[1])/2,paste("S",i),col="red")
#.......................Add each reactangle coords to master subs...