R/Color_Exchange.R

Defines functions color_exchange

color_exchange = function(image1){
image = image1
for (i in 1: nrow(image)){
  for (j in 1:ncol(image)){
    if(image[i,j] == 1){
      image[i,j] = 0
    }
    else
      image[i,j] = 1
  }
}
return (image)
}
rwang14/implant documentation built on Sept. 6, 2020, 3:21 a.m.