# NOT RUN {
t1_t2 <- paired_times(data = clr[,1:50], first = "_1",
second = "_25", common = "_0_")
klist_t1_t2 <- iterative_clustering(data = t1_t2, parallel = FALSE)
result_t1_t2 <- stabilitas(klist_t1_t2, common = "_0_")
# }
Run the code above in your browser using DataLab