三九宝宝网宝宝绘画儿童画

用MATLAB实现图像的拼接显示

02月23日 编辑 39baobao.com

[如何实现点击按钮之后实现图片显示出来]1 2 3 4 5 6 7 html内容: <div class="divName"> <img src=http://wenwen.sogou.com/z/zsznet/"location.jpg" id="img" /> </div> <div class="button"> <input type="button" id="butt...+阅读

看楼主的要求,似乎没楼上说的那么复杂。

楼主只是要求把四幅图片变成同样大小然后拼接起来就是了。

如果上述理解无误,那么实现并不困难,主要有以下几点需要注意:

1、图像格式:由于图像格式包括索引色和真彩色这两大类不同的类型,所以需要统一转换一下才能拼接。这两类图像的判断根据是读入的数据是二维还是三维,对于二维的数据,如果调色板为空,则按照灰度图像处理。

2、数据格式:根据具体的图像文件格式不同,读入的数据可能是logical、uint8、uint16、uint32、single、uint64、double 等不同的格式,要想进行拼接,需要转换为同一种数据类型。

3、注意图像的宽高顺序:512*384的图像应为[384 512]。

参考代码

% 待拼接文件

imfile = {'1.jpg', '2.jpg', '3.gif', '4.png'};

% 读入文件,并调整大小、转换格式

A = cell(2,2);

for i=1:4

% 读入图像数据

[X, map] = imread(imfile{i});

if size(X,3) == 1

% 有些灰度图像无map数据

if isempty(map)

map = gray;

end

% 转换为真彩色

X = ind2rgb(X,map);

end

% 调整图像大小,并转换数据格式

A{i} = im2double( imresize(X, [384 512]) );

end

% 拼接图像并显示

A = [A{1} A{2}; A{3} A{4}];

imshow(A)

以下为关联文档:

matlab中如何批量载入图像比如你有50张图2113片,名字分别叫做5261 1.jpg,2.jpg,3.jpg...尺寸大小为 512 x 512 放在 F:\test目录下 clear all;clc; N = 512; picDB = zeros(N,N,50); for i = 1:50 pic...

用PS CS3怎么拼接照片应用一下以前的回答...: 如果只是想单纯把两张图放到一起的话,就先打开一张图,用选框工具选择你想拼的地方,然后点"编辑"-"拷贝"。再打开另一张图,点“编辑”“粘贴”这样两张图就在...

在iPhone中如何实现将View保存为图像有了楼上的UIImage以后,这样保存+ (BOOL)writeImage:(UIImage*)image toFileAtPath:(NSString*)aPath{if ((image == nil) || (aPath == nil) || ([aPath isEqualToString:""]))r...

mfc编程如何设置用图片控件动态显示jpg图像jpg显示的步骤:1。打开图片控件的绘图DC。2。使用OleLoadPicture函数读取jpg图像到内存中。(导入olepro32.dll)3。向DC上绘制图像示例如下:CDC *pDC = GetDlgItem(IDC_STATIC_IM...

matlab图像处理已知转换矩阵想要把两张图片拼接起来并得到他12000*12000=144M个像素左右。你如果合理控制的话,应当是可以的。32位的MATLAB:单个数组最大为: 677 MBMATLAB所有总数组最大为:1602 MBA=zeros(12000,12000)); %这个出错,一个浮点...

matlab读出图片矩阵后再怎么拼接显示图片的是axes控件,就是那个图表样的按钮 pushbutton1中要完成以下任务。 先用imread读出来,再用imshow显示图片。还要将读出的图像矩阵保存以备其它控件调用。 其中选择文...

matlab两幅图片拼接im1 = imread('image1.jpg'); %% image1.jpg你可以改成你需要处理的图像的名字 im2 = imread('image2.jpg'); [row1,col1] = size(im1); [row2,col2] = size(im2); %%%%%如...

asp显示绝对路径的图片的实现<% ' 转为根路径格式 Dim sTempUrl sTempUrl = url If Left(sTempUrl, 1) = "/" Then RelativePath2RootPath = sTempUrl End If Dim sWebEditorPath sWebEditorPath = Reques...

用vb如何实现一周内每天显示不同的图片Select Case Weekday(Now) Case vbMonday ' 星期一 Image1.Picture = LoadPicture(App.Path & "\1.jpg") Case vbTuesday ' 星期二 Image1.Picture = LoadPicture(App.Path &...

推荐阅读
图文推荐