Discover MakerZone

MATLAB and Simulink resources for Arduino, LEGO, and Raspberry Pi

Learn more

Discover what MATLAB® can do for your career.

Opportunities for recent engineering grads.

Apply Today

Solution 335982

Submitted on 20 Oct 2013 by Alfonso Nieto-Castanon

Correct

158Size
This is the leading solution.
This solution is locked. To view this solution, you need to provide a solution of the same size or smaller.

Test Suite

Test
Code Input and Output
1
Pass
 
%%
tic
zm=[0 0 30 30 ];
vexp=[15 15 14880];
[x y d]=Party_CH(zm);
v=[x y d];
assert(isequal(v,vexp))

                    
2
Pass
 
%%
zm=[0 0 29 29 ];
vexp=[14 14 13500];
[x y d]=Party_CH(zm);
v=[x y d];
assert(isequal(v,vexp))

                    
3
Pass
 
%%
zm=[0 1 0 100 ;0 -100 0 -1 ;-100 0 -1 0 ;1 0 100 0 ];
vexp=[-1 0 20400];
[x y d]=Party_CH(zm);
v=[x y d];
assert(isequal(v,vexp))

                    
4
Pass
 
%%
zm=[616 34 616 34 ;78 -828 78 -828 ;-762 -671 -762 -671 ;-199 -960 -199 -960 ;427 -575 427 -575 ;448 798 448 798 ;-819 -939 -819 -939 ;852 -564 852 -564 ;-145 281 -145 281 ;694 828 694 828 ;-278 963 -278 963 ;47 813 47 813 ;-393 24 -393 24 ;198 -257 198 -257 ;-393 -177 -393 -177 ;596 237 596 237 ;-678 760 -678 760 ;-180 92 -180 92 ;-590 995 -590 995 ;27 -946 27 -946 ;459 799 459 799 ;-491 -739 -491 -739 ;-691 -922 -691 -922 ;-38 185 -38 185 ;495 -471 495 -471 ;-850 532 -850 532 ;-360 798 -360 798 ;589 -104 589 -104 ;-492 -364 -492 -364 ;-797 415 -797 415 ;105 319 105 319 ;-879 -347 -879 -347 ;-795 172 -795 172 ;529 831 529 831 ;357 -199 357 -199 ;621 959 621 959 ;-475 125 -475 125 ;769 884 769 884 ;172 -706 172 -706 ;618 222 618 222 ;989 734 989 734 ;-273 478 -273 478 ;-548 930 -548 930 ;-634 889 -634 889 ;599 879 599 879 ;836 834 836 834 ;463 901 463 901 ;972 -903 972 -903 ;-319 495 -319 495 ;-727 -368 -727 -368 ;-685 -487 -685 -487 ;834 902 834 902 ;-114 -961 -114 -961 ;-984 193 -984 193 ;-388 867 -388 867 ;712 232 712 232 ;-750 19 -750 19 ;855 -455 855 -455 ;857 996 857 996 ;493 -722 493 -722 ;-582 426 -582 426 ;-824 848 -824 848 ;479 -993 479 -993 ;-976 -820 -976 -820 ;208 443 208 443 ;919 745 919 745 ;-460 -548 -460 -548 ;375 556 375 556 ;-572 980 -572 980 ;345 -411 345 -411 ;-275 613 -275 613 ;718 -895 718 -895 ;-838 -892 -838 -892 ;-241 836 -241 836 ;336 -878 336 -878 ;891 -355 891 -355 ;-986 989 -986 989 ;629 856 629 856 ;-779 787 -779 787 ;970 711 970 711 ;-578 -163 -578 -163 ;779 735 779 735 ;572 -203 572 -203 ;237 192 237 192 ;-427 -213 -427 -213 ;-338 9 -338 9 ;-905 45 -905 45 ;64 -35 64 -35 ;476 -560 476 -560 ;-370 24 -370 24 ;-836 487 -836 487 ;53 50 53 50 ;540 -897 540 -897 ;-179 -8 -179 -8 ;-979 227 -979 227 ;528 257 528 257 ;-876 615 -876 615 ;-342 -895 -342 -895 ;802 -744 802 -744 ;-458 -395 -458 -395 ];
vexp=[-38 185 110298];
[x y d]=Party_CH(zm);
v=[x y d];
assert(isequal(v,vexp))

                    
5
Pass
 
