Как можно добавить тонкие горизонтальные линии между каждой строкой в ​​полутоновом изображении?

Question

Мне нужно создать матрицу Адамара n-го порядка, в строке с двумя строками внутри каждой строки произвольно переставить элементы матрицы, а затем отобразить ее. До сих пор я все это делал. В конце концов, когда я imshow(matrix) - это красивое изображение черно-белых коробок. Но я не понял, как вставить тонкую линию, чтобы разделить каждую строку. я могу создать что-то вроде первого изображения на левой стороне, но не изображение справа (это цифры 1 и 2 из this paper)

 

Any помощь или замечания будут тщательно оценены ,

Answer 1

Я не пытался код, но я думаю, что что-то подобное должно работать:

sizeOfACube = 6; 
numberOfRows = 47;  

RGB = imread('image.png'); 
RGB = imresize(A, [(numRows+numberOfRows) numCols]); 


for i=1:1:NumberOfRows 
    RGB(i*6,:,:) = 0; 
end 

imagesc(RGB); 
imwrite(RGB,'newImage.png'); 

с: sizeOfAcube размер одного куба на QRcode. numRows и numCols количество строк и столбцов исходного изображения.

Answer 2

Одним из решений является использование патчей, например, следующим образом:

% set up example array 
xl = 24; yl = xl; 
[X Y] = find(hadamard(xl)==1); 
% generate figure 
figure, hold on 
for ii=1:length(X) 
    patch(X(ii) + [0 0 1 1],Y(ii) + [0.1 0.9 0.9 0.1],[1 1 1],'Edgecolor',[1 1 1]) 
end 
axis([0 xl+1 0 yl+1]) 
axis('square') 

Команда патч patch(x,y, color) принимает вершины элемента многоугольника как x и y. В этом примере вы можете изменить термин [0.1 0.9 0.9 0.1], чтобы установить толщину ограничивающей черной линии.

Это создает

Под редакцией

Для конкретного экземпляра, представленной OP:

H=Hadamard(48); %# now to row-double the matrix 
A=(1+H)/2; 
B=(1-H)/2; 
C=[A; B]; %# the code below randomly permutes elements within the rows of the matrix 
[nRows,nCols] = size(C); 
[junk,idx] = sort(rand(nRows,nCols),2); %# convert column indices into linear indices 
idx = (idx-1)*nRows + ndgrid(1:nRows,1:nCols); %# rearrange whatever matrix 
E = C; 
E(:) = E(idx); 
[X Y] = find(logical(E)); 
xl = length(X); 
yl = length(Y); 
figure, hold on 
for ii=1:xl 
    rectangle('Position',[X(ii) Y(ii)+.2 1 0.8],'facecolor',[1 1 1],'edgecolor',[1 1 1]) 
end 
axis([0 max(X)+1 0 max(Y)+1]) 
axis('square') 
set(gca,'color',[0 0 0]) 
set(gca,'XTickLabel',[],'YTickLabel',[],'XTick',[],'YTick',[]) 

В этом примере используется rectangle вместо пластыря, чтобы генерировать острые углы.

Изображение:

Answer 3

Я нашел с помощью векторных подходов (например, patch и rectangle) для такого рода проблемы излишне сложной. Я думаю, что создать новый образ проще. Это позволяет избежать проблем округления с плавающей запятой и других вещей, которые возникают с помощью векторной графики.Мое решение ниже зависит от некоторых функций в Image Processing Toolbox, но просто и быстро:

% Create data similarly to @TryHard 
H = hadamard(48); 
C = (1+[H;-H])/2; 
rng(0); % Set seed 
C(:) = C(randperm(numel(C))); % For demo, just permute all values, not rows 

% Scale image and lines 
scl = 10; % Amount to vertically scale each row 
pad = 2; % Number of pixels to add between each row 
C = imresize(C,scl,'nearest'); 
C = blockproc(C,[scl size(C,2)],@(x)[x.data;zeros(pad,size(C,2))]); 
C = C(1:end-pad,:); % Remove last line added 

% Dispay image 
imshow(C) 

Это приводит к изображению, как этот

                     

Параметры scl и pad могут быть легко с учетом различных размеров и относительных размеров. Вы можете позвонить imresize(...,'nearest') еще раз после добавления линий для дальнейшего масштабирования изображения, если это необходимо. Линия blocproc потенциально может быть более эффективной с различными параметрами (см. Справку). Его также можно было бы заменить вызовами im2col и col2im, которые, возможно, были бы более быстрыми, если бы грязнее.