Last change
on this file since 37 was
37,
checked in by (none), 14 years ago
|
Added original make3d
|
-
Property svn:executable set to
*
|
File size:
943 bytes
|
Rev | Line | |
---|
[37] | 1 | function H=vgg_projective_basis_2d(p1,p2,p3,p4);
|
---|
| 2 | %
|
---|
| 3 | % function H=vgg_projective_basis_2d(p1,p2,p3,p4);
|
---|
| 4 | %
|
---|
| 5 | % Computes 3x3 homography matrix H such that
|
---|
| 6 | %
|
---|
| 7 | % H * [p1 p2 p3 p4] ~ [ 1 0 0 1
|
---|
| 8 | % 0 1 0 1
|
---|
| 9 | % 0 0 1 1 ]
|
---|
| 10 | %
|
---|
| 11 | % fsm@robots
|
---|
| 12 | %
|
---|
| 13 |
|
---|
| 14 | if ( (~ exist('p1')) | (~ exist('p2')) | (~ exist('p3')) | (~ exist('p4')) )
|
---|
| 15 | error('missing input argument(s)');
|
---|
| 16 | end
|
---|
| 17 |
|
---|
| 18 | if ( prod(size(p1)) == 3 )
|
---|
| 19 | p1=reshape(p1,[3 1]);
|
---|
| 20 | else
|
---|
| 21 | error('p1 must have 3 entries');
|
---|
| 22 | end
|
---|
| 23 |
|
---|
| 24 | if ( prod(size(p2)) == 3 )
|
---|
| 25 | p2=reshape(p2,[3 1]);
|
---|
| 26 | else
|
---|
| 27 | error('p2 must have 3 entries');
|
---|
| 28 | end
|
---|
| 29 |
|
---|
| 30 | if ( prod(size(p3)) == 3 )
|
---|
| 31 | p3=reshape(p3,[3 1]);
|
---|
| 32 | else
|
---|
| 33 | error('p3 must have 3 entries');
|
---|
| 34 | end
|
---|
| 35 |
|
---|
| 36 | if ( prod(size(p4)) == 3 )
|
---|
| 37 | p4=reshape(p4,[3 1]);
|
---|
| 38 | else
|
---|
| 39 | error('p4 must have 3 entries');
|
---|
| 40 | end
|
---|
| 41 |
|
---|
| 42 | %
|
---|
| 43 | tmp=[p1 p2 p3] \ p4;
|
---|
| 44 | p1 = p1*tmp(1);
|
---|
| 45 | p2 = p2*tmp(2);
|
---|
| 46 | p3 = p3*tmp(3);
|
---|
| 47 |
|
---|
| 48 | % now p4=p1+p2+p3
|
---|
| 49 |
|
---|
| 50 | H=inv([p1 p2 p3]);
|
---|
| 51 |
|
---|
| 52 | return;
|
---|
Note: See
TracBrowser
for help on using the repository browser.