%%
zm=[241 -635 241 -635 ;75 -432 75 -432 ;-522 -517 -522 -517 ;-589 -931 -589 -931 ;-903 447 -903 447 ;-555 757 -555 757 ;-584 19 -584 19 ;420 -458 420 -458 ;-127 517 -127 517 ;-417 158 -417 158 ;542 703 542 703 ;865 -531 865 -531 ;-592 -191 -591 -190 ;570 467 570 467 ;-326 -668 -325 -668 ;197 516 197 516 ;238 -442 239 -441 ;-339 -71 -338 -70 ;255 -450 256 -450 ;408 -232 409 -231 ;302 -765 303 -764 ;-575 687 -575 688 ;-352 -651 -351 -650 ;-483 -96 -483 -95 ;285 170 286 170 ;-349 -660 -348 -659 ;518 -419 518 -418 ;555 -506 556 -506 ;900 97 901 98 ;-969 -258 -969 -257 ;-514 -199 -513 -198 ;-422 -197 -422 -197 ;-852 -115 -852 -114 ;166 -651 166 -650 ;628 -930 629 -930 ;-53 853 -52 853 ;484 503 484 504 ;-912 -976 -911 -975 ;-386 -562 -386 -561 ;521 946 521 947 ;717 -799 718 -797 ;-463 -348 -461 -348 ;-14 167 -13 169 ;-346 -677 -344 -675 ;-675 176 -673 179 ;894 807 896 811 ];
vexp=[-338 -71 136630];
[x y d]=Party_CH(zm);
v=[x y d];
assert(isequal(v,vexp))

                    
6
Pass
 
%%
zm=[468 377 468 377 ;839 -105 839 -105 ;-871 487 -871 487 ;-307 651 -307 651 ;135 -929 135 -929 ;-411 -829 -411 -829 ;745 -64 745 -64 ;336 784 336 784 ;-875 -84 -875 -84 ;-723 -736 -723 -736 ;701 -818 701 -818 ;-239 210 -239 210 ;-15 614 -15 614 ;362 225 362 225 ;894 443 894 443 ;-352 -303 -352 -303 ;-287 254 -287 255 ;-739 -960 -739 -960 ;110 28 110 28 ;540 434 541 435 ;-103 -962 -102 -962 ;913 -274 913 -273 ;835 -730 836 -730 ;544 866 545 867 ;-97 -358 -96 -358 ;-490 -319 -490 -319 ;-122 700 -122 702 ;37 902 39 902 ;103 266 104 266 ;-581 -714 -579 -710 ];
vexp=[-97 -358 62565];
[x y d]=Party_CH(zm);
v=[x y d];
assert(isequal(v,vexp))

                    
7
Pass
 
