写一个matlab程序识别曲线图的坐标以及原始数据的点的集合，并且自动消除噪声，不需要提取轮廓，将提取到的点转化为坐标，并且输出为excle

以下是一个基本的 Matlab 程序，可以实现曲线图的坐标识别和原始数据点的集合识别，以及自动消除噪声并将提取到的点转换为坐标并输出到 Excel 文件中。请注意，该程序可能需要根据实际情况进行调整和优化。

% 读入图像
img = imread('curve.png');

% 转换为灰度图像
gray_img = rgb2gray(img);

% 二值化处理
bw_img = imbinarize(gray_img);

% 消除噪声
bw_img = bwareaopen(bw_img, 10);

% 获取坐标轴
[B, L] = bwboundaries(bw_img, 'noholes');
stats = regionprops(L, 'Area', 'BoundingBox');
areas = [stats.Area];
[max_area, max_idx] = max(areas);
bbox = stats(max_idx).BoundingBox;
axis_img = imcrop(bw_img, bbox);

% 获取坐标轴端点
endpoints = detectHarrisFeatures(axis_img);
endpoints_xy = endpoints.Location;

% 获取曲线数据点
curve_img = imcrop(bw_img, [0, 0, bbox(1) - 1, size(bw_img, 1)]);
curve_img = bwareaopen(curve_img, 10);
curve_img = imfill(curve_img, 'holes');
curve_img = imclearborder(curve_img);

% 将曲线数据点转换为坐标
[y_coords, x_coords] = find(curve_img);
coords = [x_coords, y_coords];
coords = sortrows(coords);

% 输出到 Excel 文件
filename = 'output.xlsx';
xlswrite(filename, ['X', 'Y'], 'Sheet1', 'A1');
xlswrite(filename, coords, 'Sheet1', 'A2');

请注意，上述程序仅是一个基本示例，您需要根据实际情况进行调整和优化。