equalize               package:rimage               R Documentation

_M_a_k_e _i_m_a_g_e _h_a_v_i_n_g _e_q_u_a_l_i_z_e_d _h_i_s_t_o_g_r_a_m

_D_e_s_c_r_i_p_t_i_o_n:

     This function make image having equalized histogram of original
     image.

_U_s_a_g_e:

     equalize(img)

_A_r_g_u_m_e_n_t_s:

     img: target image

_V_a_l_u_e:

     Data of the same mode as 'img', in which minimum value is 0 and
     maximum value is 1.

_E_x_a_m_p_l_e_s:

       op <- par(mfrow=c(2,2))
       data(logo)

       plot(logo, main="Original Logo")
       plot(equalize(logo), main="Equalized Logo")

       catpic <- rgb2grey(read.jpeg(system.file("data", "cat.jpg", package="rimage")))
       plot(catpic, main="Cat Image in Greyscale")
       plot(equalize(catpic), main="Equalized Cat Image")

       par(op)

