heav                package:CVThresh                R Documentation

_H_e_a_v_i_s_i_n_e _f_u_n_c_t_i_o_n

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

     This function generates Heavisine function values for n equally
     spaced points in [0,1].

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

     heav(n=1024)

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

       n: the number of data

_D_e_t_a_i_l_s:

     Heavisine function is introduced by Donoho and Johnstone (1994)
     and is useful test function evaluating a wavelet shrinkage method.

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

     Heavisine function values f(i/n), i=1,...,n and its variability
     ||f|| = sum_{i=1}^n (f_i - mena(f))^2 / (n-1) where mena(f) =
     sum_{i=1}^n f_i / n.

_R_e_f_e_r_e_n_c_e_s:

     Donoho, D.L. and Johnstone, I.M. (1994) Ideal spatial adaptation
     by wavelet shrinkage.  _Biometrika_, *81*, 425-455.

_S_e_e _A_l_s_o:

     'dopp', 'poly', 'fg1'.

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

     testheav <- heav(1024)
     plot(testheav$x, testheav$meanf, xlab="", ylab="", 
          main="Plot of Heavisine function", type="l")

