DIP Exp5 -[ Point Detection ]
clc;
clear all;
close all;
% Read the input image
aa = imread('sample1.jpg');
% Convert the image to double for processing
f = double(rgb2gray(aa));
% Define the Laplacian filter
w = [-1, -1, -1; -1, 8, -1; -1, -1, -1];
% Apply the Laplacian filter
g = abs(imfilter(double(f), w));
% Threshold the filtered image
T = max(g(:)); % Find the maximum value in the filtered image
g = g >= T; % Threshold the image based on the maximum value
% Display original and result
subplot(121), imshow(aa), title('Original Image');
subplot(122), imshow(g), title('Result of Point Detection');
