\315rj egy procedur\341t, mely az \341llatok vesz\351lyezetetts\351g\351t \341br\341zolja egy grafikonon.
A bemeneti param\303\251terek a k\303\266vetkez\305\221k:
Egy lista, melynek elemei p\303\241rok, a p\303\241r els\305\221 eleme az \303\241llatfaj neve, a p\303\241r m\303\241sodik tagja pedig az adott \303\241llatfaj vesz\303\251lyeztetetts\303\251g\303\251nek m\303\251rt\303\251ke. Ez ut\303\263bbi egy 0 \303\251s 1 k\303\266z\303\266tt sz\303\241m.Tov\341bbi bemeneti param\351ter az oszlopdiagramok k\355v\341n sz\351less\351g\351nek \351rt\351ke.
A proced\372ra kimenete egy diagram, melyen minden egyes \341llatfajhoz egy oszlop tartozik, az oszlop sz\351less\351g\351t a bemeneti param\351ter hat\341rozza meg, ez egys\351ges minden t\351glalapra. A list\341ban az i. \341llatfajhoz egy olyan t\351glalap tartozik, mely az x=i. \351rt\351kn\351l helyezkedik el az x koordin\341tatengelyen, magass\341ga megegyezik a faj vesz\351lyeztetetts\351g\351nek \351rt\351k\351vel. A t\351glalap sz\355ne pedig citroms\341gra, ha a vesz\351lyeztetetts\351g \351rt\351ke legfeljebb 1/3, narancss\341rga, ha az \351rt\351k 1/3 \351s 2/3 k\366z\351 esik \351s piros, ha az \351rt\351k 2/3-n\341l nagyobb. A t\351glalapok felett az adott \341llatfej nev\351t t\374ntettj\374k fel. Tov\341bb\341 a diagramon cimkek\351nt szerepel az x-tengelyn\351l az, hogy \341llatfaj, az x-tengelyn\351l pedig, hogy vesz\351lyeztetetts\351g. A diagram c\355me: \301llatok vesz\351lyeztetetts\351ge.A megold\303\241shoz \303\251rdemes bet\303\266lteni a k\303\266vetkez\305\221 csomagokat.with(plottools):
with(plots):Tov\303\241bb\303\241 a k\303\266vetkez\305\221 helpet lehetnek hasznosak.?rectangle?display?textplotJ\303\263 tudni, hogy ha egy lista elemei list\303\241k, akkor hogyan lehet hivatkozni a bels\305\221 elemekre:l:=[[1,2],[3,4],[5,6],[7,8]];
l[3,1];Egy p\351lda:diagram([["jegesmedve",0.8],["panda",0.7],["cs\363t\341ny",0.1],["barnamedve",0.5],["pl\374ssmack\363",0.5],["p\341rduc",0.6],["sz\372nyog",0.01]],0.5);