m = [1 4 5 6; 2 3 8 7; 15 14 9 10; 16 13 12 11]
c = repmat('G', size(m));
d = [' U '; 'L R'; ' D '];
for i = 1:numel(m) - 1
[e, f] = find(m == i);
[g, h] = find(m == i + 1);
c(m == i) = d(sign(g - e) + 2, sign(h - f) + 2);
end
c
bSA9IFsxIDQgNSA2OyAyIDMgOCA3OyAxNSAxNCA5IDEwOyAxNiAxMyAxMiAxMV0KYyA9IHJlcG1hdCgnRycsIHNpemUobSkpOwpkID0gWycgVSAnOyAnTCBSJzsgJyBEICddOwpmb3IgaSA9IDE6bnVtZWwobSkgLSAxCglbZSwgZl0gPSBmaW5kKG0gPT0gaSk7CglbZywgaF0gPSBmaW5kKG0gPT0gaSArIDEpOwoJYyhtID09IGkpID0gZChzaWduKGcgLSBlKSArIDIsIHNpZ24oaCAtIGYpICsgMik7CmVuZApjCg==