u=1:10
v=u.*u
plot(u,v)
saveas(gcf,'u^2.tif')
filename=('usqrd.xlsx');
A=[u;v]
xlswrite(filename,A)