模糊聚类matlab程序

模糊聚类matlab程序，里面有相关系数法聚类，欧几里得法等聚类方法

function [lmdxhszflszflrlsz]=F_DtJIt（nR）%定义函数
%函数功能动态聚类图
%n模糊相似矩阵阶数；R，模糊相似矩阵
%返回值：lmd，分类水平数组；xhsz，最终序号数组
%返回值：flsz，分类数数组；flrlsz，子类容量数组
for i=1:n
    R（ii）=1;%修正错误
    for j=i+1:n
        if（R（ij）<0）
            R（ij）=0;
        else
            if（R（ij）>1）
                R（ij）=1;
            end
            R（ij）=round（10000*R（ij））/10000;%保留四位小数
            R（ji）=R（ij）;
        end
    end
    js0=0;
    while（1）%求传递闭包
        R1=Max_Min（RR）;
        js0=js0+1;
        if（R1==R）
            break;
        else
            R=R1;
        end
    end
    lmd（1）=1;
    k=1;
    for i=1:n
        for j=i+1:n
            pd=1;%找出所有不同元素
            for x=1:k
                if（R（ij）==lmd（x））
                    pd=0;
                    break;

 属性            大小     日期    时间   名称
----------- ---------  ---------- -----  ----

     文件       4837  2018-01-22 17:33  F_jidtjl.m

     文件       1960  2018-01-21 16:50  F_JIJsFtjl.m

     文件       1403  2018-01-21 15:13  F_JIR.m

     文件       1011  2018-01-20 21:12  F_JISjBzh.m

     文件        421  2018-01-20 11:45  Max_Min.m

     文件       6664  2018-01-22 13:00  F_DtJIt.m

     文件       5545  2018-01-22 13:10  F_DtJIt2.m

----------- ---------  ---------- -----  ----

                21841                    7