powered by
bucketfill(im, x, y, z = 1, color, opacity = 1, sigma = 0, high_connexity = FALSE)
#Change the colour of a sail boats.new <- bucketfill(boats,x=169,y=179,color=c(125,0,125),sigma=20) layout(t(1:2)) plot(boats,main="Original") plot(boats.new,main="New sails")
Run the code above in your browser using DataLab