a3333.m

数学建模竞赛：DNA序列的分析

a=[6.19469026548673E-02 .079646017699115 0 6.19469026548673E-02 8.84955752212389E-03 1.76991150442478E-02 0 0 
3.80952380952381E-02 .019047619047619 .019047619047619 .019047619047619 .019047619047619 2.85714285714286E-02 0 0 
3.92156862745098E-02 2.94117647058824E-02 7.84313725490196E-02 4.90196078431373E-02 3.92156862745098E-02 8.82352941176471E-02 3.92156862745098E-02 0 
6.95652173913043E-02 .11304347826087 0 3.47826086956522E-02 8.69565217391304E-03 8.69565217391304E-03 8.69565217391304E-03 1.73913043478261E-02 
4.76190476190476E-02 2.85714285714286E-02 9.52380952380952E-03 2.85714285714286E-02 5.71428571428571E-02 .019047619047619 4.76190476190476E-02 9.52380952380952E-03 
7.89473684210526E-02 .131578947368421 8.7719298245614E-03 .043859649122807 0 8.7719298245614E-03 0 0 
5.76923076923077E-02 2.88461538461538E-02 4.80769230769231E-02 3.84615384615385E-02 3.84615384615385E-02 7.69230769230769E-02 1.92307692307692E-02 0 
.102564102564103 8.54700854700855E-02 0 6.83760683760684E-02 8.54700854700855E-03 8.54700854700855E-03 8.54700854700855E-03 4.27350427350427E-02 
2.97029702970297E-02 2.97029702970297E-02 6.93069306930693E-02 2.97029702970297E-02 6.93069306930693E-02 4.95049504950495E-02 6.93069306930693E-02 0 
2.80373831775701E-02 1.86915887850467E-02 0 1.86915887850467E-02 0 0 0 9.34579439252336E-03 
.107142857142857 5.35714285714286E-02 8.92857142857143E-03 2.67857142857143E-02 3.57142857142857E-02 1.78571428571429E-02 1.78571428571429E-02 2.67857142857143E-02 
3.63636363636364E-02 5.45454545454545E-02 2.72727272727273E-02 2.72727272727273E-02 9.09090909090909E-03 9.09090909090909E-03 1.81818181818182E-02 0 
6.30630630630631E-02 8.10810810810811E-02 0 .036036036036036 9.00900900900901E-03 9.00900900900901E-03 0 9.00900900900901E-03 
2.94117647058824E-02 1.96078431372549E-02 2.94117647058824E-02 9.80392156862745E-03 6.86274509803922E-02 4.90196078431373E-02 3.92156862745098E-02 0 
1.94174757281553E-02 1.94174757281553E-02 .029126213592233 9.70873786407767E-03 4.85436893203883E-02 3.88349514563107E-02 1.94174757281553E-02 0 
3.80952380952381E-02 .019047619047619 9.52380952380952E-03 9.52380952380952E-03 9.52380952380952E-03 9.52380952380952E-03 9.52380952380952E-03 9.52380952380952E-03 
3.84615384615385E-02 1.92307692307692E-02 9.61538461538462E-03 0 4.80769230769231E-02 2.88461538461538E-02 2.88461538461538E-02 0 
8.54700854700855E-02 .136752136752137 8.54700854700855E-03 5.12820512820513E-02 8.54700854700855E-03 8.54700854700855E-03 8.54700854700855E-03 2.56410256410256E-02 
1.88679245283019E-02 1.88679245283019E-02 0 9.43396226415094E-03 2.83018867924528E-02 9.43396226415094E-03 1.88679245283019E-02 0 
8.62068965517241E-02 .155172413793103 1.72413793103448E-02 4.31034482758621E-02 1.72413793103448E-02 1.72413793103448E-02 8.62068965517241E-03 1.72413793103448E-02]
A=[.0138 .0156 .0734 .0165 .0597 .0854 .0634 .0128]
B=[.0972 .1787 .0056 .0741 .0093 .0083 .0046 .0574]
for i =1:20
       b=a(i,:)-A;
       bb=a(i,:)-B;
       i,sqrt(sum(b.*b))-sqrt(sum(bb.*bb))
end