janus

  create a texture-mapped globe

clear
close all
rgb1 = imread('cv20.jpg');
rgb2 = repmat(rgb1,[1 2]);
imshow(rgb2);

close all
rgb = im2double(flipdim(rgb2,1));
sphere(30)
h = findobj('Type','surface');
set(h,'CData',rgb,'FaceColor','texturemap','EdgeColor','none');
axis equal
axis off
set(gcf,'Color','white')
camva(6)

f = getframe(gcf);
imshow(f.cdata);