Last change
on this file since 144 was 2, checked in by Rick van der Zwet, 15 years ago |
Initial import of data of old repository ('data') worth keeping (e.g. tracking
means of URL access statistics)
|
File size:
489 bytes
|
Line | |
---|
1 | function lijst=vullijst(A)
|
---|
2 | % bij aanroep van deze funcie wordt een beeld matrix A
|
---|
3 | % geplaatst in het midden van een 2 maal zo breed en hoog beeld
|
---|
4 | % omringd met nullen
|
---|
5 | %
|
---|
6 | % bepaal dementie
|
---|
7 | [m,n] = size(A);
|
---|
8 | % maak nieuwe lijst
|
---|
9 | lijst = zeros(2*m,2*n);
|
---|
10 | %bepaal translatie
|
---|
11 | xmove = .5 * m;
|
---|
12 | ymove = .5 * n;
|
---|
13 | for i=1:m
|
---|
14 | for j=1:n
|
---|
15 | lijst(xmove + i, ymove + j) = A(i,j);
|
---|
16 | end
|
---|
17 | end
|
---|
18 | colormap(gray(256));
|
---|
19 | image(lijst);
|
---|
20 |
|
---|
Note:
See
TracBrowser
for help on using the repository browser.