powered by
boxblur(im, sigma, boundary_conditions = TRUE)
boxblur(boats,5) %>% plot(main="Dirichlet boundary") boxblur(boats,5,TRUE) %>% plot(main="Neumann boundary")
Run the code above in your browser using DataLab