Cody

# Problem 44477. Find left eigenvector of row stochastic matrix

Solution 1404280

Submitted on 4 Jan 2018 by Alfonso Nieto-Castanon
• Size: 13
• 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 Status Code Input and Output
1   Pass
P = [ 0.536668396674091 0.463331603325909; 0.628171641615730 0.371828358384270] pc = [ 0.575510558055411 0.424489441944469] assert( sum(abs(pc - find_left_evector(P))) < .001 )

P = 0.5367 0.4633 0.6282 0.3718 pc = 0.5755 0.4245

2   Pass
P =[ 0.490126287130221 0.063810857836059 0.446062855033720; 0.351100472099344 0.522156819868217 0.126742708032439; 0.016119408853126 0.459671543012232 0.524209048134642] pc = [0.270232959896393 0.376204159405191 0.353562880698251] assert( sum(abs(pc - find_left_evector(P))) < .001 )

P = 0.4901 0.0638 0.4461 0.3511 0.5222 0.1267 0.0161 0.4597 0.5242 pc = 0.2702 0.3762 0.3536

3   Pass
P= [ 0.000295973934872 0.298979544879362 0.282216466268297 0.418508014917470; 0.305614143800419 0.169335098209289 0.318119927666875 0.206930830323418; 0.274040969162178 0.358495094643379 0.257083476284641 0.110380459909802; 0.362700492263105 0.083477678435433 0.309658548481881 0.244163280819581] pc = [ 0.237529575372038 0.234524560057871 0.289883972779590 0.238061891790800] assert( sum(abs(pc - find_left_evector(P))) < .001 )

P = 0.0003 0.2990 0.2822 0.4185 0.3056 0.1693 0.3181 0.2069 0.2740 0.3585 0.2571 0.1104 0.3627 0.0835 0.3097 0.2442 pc = 0.2375 0.2345 0.2899 0.2381

4   Pass
P =[ 0.206900154678670 0.148378489932199 0.322150635982830 0.314216412936451 0.008354306469849; 0.260256141508665 0.099217372921749 0.160593109350477 0.261083704996893 0.218849671222215; 0.239143386227262 0.208748199654121 0.157570271848609 0.243411982213855 0.151126160056153; 0.278091600172443 0.098346886570860 0.258034757795764 0.264131640312126 0.101395115148807; 0.332707101127035 0.028439807716601 0.229818689497991 0.282967894831867 0.126066506826505] pc = [ 0.254374450013656 0.129637934241022 0.235068662146163 0.273627230656508 0.107291722942842] assert( sum(abs(pc - find_left_evector(P))) < .001 )

P = 0.2069 0.1484 0.3222 0.3142 0.0084 0.2603 0.0992 0.1606 0.2611 0.2188 0.2391 0.2087 0.1576 0.2434 0.1511 0.2781 0.0983 0.2580 0.2641 0.1014 0.3327 0.0284 0.2298 0.2830 0.1261 pc = 0.2544 0.1296 0.2351 0.2736 0.1073

5   Pass
P = [ 0.132301071463971 0.118964494040826 0.133724887078453 0.164995061775188 0.040846954071962 0.145500258220330 0.063426378618235 0.129644361564668 0.066729252864125 0.003867280302243; 0.132078324816755 0.158842681592186 0.021345097287269 0.116096463338978 0.011399564178502 0.140138687399582 0.177066809582189 0.065776052252923 0.015539976826641 0.161716342724976; 0.017067043037843 0.083233444933711 0.084600955134299 0.150272784632142 0.123640429188190 0.137325974960960 0.036120936255903 0.135601262483591 0.103142500899762 0.128994668473599; 0.127071623799322 0.131013361691360 0.060749137485579 0.030485605165969 0.125140409826980 0.094272001681351 0.121644411243946 0.136891396463886 0.033674609302846 0.139057443338763; 0.084699633418611 0.028081492787019 0.099909358534447 0.168407595038166 0.130764931483391 0.116220306891560 0.110612661554048 0.104402758049448 0.008236859479167 0.148664402764143; 0.037733369184740 0.169572983103210 0.070941210905428 0.141330441010770 0.114190951485877 0.169117213270117 0.068871861233898 0.031453791309126 0.128616891142078 0.068171287354757; 0.021608820428507 0.118635979900457 0.091045405806744 0.126644005048004 0.091912863890716 0.097377838242980 0.031186928136198 0.209989895433764 0.076205987507149 0.135392275605482; 0.200801721742751 0.165730897943703 0.044066996479387 0.107288300031138 0.095274563967673 0.014633627838425 0.006128344875136 0.064690108023551 0.161069824250084 0.140315614848152; 0.037498791878979 0.007834244109932 0.054720922238198 0.055198093789809 0.174871800390143 0.185715803502670 0.090230412306462 0.198107071552124 0.082250330729007 0.113572529502674; 0.040849998758864 0.202090814652096 0.005128610576370 0.187791319910819 0.079274530709314 0.157633265466675 0.045977261982389 0.055884488572257 0.156673705328071 0.068696004043146] pc = [ 0.088341588996646 0.125827616221029 0.062738581066497 0.123052908662097 0.095658900658645 0.125218780388122 0.080036509221240 0.105209734515629 0.082635110452906 0.111280269817457] assert( sum(abs(pc - find_left_evector(P))) < .001 )

P = 0.1323 0.1190 0.1337 0.1650 0.0408 0.1455 0.0634 0.1296 0.0667 0.0039 0.1321 0.1588 0.0213 0.1161 0.0114 0.1401 0.1771 0.0658 0.0155 0.1617 0.0171 0.0832 0.0846 0.1503 0.1236 0.1373 0.0361 0.1356 0.1031 0.1290 0.1271 0.1310 0.0607 0.0305 0.1251 0.0943 0.1216 0.1369 0.0337 0.1391 0.0847 0.0281 0.0999 0.1684 0.1308 0.1162 0.1106 0.1044 0.0082 0.1487 0.0377 0.1696 0.0709 0.1413 0.1142 0.1691 0.0689 0.0315 0.1286 0.0682 0.0216 0.1186 0.0910 0.1266 0.0919 0.0974 0.0312 0.2100 0.0762 0.1354 0.2008 0.1657 0.0441 0.1073 0.0953 0.0146 0.0061 0.0647 0.1611 0.1403 0.0375 0.0078 0.0547 0.0552 0.1749 0.1857 0.0902 0.1981 0.0823 0.1136 0.0408 0.2021 0.0051 0.1878 0.0793 0.1576 0.0460 0.0559 0.1567 0.0687 pc = 0.0883 0.1258 0.0627 0.1231 0.0957 0.1252 0.0800 0.1052 0.0826 0.1113