用 GeoGebra 画的一个Edgeworth box

是 否 +2 论坛币

k人 参与回答

经管之家送您一份

应届毕业生专属福利!

求职就业群

赵安豆老师微信：zhaoandou666

经管之家联合CDA

送您一个全额奖学金名额~ !

立即领取

感谢您参与论坛问题回答

经管之家送您两个论坛币！

+2 论坛币

1. \definecolor{ffqqqq}{rgb}{1.,0.,0.}
   
2. \definecolor{uuuuuu}{rgb}{0.26666666666666666,0.26666666666666666,0.26666666666666666}
   
3. \definecolor{qqffqq}{rgb}{0.,1.,0.}
   
4. \definecolor{ffqqff}{rgb}{1.,0.,1.}
   
5. \definecolor{qqqqff}{rgb}{0.,0.,1.}
   
6. \begin{tikzpicture}[line cap=round,line join=round,>=triangle 45,x=0.5058864599383681cm,y=0.612252331002331cm]
   
7. \clip(-1.8264485425341994,-1.477644259369429) rectangle (17.94083283759662,11.58886377156454);
   
8. \draw (0.,0.)-- (0.,10.);
   
9. \draw (0.,10.)-- (14.8,10.);
   
10. \draw (14.8,10.)-- (14.8,0.);
    
11. \draw (14.8,0.)-- (0.,0.);
    
12. \draw[color=qqqqff,smooth,samples=100,domain=0.0:14.8] plot(\x,{0-200.0*(\x)/(25.0*(\x)-666.0)});
    
13. \draw[color=ffqqff,smooth,samples=100,domain=0.0:13.78807114874612] plot(\x,{10.0-(4.0/(14.8-(\x))^(0.4))^(1.0/(1.0-0.4))});
    
14. \draw[color=ffqqff,smooth,samples=100,domain=0.0:13.032233047033632] plot(\x,{10.0-(5.0/(14.8-(\x))^(0.4))^(1.0/(1.0-0.4))});
    
15. \draw[color=ffqqff,smooth,samples=100,domain=0.0:12.01145199073066] plot(\x,{10.0-(6.0/(14.8-(\x))^(0.4))^(1.0/(1.0-0.4))});
    
16. \draw[color=ffqqff,smooth,samples=100,domain=0.0:10.700365869983031] plot(\x,{10.0-(7.0/(14.8-(\x))^(0.4))^(1.0/(1.0-0.4))});
    
17. \draw[color=qqffqq,smooth,samples=100,domain=3.1498026247371835:14.8] plot(\x,{(5.0/(\x)^(0.6))^(1.0/(1.0-0.6))});
    
18. \draw[color=qqffqq,smooth,samples=100,domain=4.268271965388076:14.8] plot(\x,{(6.0/(\x)^(0.6))^(1.0/(1.0-0.6))});
    
19. \draw[color=qqffqq,smooth,samples=100,domain=5.51861461417367:14.8] plot(\x,{(7.0/(\x)^(0.6))^(1.0/(1.0-0.6))});
    
20. \draw[color=qqffqq,smooth,samples=100,domain=6.894191008102029:14.8] plot(\x,{(8.0/(\x)^(0.6))^(1.0/(1.0-0.6))});
    
21. \draw (15.281463414634104,10.479048185603801) node[anchor=north west] {Alf};
    
22. \draw (-0.5909934562760233,-0.3050089232599702) node[anchor=north west] {Bill};
    
23. \draw (15.365223081499066,5.223129089827478) node[anchor=north west] {Apple};
    
24. \draw (7.345234979179041,-0.3468887566924509) node[anchor=north west] {Orange};
    
25. \draw[color=ffqqqq,smooth,samples=100,domain=6.4090156957854365:14.101323388093128] plot(\x,{0-1.3*((\x)-13.417810826888722)+0.8885663295657288});
    
26. \draw [dash pattern=on 2pt off 2pt] (8.460794032855878,7.332688161808427)-- (0.,7.332688161808427);
    
27. \draw [dash pattern=on 2pt off 2pt] (11.443606278314174,3.45503224271264)-- (14.8,3.4550322427126394);
    
28. \draw [dash pattern=on 2pt off 2pt] (8.460794032855878,7.332688161808427)-- (8.460794032855878,0.);
    
29. \draw [dash pattern=on 2pt off 2pt] (11.443606278314174,3.45503224271264)-- (11.443606278314173,10.);
    
30. \begin{scriptsize}
    
31. \draw [fill=uuuuuu] (13.417810826888722,0.8885663295657288) circle (1.5pt);
    
32. \draw[color=uuuuuu] (13.564390243902402,1.1817251635930934) node {$P$};
    
33. \draw [fill=uuuuuu] (8.460794032855878,7.332688161808427) circle (1.5pt);
    
34. \draw[color=uuuuuu] (8.831969066032102,7.652159428911356) node {$OP1$};
    
35. \draw [fill=uuuuuu] (11.443606278314174,3.45503224271264) circle (1.5pt);
    
36. \draw[color=uuuuuu] (11.86825698988694,3.841094586555616) node {$OP2$};
    
37. \end{scriptsize}
    
38. \end{tikzpicture}

复制代码

扫码加我 拉你入群

请注明：姓名-公司-职位

以便审核进群资格，未注明则拒绝

分享0 收藏0 回帖

关键词：edgeworth worth Edge box GEO

thanks for sharing