I wish to generate moire pattern for straight, radial and circular patterns. how to write code

Question

Lalit 2014-9-17

1
链接

此问题的直接链接

https://ww2.mathworks.cn/matlabcentral/answers/155213-i-wish-to-generate-moire-pattern-for-straight-radial-and-circular-patterns-how-to-write-code

评论： Image Analyst 2021-7-8

Moire interferometry

I wish to generate moire patterns for straight, radial, and circular patterns. How to write code?

0 个评论
显示 -2更早的评论隐藏 -2更早的评论

请先登录，再进行评论。

请先登录，再回答此问题。

Answer 1

Image Analyst 2014-9-17

2
链接

此回答的直接链接

https://ww2.mathworks.cn/matlabcentral/answers/155213-i-wish-to-generate-moire-pattern-for-straight-radial-and-circular-patterns-how-to-write-code#answer_152045

Generate two patterns - spoke, sine wave, whatever - then multiply them together. I don't have any code already that does that.

4 个评论
显示 2更早的评论隐藏 2更早的评论

Image Analyst 2014-9-18

在 MATLAB Online 中打开

Seems like you're having trouble - at least you haven't replied. I'll give you a partial hint. The code below will give you most of the image below it. See if you can finish the code and add code to do the spokes.

clc;    % Clear the command window.
close all;  % Close all figures (except those of imtool.)
clear;  % Erase all existing variables. Or clearvars if you want.
workspace;  % Make sure the workspace panel is showing.
format long g;
format compact;
fontSize = 24;
rows = 480;
columns = 640;
% Make an image with rippled lines in it.
rowVector = (1 : rows)';
period = 20; % 20 rows
amplitude = 0.5; % Magnitude of the ripples.
offset = 1 - amplitude; % How much the cosine is raised above 0.
cosVector = amplitude * (1 + cos(2 * pi * rowVector / period))/2 + offset;
ripplesImage = repmat(cosVector, [1, columns]);
subplot(2, 3, 1);
imshow(ripplesImage, []);
axis on;
title('Ripple image', 'FontSize', fontSize);
% Make an image with tilted rippled lines in it.
ripplesImage2 = imrotate(ripplesImage, 5, 'crop'); % Rotate first image.
subplot(2, 3, 2);
imshow(ripplesImage2, []);
axis on;
title('Tilted Ripples', 'FontSize', fontSize);
% Multiply the ripple images together to get a Moire pattern.
grayImage = ripplesImage .* double(ripplesImage2);
subplot(2, 3, 3);
imshow(grayImage, []);
axis on;
title('Product = Moire Image', 'FontSize', fontSize);
set(gcf, 'Name', 'Demo by Image Analyst');
set(gcf, 'units','normalized','outerposition',[0 0 1 1]); % Maximize figure.
drawnow;
% Get a sombrero function.  
% This is the diffraction pattern of a circular aperture.
xo = (1 : columns) - columns/2;
yo = (1 : rows) - rows/2;
% Scale pattern
scaleFactor = 30;
x = xo / scaleFactor;
y = yo / scaleFactor;
sombrero = zeros(rows, columns);

you kahle 2021-7-8

hello, I am trying to remove a moire pattern from an image without losing any quality and I am having some trouble , there is somone who can help me to do that ?