Home > PR > ampliaconborde.m

ampliaconborde

PURPOSE ^

SYNOPSIS ^

function iamp=ampliaconborde(im,borde)

DESCRIPTION ^

CROSS-REFERENCE INFORMATION ^

This function calls: This function is called by:

SOURCE CODE ^

0001 function iamp=ampliaconborde(im,borde)
0002    
0003 iamp=rand(size(im)+[2*borde,2*borde]);
0004 
0005 %Parte central
0006 
0007 iamp(1+borde:end-borde,1+borde:end-borde)=im;
0008 
0009 % Parte de la izquierda
0010 iamp(1+borde:end-borde,1:borde)=repmat(im(:,1),1,borde);
0011 
0012 % Parte de la derecha
0013 iamp(1+borde:end-borde,end-borde+1:end)=repmat(im(:,end),1,borde);
0014 
0015 % Parte superior
0016 iamp(1:borde,1+borde:end-borde)=repmat(im(1,:),borde,1);
0017 
0018 % Parte inferior
0019 iamp(end-borde+1:end,1+borde:end-borde)=repmat(im(end,:),borde,1);
0020 
0021 % Esquina superior izquierda
0022 iamp(1:borde,1:borde)=im(1,1);
0023 
0024 % Esquina superior derecha
0025 iamp(1:borde,end-borde+1:end)=im(1,end);
0026 
0027 % Esquina inferior izquierda
0028 iamp(end-borde+1:end,1:borde)=im(end,1);
0029 
0030 % Esquina inferior derecha
0031 iamp(end-borde+1:end,end-borde+1:end)=im(end,end);
0032

Generated on Wed 29-Nov-2006 16:19:19 by m2html © 2003