getBclustClassIntervals       package:classInt       R Documentation

_C_h_a_n_g_e _b_r_e_a_k_s _i_n _a "_c_l_a_s_s_I_n_t_e_r_v_a_l_s" _o_b_j_e_c_t

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

     Because "classIntervals" objects of style "hclust" or "bclust"
     contain hierarchical classification trees in their "par"
     attribute, different numbers of classes can be chosen without
     repeating the initial classification. This function accesses the
     "par" attribute and modifies the "brks" member of the returned
     "classIntervals" object.

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

     getBclustClassIntervals(clI, k)
     getHclustClassIntervals(clI, k)

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

     clI: a "classIntervals" object

       k: number of classes required

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

     a "classIntervals" object with a "modified" attribute set

_A_u_t_h_o_r(_s):

     Roger Bivand <Roger.Bivand@nhh.no>

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

     'classIntervals'

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

     data(jenks71)
     pal1 <- c("wheat1", "red3")
     opar <- par(mfrow=c(2,2))
     hCI5 <- classIntervals(jenks71$jenks71, n=5, style="hclust", method="complete")
     plot(attr(hCI5, "par"))
     plot(hCI5, pal=pal1, main="hclust k=5")
     plot(getHclustClassIntervals(hCI5, k=7), pal=pal1, main="hclust k=7")
     plot(getHclustClassIntervals(hCI5, k=9), pal=pal1, main="hclust k=9")
     par(opar)
     set.seed(1)
     bCI5 <- classIntervals(jenks71$jenks71, n=5, style="bclust")
     plot(attr(bCI5, "par"))
     opar <- par(mfrow=c(2,2))
     plot(getBclustClassIntervals(bCI5, k=3), pal=pal1, main="bclust k=3")
     plot(bCI5, pal=pal1, main="bclust k=5")
     plot(getBclustClassIntervals(bCI5, k=7), pal=pal1, main="bclust k=7")
     plot(getBclustClassIntervals(bCI5, k=9), pal=pal1, main="bclust k=9")
     par(opar)