%%
zm=[28 122 30 124 ;-85 -609 -83 -607 ;763 19 764 20 ;612 -204 613 -203 ;-521 792 -520 794 ;-782 193 -781 195 ;-662 149 -661 151 ;-561 -568 -559 -567 ;-190 -897 -189 -896 ;-725 -317 -723 -315 ;704 -957 706 -956 ;-329 -967 -328 -966 ;-564 -639 -563 -637 ;-603 -86 -601 -84 ;-165 548 -164 550 ;-197 -150 -195 -148 ;-379 -581 -377 -579 ;401 -684 403 -683 ;546 -194 548 -192 ;267 573 268 574 ;-634 288 -632 290 ;593 857 595 858 ;78 -240 80 -238 ;800 981 801 982 ;473 472 474 473 ;-894 469 -893 471 ;582 347 583 349 ;516 189 518 190 ;333 -865 335 -864 ;-192 507 -191 508 ;-310 534 -309 536 ;-783 -487 -781 -486 ;-915 -696 -914 -695 ;-57 872 -56 874 ;717 -423 718 -422 ;509 -810 510 -809 ;-186 -335 -184 -333 ;-403 629 -401 631 ;-598 104 -596 106 ;-149 -210 -147 -208 ;920 911 922 913 ;819 -934 821 -932 ;518 -328 520 -326 ;-630 429 -628 431 ;348 -766 350 -764 ;242 -300 244 -298 ;387 -191 389 -189 ;-19 -871 -17 -869 ;383 723 385 725 ;-742 -327 -740 -325 ;-181 -43 -179 -41 ;799 -46 801 -44 ;729 -373 731 -371 ;-863 -16 -861 -14 ;998 -444 1000 -442 ;242 962 244 964 ;-249 -412 -247 -410 ;116 -14 118 -12 ;871 -455 873 -453 ;669 492 671 494 ;877 -447 879 -445 ;990 -938 992 -936 ;43 522 45 524 ;-70 45 -68 47 ;808 8 810 10 ;-879 -310 -877 -308 ;979 79 981 81 ;-695 202 -693 204 ;-650 469 -648 471 ;690 -624 692 -622 ;-169 -43 -167 -41 ;-81 723 -78 726 ;-789 968 -787 970 ;-913 698 -912 701 ;-597 -970 -595 -968 ;693 -79 694 -77 ;41 847 43 849 ;39 -728 41 -725 ;422 470 425 473 ;-518 -883 -517 -880 ;-858 784 -855 786 ;-246 311 -245 312 ;194 -715 197 -712 ;-370 -868 -369 -865 ;377 174 380 176 ;-697 223 -694 225 ;-489 -957 -486 -955 ;-585 -164 -583 -162 ;-283 -880 -281 -878 ;-141 -729 -140 -728 ;835 447 838 450 ;-424 -612 -423 -610 ;-280 376 -276 377 ;-351 -393 -350 -392 ;-793 -436 -788 -434 ;-548 -180 -547 -175 ;826 775 831 778 ;-664 -604 -658 -602 ;987 -65 988 -57 ;-540 -796 -533 -795 ];
vexp=[-167 -43 874364];
[x y d]=Party_CH(zm);
v=[x y d];
assert(isequal(v,vexp))

                    
8
Pass
 
%%
zm=[-291 955 -289 956 ;276 -710 278 -708 ;-724 283 -722 285 ;-850 588 -848 589 ;625 -511 627 -509 ;-530 -994 -529 -993 ;-312 -655 -311 -654 ;86 -269 87 -267 ;565 -521 566 -520 ;438 320 440 321 ;-330 985 -328 986 ;-408 -942 -407 -940 ;755 792 756 794 ;847 -794 848 -793 ;436 -1 438 0 ;206 -637 208 -635 ;516 544 518 546 ;77 -200 78 -199 ;-618 276 -616 277 ;380 868 382 870 ;-664 284 -663 286 ;-526 929 -524 931 ;743 -555 745 -553 ;331 145 333 146 ;98 124 99 126 ;220 -661 222 -660 ;-92 498 -90 500 ;646 -552 647 -550 ;-531 -850 -529 -849 ;573 -80 574 -79 ;-317 299 -315 300 ;-963 713 -962 714 ;411 818 412 819 ;-99 -503 -97 -501 ;279 599 280 601 ;793 -237 794 -235 ;-41 -876 -39 -875 ;-550 -478 -549 -477 ;-107 820 -105 822 ;657 886 659 888 ;-460 684 -458 686 ;-80 455 -78 457 ;-779 -528 -777 -526 ;-829 719 -827 721 ;-760 -716 -758 -714 ;39 342 41 344 ;254 447 256 449 ;-272 -705 -270 -703 ;-900 507 -898 509 ;498 327 500 329 ;-669 168 -667 170 ;519 -367 521 -365 ;-674 323 -672 325 ;-724 519 -722 521 ;52 -596 54 -594 ;897 -724 899 -722 ;6 -387 8 -385 ;62 808 64 810 ;-84 -749 -82 -747 ;-475 -379 -473 -377 ;-467 -819 -465 -817 ;-130 232 -128 234 ;218 862 220 864 ;-206 339 -204 341 ;821 658 823 660 ;261 61 263 63 ;-704 869 -702 871 ;788 -490 790 -488 ;482 67 484 69 ;-328 -781 -326 -779 ;150 -117 152 -115 ;946 -90 948 -88 ;-68 477 -65 479 ;-704 915 -701 918 ;979 -761 980 -759 ;328 705 331 708 ;969 951 971 953 ;-638 991 -637 993 ;-621 120 -619 121 ;-546 651 -545 654 ;217 550 218 551 ;-743 196 -740 199 ;-591 847 -588 849 ;-48 -769 -46 -766 ;678 424 680 425 ;-250 268 -248 270 ;964 -389 966 -386 ;193 -818 195 -815 ;-803 107 -801 109 ;16 -725 19 -722 ;-721 -274 -720 -273 ;14 666 17 668 ;-822 933 -820 936 ;-895 -416 -894 -412 ;821 -329 824 -326 ;382 68 387 68 ;590 282 595 284 ;97 -310 103 -307 ;147 933 150 933 ;-772 -42 -765 -33 ];
vexp=[-128 232 914624];
[x y d]=Party_CH(zm);
v=[x y d];
assert(isequal(v,vexp))

                    
9
Pass
 
