# NOT RUN {
fi<-antsImageRead( getANTsRData("r16") ,2)
convimg<-makeImage( c(3,3) , c(1,0,1,0,-4,0,1,0,1) )
convout<-convolveImage( fi, convimg )
convimg2<-makeImage( c(3,3) , c(0,1,0,1,0,-1,0,-1,0) )
convout2<-convolveImage( fi, convimg2 )
# }
Run the code above in your browser using DataLab