# \donttest{
#Carregar imagem de exemplo
im=read_image(example_image(1))
##mostrar imagem
plot_image(im)
##Diminuir a resolucao (tamanho da imagem)
im2=resize_image(im,w=1000,plot=TRUE)
##Cortar Imagem
im3=crop_image(im2,w =200:750,h=100:650,plot = TRUE)
##Aumentar brilho
im4=edit_image(im3,brightness = 0.1)
#Aumentar contraste
im5=edit_image(im4,contrast = 1.2)
#Aumentar gamma
im6=edit_image(im5,gamma = 1.1)
#Alterando brilho, contraste e gamma
imb=edit_image(im3,brightness = 0.1,contrast = 1.7,gamma = 1.2)
#Mostrando ambas as imagens simultaneamente.
im4=join_image(im3,imb)
# }
Run the code above in your browser using DataLab