%%
zm=[-987 -105 -985 -103 ;-22 -655 -20 -653 ;-622 412 -621 414 ;-526 641 -524 642 ;-694 573 -692 575 ;268 -697 269 -695 ;366 544 368 545 ;648 218 649 220 ;314 443 316 445 ;-589 354 -588 355 ;60 544 62 546 ;21 -444 23 -442 ;175 -224 176 -223 ;-915 -696 -914 -695 ;-417 766 -415 767 ;-874 -599 -873 -598 ;606 921 607 922 ;-672 562 -671 564 ;-17 39 -16 40 ;-708 632 -707 633 ;823 -170 825 -168 ;996 -372 997 -371 ;961 -169 962 -167 ;572 577 573 579 ;53 345 55 347 ;569 453 570 454 ;716 753 718 754 ;-803 -873 -802 -872 ;-110 940 -108 942 ;-943 841 -941 842 ;186 997 187 999 ;-107 388 -105 390 ;193 -54 195 -52 ;-231 -916 -230 -914 ;-962 749 -960 750 ;794 -458 796 -457 ;259 -909 261 -908 ;-719 65 -718 67 ;242 -481 244 -479 ;-528 -223 -526 -221 ;283 955 285 957 ;-888 946 -886 948 ;847 -707 849 -705 ;757 -814 759 -812 ;-940 -941 -938 -939 ;2 -176 4 -174 ;665 -708 667 -706 ;656 170 658 172 ;494 949 496 951 ;994 802 996 804 ;-65 785 -63 787 ;147 684 149 686 ;-488 807 -486 809 ;-875 462 -873 464 ;-152 253 -150 255 ;114 247 116 249 ;760 -206 762 -204 ;-204 569 -202 571 ;89 -752 91 -750 ;-464 -975 -462 -973 ;-783 -545 -781 -543 ;75 -251 77 -249 ;471 -462 473 -460 ;-126 -169 -124 -167 ;-311 615 -309 617 ;-398 -727 -396 -725 ;834 -915 836 -913 ;-87 -21 -85 -19 ;-301 918 -299 920 ;-740 -366 -738 -364 ;24 47 26 49 ;-929 -761 -927 -759 ;-863 -36 -861 -33 ;541 604 543 606 ;-279 -423 -276 -422 ;-620 -116 -619 -114 ;-145 571 -143 573 ;-638 133 -636 136 ;-885 546 -882 549 ;-625 -11 -622 -8 ;-610 -369 -609 -367 ;80 -655 83 -652 ;-398 -183 -395 -182 ;-71 -953 -69 -951 ;-767 939 -766 942 ;-763 -362 -760 -360 ;46 -897 47 -895 ;23 -437 25 -436 ;550 -440 553 -439 ;-660 178 -658 182 ;851 -919 853 -917 ;124 437 125 438 ;-414 -524 -411 -520 ;881 797 884 799 ;-73 -303 -68 -301 ;-373 -585 -369 -584 ;-239 963 -237 968 ;453 965 456 968 ;-742 875 -738 877 ;-894 -954 -884 -944 ];
vexp=[-126 -168 1055075];
[x y d]=Party_CH(zm);
v=[x y d];
assert(isequal(v,vexp))

                    
10
Pass
 
