如何提取图像中的数据

从事科研的老师和同学们在撰写论文时，经常需要将文献中的曲线与自己的结果进行对比，为获取原始数据，最靠谱的方法当然是找原作者要。如果没有要到呢？本资源提供了两个程序，两种不同思路来从一副图像中获得原始近似数据。

function [  ] = ExtractPoint（ RGB ）

%目标颜色
R=255;
G=0;
B=0;
AimColor=[RGB];

Threshold=50;%为防止图像存在噪声设置的阈值

%图片名称
temp=importdata（‘ImageList.txt‘）;
ImageList=temp（2:length（temp））;

%图片坐标轴信息
temp=importdata（‘Axeslist.txt‘）;
Axeslist=temp.data;

%待抽取的点
temp=importdata（‘ExtractPointsList.txt‘）;
ExtractPointsList=temp.data;

for i=1:length（ImageList）
    %读取第i张图片
    ImagePath=ImageList{i};
    I=imread（ImagePath）;
    
    Height=size（I1）;
    Width=size（I2）;
    
    %记录所有待抽取的点（x的值）
    extractPoints=[];
    for j=1:size（ExtractPointsList2）/3
        if isnan（ExtractPointsList（i1+3*（j-1）））==0
            tempp=linspace（ExtractPointsList（i1+3*（j-1））ExtractPointsList（i3+3*（j-1））ExtractPointsList（i2+3*（j-1）））;
            extractPoints=[extractPoints tempp];
        end
    end
    
    %用变量表示坐标信息
    Xmin=Axeslist（i1）;
    Xmax=Axeslist（i2）;
    XInterval=Xmax-Xmin;
    Ymin=Axeslist（i3）;
    Ymax=Axeslist（i4）;
    YInterval=Ymax-Ymin;
    
    Result=[];
    for e=1:length（extractPoints）
        %获取待抽取点的x轴坐标
        %转化为像素点的位置
        c=round（（extractPoints（e）-Xmin）/XInterval*Width）;
        if c==0
            c=1;%防止越界
        end

        %找到对应的y值
        for r=Height:-1:1
            CurrentColor=zeros（13）;
            CurrentColor（1）=I（rc1）;
            CurrentColor（2）=I（rc2）;
            CurrentColor（3）=I（rc3）;

            distance=norm（AimColor-CurrentColor）; 
            if distance                NewResult=zeros（12）;
                NewResult（1）=extractPoints（e）;
                NewResult（2）=（（Height-r）/Height）*YInterval+Ymin;
                Result=[Result;NewResult];
                break;
            end
        end 
    end
    
    Result
    eval（[‘save Result‘num2str（i）]）;
    
    %使用时使用下面命令进行读取
    %load Result1 Result
end

end

 属性            大小     日期    时间   名称
----------- ---------  ---------- -----  ----

     文件        574  2017-03-31 10:30  如何提取图像中的数据\从图中扣点程序\Axeslist.txt

     文件    2244870  2017-03-27 19:26  如何提取图像中的数据\从图中扣点程序\BMP图\mcp3_mag_t1.bmp

     文件    2244870  2017-03-27 19:53  如何提取图像中的数据\从图中扣点程序\BMP图\mcp3_mag_t2.bmp

     文件    2238874  2017-03-31 09:35  如何提取图像中的数据\从图中扣点程序\BMP图\mcp3_mag_t3.bmp

     文件    2238874  2017-03-31 09:44  如何提取图像中的数据\从图中扣点程序\BMP图\mcp3_mag_t4.bmp

     文件    2238874  2017-03-31 09:44  如何提取图像中的数据\从图中扣点程序\BMP图\mcp3_mag_t5.bmp

     文件    2238874  2017-03-31 09:45  如何提取图像中的数据\从图中扣点程序\BMP图\mcp3_mag_t6.bmp

     文件    2238874  2017-03-31 09:46  如何提取图像中的数据\从图中扣点程序\BMP图\mcp3_pha_t1.bmp

     文件    2238874  2017-03-31 09:49  如何提取图像中的数据\从图中扣点程序\BMP图\mcp3_pha_t2.bmp

     文件    2235734  2017-03-31 09:50  如何提取图像中的数据\从图中扣点程序\BMP图\mcp3_pha_t3.bmp

     文件    2236022  2017-03-31 09:52  如何提取图像中的数据\从图中扣点程序\BMP图\mcp3_pha_t4.bmp

     文件    2238874  2017-03-31 09:54  如何提取图像中的数据\从图中扣点程序\BMP图\mcp3_pha_t5.bmp

     文件    2238874  2017-03-31 09:55  如何提取图像中的数据\从图中扣点程序\BMP图\mcp3_pha_t6.bmp

     文件    2244870  2017-03-27 19:55  如何提取图像中的数据\从图中扣点程序\BMP图\mcp3_rcs_t1.bmp

     文件    2238874  2017-03-31 10:00  如何提取图像中的数据\从图中扣点程序\BMP图\mcp3_rcs_t2.bmp

     文件    2232886  2017-03-31 10:02  如何提取图像中的数据\从图中扣点程序\BMP图\mcp3_rcs_t3.bmp

     文件    2238874  2017-03-31 10:03  如何提取图像中的数据\从图中扣点程序\BMP图\mcp3_rcs_t4.bmp

     文件    2238874  2017-03-31 10:04  如何提取图像中的数据\从图中扣点程序\BMP图\mcp3_rcs_t5.bmp

     文件    2238874  2017-03-31 10:04  如何提取图像中的数据\从图中扣点程序\BMP图\mcp3_rcs_t6.bmp

     文件    2238874  2017-03-31 10:06  如何提取图像中的数据\从图中扣点程序\BMP图\mcp5_mag.bmp

     文件    2238874  2017-03-31 10:08  如何提取图像中的数据\从图中扣点程序\BMP图\mcp5_pha.bmp

     文件    2238874  2017-03-31 10:10  如何提取图像中的数据\从图中扣点程序\BMP图\mcp5_rcs.bmp

     文件       1998  2017-03-31 10:21  如何提取图像中的数据\从图中扣点程序\ExtractPoint.m

     文件        876  2017-03-31 10:29  如何提取图像中的数据\从图中扣点程序\ExtractPointsList.txt

     文件       5391  2017-04-02 13:23  如何提取图像中的数据\从图中扣点程序\ExtractPointY.m

     文件        511  2017-03-31 10:30  如何提取图像中的数据\从图中扣点程序\ImageList.txt

     文件      28329  2017-04-02 13:23  如何提取图像中的数据\从图中扣点程序\Result1.mat

     文件      28838  2017-04-02 13:23  如何提取图像中的数据\从图中扣点程序\Result10.mat

     文件      24837  2017-04-02 13:23  如何提取图像中的数据\从图中扣点程序\Result11.mat

     文件      24427  2017-04-02 13:23  如何提取图像中的数据\从图中扣点程序\Result12.mat

............此处省略34个文件信息