FileName |
F://RR//1.csv |
F://RR//2.csv |
F://RR//3.csv |
- library(igraph)
- library(DirectedClustering)
- my_list<- c("F://RR//1.csv","F://RR//2.csv","F://RR//3.csv")
- length(my_list)
- for(i in 1:length(my_list))
- {
- my_data <- read.csv(my_list,head=TRUE, row.names =1 )
- my_matrix <-as.matrix(my_data)
- CGClust<-ClustBCG(my_matrix, "directed")
- print(CGClust[["GlobaltotalCC"]])
- }
[color=rgb(51, 102, 153) !important]复制代码