search for: dend4

...rs 2 and 3, ## i.e. 'flip' cluster 4 dend3 <- dend2 dend3[[1]] <- dend2[[2]] dend3[[2]] <- dend2[[1]] plot(dend3, main = "dend3") ## wish I could achieve with 'dend3 <- flip(dend2, cNum = 4) ## swap order of cluster 1 and object 1, ## i.e. 'flip' cluster 3 dend4 <- dend2 dend4[[2]][[1]] <- dend2[[2]][[2]] dend4[[2]][[2]] <- dend2[[2]][[1]] plot(dend4, main = "dend4") ## wish I could achieve with 'dend4 <- flip(dend2, cNum = 3) ## finally, it's clear that the midpoint attribute would also ## need to be modified by 'flip...