%%
zm=[-648 -872 -646 -871 ;739 270 741 272 ;-847 -333 -845 -331 ;-510 -174 -508 -173 ;182 -353 183 -352 ;-573 277 -571 278 ;297 245 299 247 ;-223 818 -221 819 ;886 57 887 58 ;888 -773 889 -772 ;-593 513 -591 514 ;-587 -107 -585 -106 ;-564 40 -563 41 ;234 -624 236 -622 ;-82 902 -81 903 ;222 851 223 852 ;-726 476 -724 478 ;-392 -160 -390 -158 ;-153 -484 -152 -483 ;-522 -962 -520 -960 ;66 -926 68 -925 ;-535 28 -534 29 ;-603 -292 -602 -291 ;-981 -471 -980 -469 ;-367 865 -365 867 ;-445 -75 -443 -73 ;300 -40 301 -38 ;-329 -287 -328 -286 ;554 935 556 936 ;593 -932 594 -930 ;206 873 208 875 ;335 574 336 575 ;296 154 298 155 ;323 -423 325 -422 ;-144 472 -143 474 ;-284 211 -282 213 ;-289 -996 -287 -994 ;167 574 168 575 ;65 803 67 805 ;264 173 266 175 ;-820 -637 -818 -635 ;-897 813 -895 815 ;60 -524 62 -522 ;652 850 654 852 ;-837 57 -835 59 ;31 -96 33 -94 ;-607 540 -605 542 ;-240 794 -238 796 ;386 453 388 455 ;-421 -468 -419 -466 ;-838 -196 -836 -194 ;248 -366 250 -364 ;7 -933 9 -931 ;578 742 580 744 ;-634 -828 -632 -826 ;678 16 680 18 ;706 -163 708 -161 ;228 771 230 773 ;-440 -564 -438 -562 ;228 -606 230 -604 ;-361 652 -359 654 ;-608 -741 -606 -739 ;-926 42 -924 44 ;984 147 986 149 ;-132 -334 -130 -332 ;492 870 494 872 ;-470 523 -468 525 ;440 983 442 985 ;-68 -14 -66 -12 ;652 970 654 972 ;-591 -410 -589 -408 ;-252 -573 -250 -571 ;-639 -424 -637 -421 ;-306 -234 -303 -231 ;-720 81 -718 83 ;-645 845 -642 846 ;-938 507 -936 508 ;646 122 648 125 ;-76 864 -73 867 ;777 -142 778 -141 ;267 -756 269 -755 ;-151 -11 -150 -10 ;-568 -929 -567 -926 ;753 -830 756 -828 ;-205 -663 -202 -661 ;329 368 330 369 ;-402 -682 -399 -679 ;-649 463 -647 465 ;995 538 999 539 ;107 817 111 818 ;-546 -441 -544 -437 ;-856 920 -854 921 ;-587 -483 -584 -479 ;717 -641 719 -639 ;-892 -134 -890 -132 ;-300 -887 -296 -883 ;605 -228 607 -224 ;-93 -994 -90 -994 ;-421 -56 -414 -50 ;76 -592 80 -583 ];
vexp=[-303 -231 855861];
[x y d]=Party_CH(zm);
v=[x y d];
assert(isequal(v,vexp))
toc
Elapsed time is 0.447807 seconds.