FXAP ;bQ1kÕ&MÁ?Z&‚¹oûfa£],ýíiqŒˆ2èjÞ²>˜œåCtâú·Žµ¦pÿK@?TŽ$¯·KÄŽœ³.ûðÈ ápq~’ ÂÞBF±ÐòÀãÑÌÙ=@š¯|ÍÛ™ÖŒ@o#¾ßÑ‘åü«âwûDÅpøluf˜z´W] T‡éâxî}£¿fb¢º˜Óv˜µú !¾yR®”úlbëòçpÏV¬45›+‡RR«òoè°$W(Žâ1º‰À£˜k»j!(ý—–órC—Çâ!ÜN&È* P¦h9Ôàä[²‡öpŒúC5ýœŒwǬÁƒô2)¿+ãÀôéeèKSjºcð‡zÊ#‘ •Á^¼¡<ŠÄÍ‹s²¦ÊƧO€“ÒëéÍpâù³p—{Hˆyv*/ë?ä߃îÉóAV¨nîÅ^-= +Ãó"Õ+œ®’Õø¿ã\Ï\”MT Fù:eîŸM7…º¤s¥§ –„ƒ¢_laãÿÏ4f†óéŠ=äî¤Ûwà_0LPêàzó_úZµ° ÉtUÄ(©FO‚8N.ÿ±Çô„½ˆí/fõå1K3PÂüWF™ó5[Š}>Æ™©p~—¥ÁÇ!Âyƒ¿ úgMŒõ]²ƒ;Õ„uDòÍÃÆ~žsÀ°Ÿ'AŸÒÃ=?ƒç’…¶…‡ˆìÛ9…ŽGJ]6,!áÍ,üR’iª‡eðë"ÄóV)žî~úpÒìdì3lD™ˆ‘P&D$FºÇÄé—Š¡Ç ¹Ò¨ŠÈÿ2Z¢¡Xcp”Q"ú´¥ÁBÖu<¯Gir¤›Ò38pàÞ<E}%gÚß8ž{ûjP=päÙMÝ>•C¹££:^>f¥ÿrÔ²ã =ðÔ…kÿ zy/¡@aNÒ?«ö!¿·S@œoVÃÂóeUwôœ.Mç”ËŠ³+¹öÔ:úèÁ¨(·óžÄ(Vy×ùïW`v¸{ÿ騶,ÏA7%õ0‘ªâ?¦äøpmÀ–R9.[Šþ*в%RÜbˆ÷N==ÓU;T)k½×¦‡J·ÚsuÕÆ53Ís'‹ÉÏHUwrÊ?CF=A€û…6à ù†j)µþ+² ®ÔQê g6!°¨c·¬éÝ–' Ö{q 'Xžqd5¬u{Sj‹ø^UY9í Ñ¡–Íñ8™ÂDóç‘„HUª°ñ¾•âÄî ä¶}˜/™»ºÏõ˜•˜#¡õKTÈ/µ˜WdOiôŠÞN‚bZ ›ýBéó³çù“âïÃö=ÝpàV¦=ý¶]@µJa5ø¾û Ï „ã EÖ®Ìåè7¦V´I'X8EGF§Ã ›‚ŒYlOÏ?œAT¾¼Wœï åøBØ“eŒS¡è§õ˜ÔçlX¦†ðç^ö²wpn¸ŠãzD¹S[ âRµlAdþb.#Ý[;à L‘üšŸè5,æóÜ%].°«r=‡á<›O\°~8!+½9nÑæÀñPlÃ÷(/|x„¨àŽÝÅ$#"Ö1±ŠQ@©f/|tT§µÆJ åî §†Un¦‹ˆÿ ÏÊŽ<äÆ2«_D»Xý °ÌѤÃÞ瓊ŒÍ€9Ï9=+Ó¬[™â=®ãn4f|æõŽRÄǧagÍMO£Â-¿²Á ?X{;jcW4…x(9Öˆ¥ƒutyÀ‡ýW¦ç¡aÌ©ÈÂ(©o~¶w…Løíºª¼ª²rcSj j‡©*Ùû¤l¹· M¹a纗ºï¨œ5þfNo–A½ÙKHúªû%€Þ úög‚xüìâ=Ö°]ÝËM ùй#·-…üs“N ·ª2e‰qg y¿95•$/N„ªƒ\¤þ˜ŽMâæn?åÓ%b£Ì-å† xß±ü•îu,¤©%Œ?û²†h éuÍ»L<ù§.FÒ̵¦x<<UÚa¥Óê”sŠb :*:!b:%Ý¥ñC‚)Q¹Q™®çï¤È£LÒ4K·NLïm À «¿¯C3–œœBS^.k_§ø¡G㟾kñÇ}!ÍJKHÌÔQç’YG-Ĺ0hÃ;ä(ܼÅKûH«Xܵ”ì¸GRÒ–7s@24Ÿ^G|”w=©AÍG*Íx945YIÍD´zé ñò¦©´èóχD8'Ã%Ö } ¡§%Aמ>aN[ObBK󹯖þ9ôyNÈZˆË\ji]ɪ~½ˆÃPÞ@Z,8OŸ|ÉÓY7€šòÓ ó]¡SÆ×ÿztÄŠQéã8k^Ésû‡.‹¢ŠâÂ!\ðó8æô$:¤`eS/(>O`g=0ذü¬êƒ•³·2:Ðÿ ˆPã†L«8•UÇšôx¯@¦± ÚL%üŒ—{ox +¼’qQØò5¨þO˜Ž{ºúÿ#@È‚‚ÿת†ŽÊvª[ýöîøëÎw¼ú»v¤ÜZbk¹uýšIô¿‹Ó… 5±†Mãñµ9¤ElÌ'ƒ$?Á{¦åoÏ v‘½“uV›tÞG‘-IÕyBßüîÍF;/ V³º¿wk¬»<,5„èMÎhÒ`Ú_Y‡?²5IR46&gë§Æ»Jœ/vÓͦ1€³UÜySA¥8ÀeÙ¥â6Æ ô†pŽ•UXFÄâsažP¢ òé½§ä ó¡£0fÜ—1‘“òßÈ Hö¢måyÏÓ¤ô†Ó/|'äºíEê3F-Â0˜Š$dkØrŽ~Öø'èÖ[þhÈa*a}èo«–„º1›é°±så±µºxZ‰^×ÝbÞ8¿ý+üíçßµ°¦Ä-8 ³;*úæó² š¾‹ú“ý'Ô^‡r_ÿ=™û5ëz[¢@ú ·É3!ON4w÷ŽF~áƒqƒ»:¦<{—¹ 3¸-øèmžÚ4}…L¸ˆÜ¸ðsû:*Q˜sW&£ýPL–:ó+vèAÏfTÓùñb—Å&|hT”gkPáÜRMhbk ÑãÓžYí‹dÃo@‹ð¡6$ˆâä.C‹Æ öûXW&•W‹ZuoøÃ‡ïóü/§Åi'^ sV?Ò§Ãô¬+ÃÝ;m²ÜAzšEY1×–V¬!ÿ©5öÝ);o¨cжé.öÜhXKÅbâÃÑà|6¬ëo ±SMP>vˆ¬«U×éºÍèŽVPê(¯!<鎄Xr$zú,²G·1—¥¦ÝƒÒô©Š€2÷Ql ]~Do šó~¼åš Ò)XzßÛÖ± Ð?¹•ÉM%© £ÒPªdþõW$b|¥€Ï!Wûß ŸìSoᜌìºmîžÍôp·01É!¢(/WÚHœåfÍ”EÙä¯qvp(gº ÊyÖ8I²ñõ-€!^-B?a(@Lísè."•vÄ$rKÿþàiROºà&p#òTs8 `¸ù}”ˆ nƶuMÓ”5¬%UkÃ0Ò_ŒeàÂTî°†êy×}£êÝ㻲êÂpP^·è=Mh"í|ì"4,ËÐa8A$¬D3Œcm¨ÒIY@È8æAÚ¥ÉQY …à‹·×dg`éÄ'Ïn‰ە‹[óÛg‚OÙ##ñVbÀí`ÈBeÛ °Q¨3»íRTT>h/ãh‚fþÞ Í&Ë¡0»ªþ×Ì3 êXViâ‹„ôTï©_dŽ4 çØË#×ë䛾2‘£:Bϱ^Œc€›“!þÔÓ4Z»©>Χ›%–¹µ—Ä™JؤuÆQy®oÛÀÿúÞ0¤Á›Î>†ëÅög‡9ÑtaÄa4»pmœÒg¶BùŒ™U’dNª,F±´'ÆÿÞÉÉhÊ$ÿ£·qÍ`Àð÷m‘ÛIyC‹(¦pCÂæ6¡P0>WðìD}4,ex ª0̉M¦Ï`3ˆº/– ‘Š£ðZ¦¡Ž×4œMd9— ¤ª>.‘\(9!/¢€.™KœÐ´ÿ- `„¤!°®ÌšÜ²…¯ÄØS\^ðk¦]çæŒGâLÉtòxÒjO©±{r9©BŽ§Ã€‰qMæêÞ÷¯rGp\~QÀ¥YÜí â5jC·ž˜P®‹Ôñ~ðºÿæW|c²óË>9žÙ·ÔÿšLµµTù@Î%}ûäÊλô©bäk Fw™»‚rƒk+<¡bkàk7¯dj4ÝXÛ¦#l<«w·%ž¬J\Çp¬-dÌ&ʪºy•³YïMx2 Z‹q¥®'l–ßù5^zû¿Ë$$1õeۻͯ5O¹óÏè“Gçœ^óµ›5h5§OE ši{‹[Ô)<2}4‘kqš9:% z)º†-M+±|¢rÏèûú¤½‹©ü™ä4nðöˆ;Ÿ¢~Ýîk_¤li¦lÚ%su¿¸ºÁBê+ŽÌÿ1ö!!Žä¾m|Ù›%€|õìÍwíœ$^=¾ÿ@±H€óÄ ôÉ‚)õ…Îkl;«¶~9>£?›EÔo¶ßœä½]æ›PÙ*Äñð}ž¡¯Èu¸þ‡LÅ«s¬9tކk'Í/ÒC©µT·”†Ëƒ©ùz1hlÙx¦8këûÀ'䵟„…½}e{ú9´è(6r ‘1âjÛ¨•Eÿ’|þ/=,úÐ?5K=µ´w¢ìÑr›¼v6+X'+dnÚòÒx1ŠIßQ¦?Ö´;@Vž(=H’’“¦e!“âqõñÁ+¥žuiŽÄbØÑ;Ý$÷Ó Ëà»Èå#I¨[‘‡*Ÿ~$G'´é}`æ³Ô² é˜ó±¯VŒÅÄäŽÃÓ*c_Z¤´â;wÖrjg,º`媅-ÓOéJŒ¦·‰`Sô>Ì–ŒùF!7ò¶õ¤ ª£õßÚo³@‹«~ÁÝ9Ð&Émÿ#Ãï~Ë`]ý™Eö[ÆQºHb¾~¿Hp|9ËÇ€"æÓkM· Œêö¡¨X<æñæn®-D5«Hô¦lÂùV{A[+Ч¼ÂyJ*,°ÎÍ49J‡ Zˆ‹û¾,.IòNÌf,/i5ʾûÐ q[>á°¹¬ uŽ&²‚pÚ–¨šŒ@¨‚ùÚc@žü]nÅýF:µMµ]$'ó’Ø®ˆ€AU\àH§Žî»ç´¡æPï±7Çq–ô NêË÷’ùZä_•ÄâLO\H&ÅzÛ׋̙¥¥îPeáÒE, óÁlGj4B,5jí ð4¬>2œÇ‘ÐPp‡&« ìß7Ý,À&\XÜZè÷¨NÄGÔ³|ª¾£¤J—Ô« dáb0;Ó9ËĬ|Ô·Iè,Êm^o’ ‹–?Zí¨ðS¿q;±]îA ª{½éŠ8•„›y1rf{pºÌÔc-?’!·ºÛeE–ŸóO<ûÓÒþŸI¦OŠL~*¡˜Æ(Ý ‡•(—¢áx•(AIJ”bv1Ý,$Àîÿòª÷hÐp\hC6¨«‘毣ìvl…j¡¾f,.µ\ö„Ÿ–°`DP£ùuØDAZL·ºÁ %³Ö&¨^¡díûšéÑ>ãŒI™©‚1B>ü2Vô¢T«šá—yo&ì+‹GÊ¿¥¸q¨FPŸª©”Î÷Ë429HõÔBUÉÛ¹eMèÝ´ ŸÛÔ*Á\]úZ%"‘ÆÚ»q©+h{Óžy~ð”®qÑcO.¯Â€xøú9nÈÁ—Þ—ÿø±Ne;) ãEB”†ßG‚sˆ›IA5´BÑUÀ=¤)‰Ž2Ã?ÿbd©¦ýÂ]-óGJzé<of8’ÎÌk~Š 3PxA 6hFN·’„Jµ—ÃPƒÄñE.BÌÒ¬uÁ‚Y@¬úÁ<˜d'<ïv"Áœ7Iù-4ÆŒ$ѱZ +ʬ}Y3È ³´Ã&óƒñ™Bô–Ø¿$ËW«?DUêÓnx¬Úk·@¸µƒñ]]ÖT|‘ñ«8oF/e„…±jPµ‚\pœ¿pÊŽï=¹žùtõxÊ\sf/Û>äéúÔxB+ɃîÅŸD~÷¼þaú„_¼XãMÐöI”ÂS .ë§;2z¼`\¨éT9½7ƒXSÒØÍDÏgJ2†²Ö…™¹g¹¼…”ê¸z6íý¿ žòš ªqª °,oîPz®þyrJ“ mZŠD"XèG1šÆ«T| gÚÊFÂÚ´njê!1ú]ÈÊñ&¢IF¤Ot•"´ ³/·t}«——˜h4w@„`ÕvõŠ/ñôè3ÖÍîO)~<õ *yÇ‚! óNqKm!Ï Ë@Ù¶2£Î§ç#DDƒ‹3N·çCêçË+&€3b¼‹û1F}=•¼ÎùéÚÚÙW»úŒ,‰Õåï°y¥ÓÃ!÷WjȆÁ’kûø@ ÞT¯<KÞì¾M }À.iÑp¦G§4¦ß9\›OÔo&ihòšß’ÇC–Íï+! Ò´“Z ¨~o4˜ßœ¿xó9+Ý™Ò ´PhõSA=ÁËOÝÀDÓ¨Øä—kK<Ÿ Ptx•ìž/”†ÇK!\ÿ·x3%™BjÀøÊIh]@ÿ,¨ëéìó¡ÓçÉ×-3pxÿ”®^ÒÛÿ5’. ‰¬"²—ÔÃFYbã+Á“Å\)yÎ;èk’§vñ u–‚é/YšÖÔz•Q£’Ȧ|]uËzЕ¹:Úè使>fzñsŠá ¹#uuFÀéX¸á½>ld¬}\¨Ó¹¾½X)¿ O?·»y x dxM¯×=ï°Dñƒ¡8ï½¾æçk)°GÓ–/^¨D>¾p‘.…ZèJ×!°vï=º áõËóYþï\—×·¢ˆ‘Ë=ÙÊnßLðÀG¼»PnãÑ.°ýÂÜý'fÄ2È{C2·¨Çýk;麖hËuz"\Nö5•Êcüó£b.ÜðëîØ# NÿÖí>`0Úmªw¢Ë1`p¹nçï=ª ï<ü‘¯EpV¡Á´¶óþ[G‰‡¯âv™¾ààø£ñšÉQµ _Î3Ž `–#ýÒGûÙòg8Ðç8JÁs¥È’·5qsp";íÛ¢ºÔ΃§EJ‰Ïw2MHl7|å7=ËÔómQ£ÌO@¸»}Õ7+P/òÇ=uC†ÖûB4¡æ\ÙãDmm0ƒÄƒÔlíÇŽ~oŠó(î2E™¹¤ýBAJ¡Óò@Rñàá‡,Œ |ÌLÖaÇ'¸}àñÇ’]\JI÷øB i§U2-LuªüŠuýºÌüïÑýªJ;Ð b½$|Ø+ÎÄVG÷)Bõ H½©õå} ë<‡\цþ¯ò•7OEÌcþd˳՚ÞüâH†ÂÌCÒ9 ¿èþVà·§Þ[ä#³jXØÌBõÕ–Va”›r« ‹‹¡·-ì?&õ©ÉT5MHpš ëuÐAóäSl¿#畹iÄê{´ŽÎ6WÊñd§‡ÀÀDmÿZy1TÏ/ p½Óiµ©zoX–¤E¿7 [äu€3Vp†žÕ¨NöͪqŠyÙì6®=2Öâªu•õÝØÝ0õà …| yš¬ÚšOŽƒ?,÷ÀW ŸÈ’s€®êAjcÆÛ•ê `~{X:T#µH"º±È€czñõ| Èýq'†øX(Ú:ÔçšOÜmtAS[‚oöd‰ œ‹F³É˜ŒÊôd)§‰â´pš¤ @'%ÇÓ~swÚ¨á"²à'f^ïø‰y¾’œTK?ýÐfk°Û[ó»ð*ý'L´:®N³â…ï“Ý”—Ÿ¨x\UPÕTÚù”…>ŘҽE¸˜Éß Ý¯Êí?îÊåè$›ÜàNŽ$ WQ2±•Lù(Ê]Ç·m_’ÀFm—[c¯Ï“ÅÈój7S˜ïÝ™‡,ge1+ (š„ìå¬E=Ó¼% ”æD–§SÚYpaãÄÔ+×»Û“ÖÃx¤ð<”Ã"K›Ðn”ð…¨Ú 1ìjU+x™Ÿ8 Ja³å°’ã§>œIãÄÑ"JN#W†nÞõüýB,CG‚¢Re»äƒiVx:Íü×kÞ†œ^†ÂÉ+~ã)^ŸÁ9JïË}&þQ.g[^_ZQ”áC}ûΫ†AôÚrØ ¤%ò¥'mÉ;â£Ç¿±õ@¥ßvAâëY QúÊðEFVŒw¯½,ËPä)öƒDؾcÈtþM›âDóH] M/¿&7ZLAH%t¢¶qd<*|Ȥ¥ Å„à…±Ùýβ@Ý]0 j ÅÓ}œåk æ\”–nz|[\ûà¾íˆd†N‚“¢žÉÂÈ¢âxœÌtÙΊ”êÕ"ÃÉg²qX±ŸS+zÝ1ý²‚M@Ê=jPÖ•˜Ÿa‚?û/“„é²+ØYåý¨r„p+©Àˆàt^ªs]„ÇÙ‡bÌDûƒ j^G ¸‹ ·p ¨Y+ŠÕ¡kšj$ýãq 7µX¢ã!“¸~´s¥Â_T~×ïy_ü®„` ¢ôùø5©•§Z|f•y(_Ök*©‹Öq¦kTð;’V[¾¢¿‘5YôQC·óW¨±p3²öŠÄLf† Â0š!è`î{JšR2ÖL2 ´€ÄOÉß _ÃŽŒ pGˇè#D—c^÷\RXÃÃU?•R¬©õ=D5âò"¬„0äjl NƇç:Îw½æz>W} ñìoiŒX9wsTɢܰ†*Ê0½ýs/Ñ é1ñ¡†À'Ñ$as¦¸‹ÜI)Y„霜ßË«H北2T%®2™kbõÃØQ"”ÀZ/ãÓ¼"ÊÊèÉ^ÛÄѰ[³‘`,@ïo–«ËcÛþ•êâ StbT±CϨéíϼ£Lùª?í’CCgw²³ ¼" [Ò×¹ôì.nCcä£ûé7ÕRÉq±|àyáæKUÓž¥´×O|,½Ùm ¼åÆ–íi(-ÄPwG|Srq'6 `‚—D%;½ªÌFÓÖí$? -CE÷"u¿b¾vŸó‰œNzäÔo±Ÿ9gæoE¹b‰s%ÒOìT¢úk#ß7±*ø§Óš8ÉÅ'y†"†?™YéŽ;ä«ÝE‘ÇýÝMÔ[—¼¶Ð CVM¥$rRì½?N7J WØ/šæ“àFJ“®uôgލ´Ú²,jdHLô À/Hø÷XN{ÍÐ5|Ìþß¿ "E˜Öc-†à‡Àz’‰ÝÐFƒ¬u€n‰•Q¹½þE¹ûc¼gc¼ÚÙ±´Ÿïb³TÃæHÛDUöï'C;¤1`AãJóS¾·ªVÛ'srº<¹^(Ÿ•Ù¾ñ<ß|3gXB iU’ïo½°%&g#˜gÍnÞ`lU²d|è—ùÊ ÇQ¬…z§ÁÖC× ,-0(à™t(¡MÒ…P¹òbÚ(ƒ—›uìÈ“â‰Â±ôµ‰~/Ž_Wô†_cÞáVÿF éÿ ïå.›•j)ƒh,B©?ì Ø2vÅ3L8—pGYR»’¥06–`̬í/U_ Ÿ=ukCÁŒl߸ÏȘºEA€ó±`&™ï&1˜ñªîx¦„ÈÕ \[S'‰m^»™ŸÎ‘Þ¤=‰š/¯xgI›æo¥›†›pæ€bÉÔNýŽ0¡„vðQŠø®ušÉÖ¡&Ü0~`<iµK;£å߇=ÿó€;ü”±” ¶E“ð›Mâ“àû¡›0‡Ãb~¤gƒëŒªñÕ ˆ8V †Ó“«U ÙÕßc¥à°x=)³Ù€ÎÕËUVáaI°È‚¸É;Ä-`2ÜòXX9PLo!Mÿ̃ÔbÌt.¿[-*¼µám5ý½&[ÌÅ1¨4wJ‘Ëp#D“ˆgv‡yŽm[õ!G0: êœX,è仨zåy’½;#Þ•Ž.aÅ]ý6'Wª8<®¯:ö”Ëeb©‚pñERnŠ]:…ƒÎÏÔûŸ,o •öÒóiŠäÎÁ3ç>¬…]µzy‚ë}eìŠÙV˜Ù}?7¿Ö85™f€[î,6ß*3/Éʽ¡/$ë9þƒtÖÂñçJ[”tRÂ÷ù3/”ÏdõXs´ä#ź¶êl÷Øœæˆâ ak¹ìÀÒ 1%©PÛÚ8¡VÒ3é1ÝóqÓÚ ^î5kwù-êVÊÜFÈ7[œ¿^©Û2¼ZO7×uªÆ‰¸¢'×S€3–]ó³~ÿz?:—.Ñeä&ò bu?÷Îþ'F†’ˆ{íƒ8=žüôèX`||x›žÛ²Y ¿7J‡ñˆ2ø±{øã鯖™ð@ËкΌvtÖúuclÈàœµ´Ô¶CÉžhþ)VUMBUš55¬{ Ëá«Ï§‚Š1"ÓJ£™âÚ&h@ƘDŒ<Ùþú¤Y&be”AÓù[_eqWŸ¨Æ cË<à²zZÙ&܈«=©Ê÷;w͈évß‚³«„3N:lÿÄü?H¯e®~ z0Ó}šy€jÙ9r¼H¹¨p–bh™‚¡Þ¤/éõ^Ã>py2Ï3û¥Çåô’z³µÎJû Á‚“óZy™hRÊ<敚hmŸF*îim¸b™²¤Qy~o±€Uµ•”ù*rÑgÖ:¯Õb;Ýè9̶޴ºp ܵ5~…ø%Þ= ¦Ôövº ŒrÜK{ÿu‡[íÊoȽB*=‘8–sÿÅ[email protected]¶=a&™~¡l §en¥Ó¼:ä^–vÒð*CôëWjÕlŠ/GCz#‡ÐH@~ÉCõu0#àêâ¡© C<SaíÙ§ˆUpý2·!vO{œåù.eA7×|Éý0$›¥~â*Óܵ[ÀþŸÇîÑËŸòÇíöí¦m6íß…e׊£_#/Š ï ȸRí}µ*9½†x£TÍ£Áyiã¥ÂÇŒï—ñÌM?2y,A·õ”.]P×(‡ ˆƒŸ™·rrøEEãÈî+ý6˪l^Ð=gš‹$È·:<4l(ÆÝ„‘®á ·3wÿæšÈÀ©ÚK1Š ££5>YD4´¯KÏP©·ûÐCL¿ºg]î;CÖ8åt=ßh!\®“Zv<üC‹ôFñ] m(}èªÓ잢|˜Úù¹Ü)ŸÀR‰„ø»ÉrøÜýPˆ—öÍðJa¾ä}'Öù½è¤G§Qe¶˜Éè Ÿ‚ ÑöÈž¦A>¬Ê?E(üôæ¯Tù&übký®²”ÈÎ#þªî–÷+–:ÙÞ¡áf'šÊË~µ_-‘Γ·¨Ìñö¯#@“]”6BÏÍ@O Sõ˜ØÍuýÚ©BMP±vãœS‡UºÇ{&Îéž›O8Ä·0“r(Ø_p„ºe.)[m¥ã¤·é²AArÝØñÒ´ÝP¯
Write, Run & Share R Language code online using OneCompiler's R Language online compiler for free. It's one of the robust, feature-rich online compilers for R language, running on the latest version 3.4. Getting started with the OneCompiler's R Language compiler is simple and pretty fast. The editor shows sample boilerplate code when you choose language as R
and start coding.
R is very popular for data analytics which was created by Ross Ihaka and Robert Gentleman in 1993. Many big companies like Google, Facebook, Airbnb etc uses this language for data analytics. R is good for software developers, statisticians and data miners.
Data type | Description | Usage |
---|---|---|
Numeric | To represent decimal values | x=1.84 |
Integer | To represent integer values, L tells to store the value as integer | x=10L |
Complex | To represent complex values | x = 10+2i |
Logical | To represent boolean values, true or false | x = TRUE |
Character | To represent string values | x <- "One compiler" |
raw | Holds raw bytes |
Variables can be assigned using any of the leftward, rightward or equal to operator. You can print the variables using either print or cat functions.
var-name = value
var-name <- value
value -> var-name
If, If-else, Nested-Ifs are used when you want to perform a certain set of operations based on conditional expressions.
if(conditional-expression){
#code
}
if(conditional-expression){
#code if condition is true
} else {
#code if condition is false
}
if(condition-expression1) {
#code if above condition is true
} elseif(condition-expression2){
#code if above condition is true
}
elseif(condition-expression3) {
#code if above condition is true
}
...
else {
#code if all the conditions are false
}
Switch is used to execute one set of statement from multiple conditions.
switch(expression, case-1, case-2, case-3....)
For loop is used to iterate a set of statements based on a condition.
for (value in vector) {
# code
}
While is also used to iterate a set of statements based on a condition. Usually while is preferred when number of iterations are not known in advance.
while(condition) {
# code
}
Repeat is used tyo iterate a set of statements with out any condition. You can write a user-defined condition to exit from the loop using IF
.
repeat {
#code
if(condition-expression) {
break
}
}
Function is a sub-routine which contains set of statements. Usually functions are written when multiple calls are required to same set of statements which increases re-usuability and modularity.
func-name <- function(parameter_1, parameter_2, ...) {
#code for function body
}
function_name (parameters)
Vector is a basic data strucre where sequence of data values share same data type.
For example, the below statement assigns 1 to 10 values to x.
You can also use se() function to create vectors.
x <- 1:10
#using seq() function
x <- seq(1, 10, by=2)
the above statement prints the output as [1] 1 3 5 7 9
.