GIS编程实现游程编码

将图像矩阵设为1.txt 

2 3 1 3 5 5 5 5 5 5 5 3 4 4 4 4 
3 3 1 2 3 4 5 5 5 5 4 4 3 4 4 3 
2 2 3 1 2 4 2 5 5 4 4 4 4 3 3 3 
1 2 3 3 1 4 3 4 3 2 3 4 4 4 3 3 
1 3 1 3 1 1 4 3 2 3 3 3 3 3 3 3 
2 2 3 1 2 1 3 1 2 3 4 3 3 3 3 3 
2 3 3 2 1 2 2 3 2 3 3 3 3 3 3 3 
1 1 3 1 1 1 2 2 2 2 3 3 5 4 3 3 
2 2 2 1 1 2 2 2 1 2 4 2 3 3 3 4 
1 1 2 2 1 1 3 2 2 2 1 3 3 1 2 3 
1 1 1 1 1 1 2 1 1 1 1 2 3 3 3 3 
2 1 1 1 1 2 2 2 1 1 2 3 3 1 3 4 
2 2 1 1 1 1 1 2 1 1 4 3 2 3 2 3 
1 2 1 1 2 1 1 2 1 2 1 3 2 3 3 3 
2 1 2 2 1 1 4 2 1 1 1 2 2 3 2 4 
3 2 1 1 2 3 2 1 2 1 1 1 1 2 2 1

按列进行游程编码,Matlab以列优先。

所以,先将原矩阵转置

代码

B=load('1.txt') ;    %读矩阵

A=B'  ;           %矩阵转置

for i=1:16         %循环判断

for j=1:15

if A(j+1,i)~=A(j,i)   %比较前后是否相同

n=i;

l=j;

m=A(j,i);

fprintf('%d\t',n,l,m)   %输出

fprintf('\n')

end

end

end

前面为位置,列号行号,第三位为数值。(也就是原矩阵的行列号和数值)

在Excel表格中整理一下,得到最后结果。

1

1

2

2

2

3

3

2

2

4

1

1

1

2

3

2

3

1

3

3

3

4

2

2

1

3

1

2

4

2

3

4

1

4

4

3

1

4

3

2

5

3

3

5

2

4

5

1

1

11

5

2

6

4

3

6

4

4

6

4

1

12

3

2

10

5

3

7

2

4

7

3

5

1

1

2

12

4

3

9

5

4

8

4

5

2

3

2

13

3

3

13

4

4

9

3

5

3

1

2

15

4

7

1

2

4

10

2

5

4

3

6

2

2

7

3

3

4

11

3

5

6

1

6

3

3

7

4

2

4

14

4

5

7

4

6

4

1

7

5

1

8

2

1

5

8

3

6

5

2

7

7

2

8

3

3

5

9

2

6

6

1

7

8

3

8

6

1

9

3

2

6

7

3

7

9

2

8

10

2

9

5

1

6

8

1

11

6

1

8

12

3

9

8

2

6

9

2

11

7

2

8

13

5

9

9

1

6

10

3

11

11

1

8

14

4

9

10

2

6

11

4

11

12

2

12

1

2

9

11

4

10

2

1

15

1

2

12

5

1

9

12

2

10

4

2

15

2

1

12

8

2

9

15

3

10

6

1

15

4

2

12

10

1

13

2

2

10

7

3

15

6

1

12

11

2

13

7

1

10

10

2

15

7

4

12

13

3

13

8

2

10

11

1

15

8

2

12

14

1

13

10

1

10

13

3

15

11

1

12

15

3

13

11

4

10

14

1

15

13

2

16

1

3

13

12

3

10

15

2

15

14

3

16

2

2

13

13

2

14

1

1

15

15

2

16

4

1

13

14

3

14

2

2

   

16

5

2

13

15

2

14

4

1

   

16

6

3

   

14

5

2

   

16

7

2

   

14

7

1

   

16

8

1

   

14

8

2

   

16

9

2

   

14

9

1

   

16

13

1

   

14

10

2

   

16

15

2

   

14

11

1

      
   

14

12

3

      
   

14

13

2

      

 

    原文作者:游程编码问题
    原文地址: https://blog.csdn.net/qq_912917507/article/details/84662638
    本文转自网络文章,转载此文章仅为分享知识,如有侵权,请联系博主进行删除。
点赞