From a9140b0839a8f53a7b4514a4e66edf246c403976 Mon Sep 17 00:00:00 2001 From: corentinchoisy Date: Thu, 14 Dec 2023 15:45:03 +0100 Subject: [PATCH] Initial commit --- DESCRIPTION | 13 + NAMESPACE | 1 + R/hello.R | 19 + .../templates/cr-ur1/skeleton/FondUR1.png | Bin 0 -> 20166 bytes .../cr-ur1/skeleton/biblio_cr-urca.bib | 9 + .../templates/cr-ur1/skeleton/compterendu.cls | 106 +++++ .../templates/cr-ur1/skeleton/logoUFR.pdf | Bin 0 -> 10645 bytes .../templates/cr-ur1/skeleton/logo_UR1.pdf | Bin 0 -> 26111 bytes .../templates/cr-ur1/skeleton/skeleton.Rmd | 106 +++++ .../templates/cr-ur1/skeleton/template.tex | 406 ++++++++++++++++++ inst/rmarkdown/templates/cr-ur1/template.yaml | 4 + man/hello.Rd | 12 + 12 files changed, 676 insertions(+) create mode 100644 DESCRIPTION create mode 100644 NAMESPACE create mode 100644 R/hello.R create mode 100644 inst/rmarkdown/templates/cr-ur1/skeleton/FondUR1.png create mode 100644 inst/rmarkdown/templates/cr-ur1/skeleton/biblio_cr-urca.bib create mode 100644 inst/rmarkdown/templates/cr-ur1/skeleton/compterendu.cls create mode 100644 inst/rmarkdown/templates/cr-ur1/skeleton/logoUFR.pdf create mode 100644 inst/rmarkdown/templates/cr-ur1/skeleton/logo_UR1.pdf create mode 100644 inst/rmarkdown/templates/cr-ur1/skeleton/skeleton.Rmd create mode 100644 inst/rmarkdown/templates/cr-ur1/skeleton/template.tex create mode 100644 inst/rmarkdown/templates/cr-ur1/template.yaml create mode 100644 man/hello.Rd diff --git a/DESCRIPTION b/DESCRIPTION new file mode 100644 index 0000000..2c44097 --- /dev/null +++ b/DESCRIPTION @@ -0,0 +1,13 @@ +Package: ur1down +Type: Package +Title: Templates for editing R Markodwon documents compatible with Rennes 1 graphic chart. +Version: 0.1.0 +Date: 2021-05-09 +Author: Philippe Regnault [aut, cre] +Maintainer: Corentin CHoisy +Description: Provides templates for editing R Markdown documents that fits Rennes 1 graphical requirements. +Depends: knitr, rmarkdown, bookdown, formatR, kableExtra +License: GPL (>= 2) +Encoding: UTF-8 +URL: +LazyData: true diff --git a/NAMESPACE b/NAMESPACE new file mode 100644 index 0000000..8b13789 --- /dev/null +++ b/NAMESPACE @@ -0,0 +1 @@ + diff --git a/R/hello.R b/R/hello.R new file mode 100644 index 0000000..b586da4 --- /dev/null +++ b/R/hello.R @@ -0,0 +1,19 @@ +# Hello, world! +# +# This is an example function named 'hello' +# which prints 'Hello, world!'. +# +# You can learn more about package authoring with RStudio at: +# +# http://r-pkgs.had.co.nz/ +# +# Some useful keyboard shortcuts for package authoring: +# +# Install Package: 'Ctrl + Shift + B' +# Check Package: 'Ctrl + Shift + E' +# Test Package: 'Ctrl + Shift + T' + + +# hello <- function() { +# print("Hello, world!") +# } diff --git a/inst/rmarkdown/templates/cr-ur1/skeleton/FondUR1.png b/inst/rmarkdown/templates/cr-ur1/skeleton/FondUR1.png new file mode 100644 index 0000000000000000000000000000000000000000..4cc157908871112b370ecb7325ce916e7672eb06 GIT binary patch literal 20166 zcmeFY_fu2d`vrf`lq`qD7GuBk2fsNe7Qco_rs_LuK(9|T-pE_Kko?rFWvht&$ zVeI;MT-bE2U!u+e_5YWmu47fsB#>zcby{LC-uG47??(5jvOYLI^E@f}V_&bb#~ z^@EnZ9%U#$k}Ato4swxmT_4F^Cep9tb3(KC+Wk4NOWkpE<3Rqrvv6nV0p~t+O?@`q zNjKfO+AIy>V-7@_&@ze;nz5r15|B_WNi=6EF*kmu9G&eK9p9F;#_4Ev%~wR`c+n#*~+#i22J zOWLD2yLgW6eDwTb<}qNIGBUGA>9sg+-HG{33AG>8y*#!~`)18?;}Cd!%v5Dt^RnJr zjOjWb*rM7RT_1dyCG9b?^m-(yoltEYbO1a<<##kkp5FpKX+I{+EJY4h?>8Ux+!9P! zCZ|O zu`v@Q6*Ug1>Gra!ixRw9m^VD z=OxJ{I1hO(7SMX{AaHw^Cv{0mKavn@zdMhpGks_#lBQN;T5Ud)TeD}9e>Rzyas1>j zif%;+NkUdakj)GXKe;+6!v)VE+J2Jz_NL<*?f4SvQg6PRFee`KoNqUHW~@Q6)gI2J29B#M5WPxQT5+ZD}I2M>C`lRHUreKJJO;IooV<~ z|KB-9Q>B&Au$uw$iTX7WetcF`PedX+6VVh+W~1fi^M!Dckmc~M(0>PxF2?|2EzI&c z7-%sAJfrl6+RgFa&nUHGiP9DupQNY7>L{9LeJPlX{@D}Hxqp_T($6EAFIRDaMghI5 z82IG$Q1e<8^x}jKgloWKVPlBE84?mYGXG7p>GU@$m3~{q0cxqv9yG=mI^9p>sch_}Nc7FeC zY(JQSpKXoX=xl)Ht+!xZa|KULBm(>Vc0RwCxGBmw&@fo@}?`7q{2ggfEypDsZA zcWR!G+9BKnlnVkKJq2m}VZGdxwYpJdn}6 z905kVq>Q9zSn69!C{L~ae81R616u{vCo&f7L zU*b~asZNby)9(9)MoKZ9A?E_YtQt|GyVr{DX+JD^8H6xr z=n~TB8}bLlOKGD-W4qi=l{sO_la>v-J5dF3bNs_SFg+-|-9tM=&x9k{fd%yX&$^fm zp#Ai-$SH4W?IF>XibjqT-lvmgD(Keb^^0jbYs-BHYp|CUh$TTKpuHbYA z&JpWocY+NaGe#;B$+RAJab$@J(Zs zJ*o(Py1T8Auo4A?hMr6opwv-X^#t2-g0C>E#GUn@jsng-vr5?@E&k-(pmnoV2FB}8 z4u|T1N(BF)a>a?Mx+%WOaC{NZT*!Dg@s1>Z(EiCO$pfAj`IFeVh-|aGyI}7xKHGSU zMqv;biQ~~s4PwXsS7Q;-*J8x7S|s} zlFZkKVh|RBc{f}B3`UY0p}}6OwvUX7z+ijF88{i<$+obTA5O@%H89ln)4S~K(0 zpza18aTgNN204#F(>pI^j5;1*qa65dhVJy$z?aB~XE6dQfiJrU(kjhi9PHJt^`TJS zyWC;F1$ij5y$L)jMq7KZY4`4z_lIi{9@FdZT}1|KL5e}?TP=AbT-4f=`*H@BJF0wK zi}jdD`fuA49m#Gv_>8Jb0Oz)kl)>?j)7gtwJZR*-*{UTKj zl}c8tPLDHxczlMkpkClQopk6Z*^7glJGp1Ed|XaSijSdveB4MlLkI0}6IZR*HZmPs2B*1|&WJ+6xre+N7^GM1gbEO!chURBE~4Y{Xw zhj3JNx)jtAbh7)YQmN!p;L)6`ZUsZyV6Yho2pk;*bciBYl9Rq7SLxy>0 zznX952Mn`P7bbR}N*jFfANPjJW1W>=s$OHbb);`~g*gH|Z>9@fK3#7NHcQ!tyl(v9 zRASvv-sWRje!UuRjmQ!xf9?q7D=`MYel5qd`1oJFaH3;sZ4N!A-+L|1_8Lhpg~SZY zo{Od|*4FEe3b8&XAMaBBbVNjU9zZV5@F@kP?aWJip!lvn$W*g{7F$(>mYnT1rZ{b^ zJfIf$WTn5TNT&bLL+gole=Qzc+Db@zou__pX*s4=-n=LBdn^-FxTF@gAf6QoRg0542XI9jHkrrXP652_P_MkVp}2{2LV?>YRKE{w~%5$xG3dFr-eYXbK}*9#Jx7`7kXnVjZi= z9ei@YrFfZ+L~)Ca#n8U#_Q7HLaWCWt{Yzfny)BS~C@I>!#ND|$TjQviaQ8sE(gOae z=vznROK5I$L{~|M9dxn+cjqep-q_$QclgGp2)q?Hi2@>HQGvN~5n(ns<-HXS%fd6F63%cl>OODL(z(42AAuPnP8FB@-)liz;$s|0d>*cdjOTN91o5NYVKN6%LdLm|N7yBCG`DSvj+yMwaI$+X`%uq}0hWlPAHab%RoO7r`zK%dFvcyo?Q^xv{Dhu$2!vbC(9abz zo|2*;UOpQOSPJatXIoPuWSHxkWOn}T+wA-3wUL6O+i%)#cFj+XQ0eTvM@>8*Hx7&k zJ%unWXcI8|yyu|N#RLtz-g|X!{e*84^lfbhic0=cpDKLZiRdpHA?h5hjhqPrE@8 z_}@QiO+YMQWh#02E~kb*P)RHC9!qmC){E3Frj%x5rA{S2rHC?iS(jMH(Mxb;8m8-T ziY9y6+wWU(PTL0%(q?S^2x}I$9G9)iO$YL8D=RHUBTir~({THsEr-KZ?BOH?gec~C zzGvlR-USOMFC`7QBaUDq@IYSRUTHQ&!4W-g9bh_B6NqJZFh*wxLesqpS~hBWBMzrR zJ4mx|?uE9{;{mhE2;wHMAW+=!q@Po0Uzp}a0p+-ZnB8QUnx16GDg>`w&R6T?MOAx( zo$DWnRmX4SP&9cuLeI}A9U&MCM3r@U!V%sdGFMAj&xZ8#JQ4##lui$0bkRz6*J#4W z)Y%|Pf%r|Od{QbrO9x?1`PmV6zT3!1z#nNt#0~&Pb+*Q~c7}IjnCE!Y#^tWT+t;ad zW=iDmuIa>HygvAO-3djPBUgvGRR-_oy;1Ap*n8(|iKe4LAvV zN#&iQ3Dq{@Q2urq6)Bpv4$K?T6u}OxM(xX*C#DfIX%<6DM<2K~H;r9cJ0Cp>!Eb5} zwv^b0^>=UNg?h1gcnm6)>na`tEeb9hS7y-0t#&#lQjqHjf%z8ypW?E7x;JIwe&cp_R%x6*rMAQ+FMU#p6IU?~WJh!Mtr!a0=j*3F^N;Y-AgYP&WCxI*r* zjd&OpKK*H(D>&t(_tEtJ{cuhD&4eN!)9PuNSF_&(cdgIA1yi}=kCjaynyd)Cxd<)+39eh}N`cpq}KjcrZ3h997==9IY zr!zI%&z*AGNQ1n)vj~r46i_9_)PwC6@*WSO9|cqvu2u&7YHw}64I;Hx3*>tgmv*h; z8gy+ylEQHQgicyICcY5E7gYdb_@(PL~E`BP0QD7ND{#{U(7gB5aaa4i4bNYB>?63FvrwicC677o6ObuuYtbgtr zyR`n`vu7K5bv|nYX2EONS5G!_ZV4LPRq?Uq231bI1d)YL2N?>50$t@&d}sP^_1cV1 zTK$8UajiPYVN^EV<;zPET;rM4?+!_|p2O z#5~)lA+JnLN)o(orfTW9Pd&PRzC~~U(Pp6w6}pid)PCN!-|~{eE{Pt()@p6oF@HCV zi;1}mZ(gs+R`G6mUcgzN`;Tow+e6QTn0O)tuN8^+*Yl-J8<$8tBwFZ0g|1LC<=5wsaMW{q2HOe#+ltgYHYhN)o%r-XzHWL|1qF3U4i9Gl8>us|3$pMD-}Tn>&& zK$&~RJfQgjH5SiEFNZW9m$o0&S+wFSMrU-q@$}MrpPti6tmSNvdPPni(siJTT;^kW-;O`vJ>TLs+Y*47=kUySnIO(JDsiRq5{u$ zb>r3o0PQEORIoh7FV4cq{p9s{x6MLJrJyHuze3K|T9!Z2*X(s=@=*lI&Q^KOh_`1c zRKKQ#$6;`~ItWcj28M5;A`dc0t1QQ}14^Dfa|VO7chX`s_?+y5!K3>@rv^Q(xUEY1 zZZ)x7@6(ginljwm_F&fbGtxHM<#nc2@B{_2lcG@pQ<%#25P;dFjls-4z)+UY-H^!b zg^3@-boKwptM1UJ)m{R}M!DTvp*XeW_3iC#$_dZ;L8*TBVRFu+>lRhEMC@po7nv(a zXI)#*Ttnni|4@@*|XM zZYXznE~NJU0EG~5pRb*ttgH`bw}iHsC>cCTj^UR3yPkNyyX>?{H6UT_>s!`{6+m6y zG@m(TRUiYb2R7EW2&qKOFU{Di1meH&%ooOQe2mX(iU?W7B2BRxs#PspPDYlmF$FQF zUz@4Q`o$;Vj6rmXacRrCZWnOo8tb+AuGP}R@s|Cw#SN86G+{=kisdEfjOqIIo#3_G z!i!;pVj|{v9RVHr>uUX+;Xkn8r?+EE)NI3kyE0({#KbH6tKWSJLbEl*oLm@fm` zPF}V!YW%~zPvg%fy9`&<-rpO(7S&|SO`^&*UIOtBDr8?@)-HUv1r~aYp!!P=EEJMO z2cE!lj#A-bXP-tj|MDp*v;gH#TVCl8>oduh8wVukSRi_;<91Pqtog8E5y671fS_@v zj&oZ3$C^6}SE*ZT80>buhYtA|l$3w0{=mu2&24`hu0k0?jVd4FsfCBQ65EoUUnJyN|>}n&H-39@{R{n< z=5RYuwK-p2eM#{+Td|b|3o8}n_Sxg5RM|*zY2#%MA zKYZfX6>U~Ivv^RT2=l0^oJ$NqdJe6nu!sCy;mRgBa;gZ^8Rc$?p zd?zQq`IrXGeA!4}2T?3hSjH-H`!iML$ob;?ZYf5D;`{#SHpDA#iGN-lwrSW2-!<#+ zrrHZ_WGcH22~E&7IoM1VQbt@_4;7r&6?N8T?RLm2H4+l**ivU3{jHa$W_8PJkg}+p^eH-< zjnt_5`}aGbQSErJN)U8MgM8dEzG7FJ_hg^lHD~-wCtvN*rPj;l<)#mrwgmc{|0SQc z!rz{=#^s0>5&cTUR(|-(t%-_3x}n8T2-3M1a(L_6{sP&$z_5u5tF-ZTda`h=PM`41 zGX*cDl7y|^>-#Oo9>k>SSBp)Lb4mZbRhauKGK^nbjC%P5|hih!aH6MyA9kwYBB|2v?FeS3AGzoxHc;w~y+1F=+NwvS$`u=WG z@hXVc#+S-T$uS1qT%%=@_r*G_ediq+fbXe7oF9u5feqExTURqOrVF;cB>I-L?@mfo|0tJPX5QgJV}JLw{DCQ6#t9wW=eq0@R@p6aQys0qD>`vwWr z(Mq;j{YFz{l0Kl;=^NM0cD*;N-%qrWS0n2KceAXktt-t-#y98?_rAr&xrFS1PG$jz zbzMWr^;Eibw;q(~j`D_$Yf@)y956`d)wVJq;?=xH8yuN^5|ACG_Gfy*D{U54{i<4q zh)0I_*j|69C2)Y#1?-{~-v{KOl76GC#$@b|*3T&IzSI9|K*hfRU+`=M`Jrd62O4Hy zk2JS`Clppw+Zsx3N@(WWV6kMcyS;Ohf;Km;#?mfp--xnebprjNERzBwBO{exxu*@d z*=4EK+~}`&zFhdI_4hmNgyAnYse0&9i3hAL@U@$q_Jj~)3458Ve)gH6%CbT#OmU(B z(mlY_On+a0|6ut{0HFWV{<+$yH>>}Yi*MhrV(NuGy07cr|Kn5U9*?mo>;44qr2t)< zET;lRZwKqukzd9i>EFL!<2n6pPqkW8>FDf2!}Arvgw(9jE$q?#+*{OtPw%Lg$YQ*^ zU6CL_+spso;rz61Q@}P-a(Zh{UNR`47(5f`j*AaysX(}Al|s1W@C5Q+rFmt$?>m*9 zU^DnfMd|zo<~eABRn`$6Pa;|UD_5DinlW`hZy_^2CJAxKr4Ro-=>RVJC0;bFvD9)$ zu=+YySy_FIwR$*yJAH7CilG_HVUEyTlZb;pULRYxkTE`d*t8XElu;I+l9E#J?kk@j zcN)u)iGrW6oS-Rr7uza3_t>BJ6(yd&Jf;U+G^)}R)mwO;0&amZWvqYfcTY>M8&TMX zdM=2!J1z8WZXS**lX0zGBObD6Sl|67de z`Y;JjuKrMioA|0Lp(I=$>ms!`s3QUPAI5C9`$&MBq8xr(gigC_-|e259~5M}h|)7F z)M0{cZf)&}hwmLmX3mVTdMK`O>DQ$LrD$k$-}9NC*MMIFox0v@6P=b&?^@1JR@Z#z zApVEaWxPc)Ud*x~C6|Db@AoZ~;K42o>LzzXJH&MwZX&-94@ zmVMrk^{Zg8Bjm;wyY(6*Q&`!X#_|qwz}+o915R&I#rRolR~{F1zS^OyrA=!9EEZ-j zl=bYwKGIIZ%FOB)5shv^;Uc=s;ONr~z!@ZXcu_PLlR_MN23ty7Z)WLfvx?O}3-M9C zqjgQkV&JU^?T=I4LCW0bb(m0S1?zFJ{OjMtknqEND&Nl483HHtK`m=_Y&<6zCs$tS z<%WSkK6j|CK4)_7!r@snwhxmcvZvSvuJk7lE0l6ZT?xoB^W1Yf3W%?2_GULHzBBU;2-kfV#de}L# z!4tZZ0RnkF1M=>bD#;aGDpR(0uk~cJ$Nf~??-N;nRR9IptCw$tS7wCwIlK#@ef;_T zSMJYMfJ={}>Ls9Q*7m@Li=4OaUFwldzNAJ!5Ta zS)^;(=~N!z(6x1QX2|b&;ng#cN*>cy0fgOgYh1q^?w!;h{9l@&q&N6! zr2ABrIYBzhnBd552Z@WO2EvBILt#LWJIp2wsA>>!o#R8SZLhjE}H!g7U9r6)z zdBL~vu{mA@!9yVo^vxa{zMU|gT^vKbwL&*M`puSx_*w~=vWPVhQuH)xT1 zQ-dpVpaHDY9%fbylpg-xOE9h zc>sB*JGXE9jP|CbjFYPE-snSAZhlEFGPGzZEjZX+5SVv*7Sv(G%^}QEpSj6sIqEdN z7n5h6rye5MSf6fgQME}v-RSu3z99OIOQnKAT3dSfY2%*sRbwgw6snV|p>q%iRz`D@lu)@mec8Zm?(a!WUw2dXB%HgDB$HGCA zUBArrlwxb|GF$LKQjNA0U973j#i@lbUtI_i8}8XL9rnyHcvYIs7o5~=4(f&eMMdj= z)qggu9%T9krkd6*TOj8VOj~pF!(Awozl75HOJZ?@8LQo0&2SIvxj$Y`P8g~e6tY&5 zk=W`tIdfuW!2Ig1Xd7iDA4wZaes4Q3BcWwyBs2`mnzTKD1%U#FseS0G@!p}t7kDNB zrn^KpeF9eVEf#|QDg=4emeI4agMr+O!O(K?adM5%+B|poMsBSSgi0P96+B~7!5ap9 zzo<7JSAiADT`zjBCO)3~;)4tW;zH2^n(tJ6*8fa%zkNZ;KSC@PlWo^lW4YX|k-lm@ z9bH7Wp%wGn=cA4sd!LJYC|a<2XsHwRR|F9f{6xDxIr$Hj9RH?OnIn_hwb(cc7ShWY zI<&Hq!^3AlL6q)=hVG~)Q-$G(;@y|`h^3FGE%6IK>i_JrZW;?mMty$@8UAo@vQ#Dp zQ5ZjAvqcT~!t=xK*rSb@INnOf~u2R@tc4QIaUh;O}H@^mh)mK2+j8hUTog5&np zI;)jP4@~>KC$jW8!DYv01RGJcN(Putf%kF9I0*`jr+n8nny;$1~uy8$gn zABo!EsN2Qya{eHWkGfh=tx7K!ucaN&Cukasf&*>>Ebxu^**#5l> z6(lr&p>tTWOyyw2s6>Uj+O|AOe8$+nFC@M@vGuL~?|P-tOSwyR$-W8;gF9mN_pXr4 zqpCr(@Moekn3Pw#1W`$=3fG%jwLf^CtR##65dT{KrP>p z<^N59WtrG7fhNiJFAK&Hq9%`Y(cu1h@60xJ!>v#0eaZl?>@Zk(Y3_3-A3X%NG;Jad zm9zcv_A;|lra)3`*SbKFOR=aon|n!)vKcR9FC!+XT0=!Jy17wpnSrrCKbcXlrM&ML z)CmbLeqpS88Q5?r5lRoY^c9rf#_Kc3ehCYq&;>Da>&p-~vOK&H#dd!S>SVVXG}7xb zFDBZ9%ZV5cPwPN*)E|ymr2pSa(k)|+q&<#J%6#3cI=SJ1Kmf#bhCnVWp_(!i;W*~u@9{8 zQzrq8P-rXb_`dugOBdHH=7}s2BMeKky@FvIY&kq*bvR?iKmXS@5@Vm1Wg)JWQnO@P zwI5w^AGC~ik&pQ)yh#2Y$JlQ_0+vl1G5G24_J|Yv5d}qLz>Y)-7$q*3EQ}w6bbQ_O zvy%)MUzT|(_#Q$d;t`kLieSp6nug)xdtAdBAdPJWy~u1?j?d!%ajJg%BP6+c^junP zc}rv45P6pPo>BjKTSC1}3Rq~jbjA45M|zGATuJYc4v?SXb&bE@?X`aok`a{8hWy+d z9Bo$O(XcX+;@BRPJ#iITeYmI$gcLOU|{c+=zL;;-3R_!xsg+(36Vf% z%}#=e(qm+R`aL0zHSL$pc&+MwPGMF>pOH8~H>MY&4gQcBS=tJz?jtnL-7-@csV=5^nDY+1snyVwF=z8y zvi19N7%%aW2+|Psbih%2!K+Ba4@v{eh0y|E@ux|egBbXuHl zUhH5oWpV;|I&~GXu7FZJUYdOeQBXR*83HnF<_PlO$^3G;z$W9H>Sm#=Jwj-$L3!o@lr0UL zexKn!dQi{4w7rLz)C`*C+rkSN&9rwV;Q@DM?&8SO)NkvhH?2qC8138 zqr2gfXa41Tr{2b1#}%el-`!DTTz&avMIwMST4D-cwHcyB8k?nObz__Up!(S|Mz8Bk4R@>I?uta@CEomx5H@!Uh-5BNo!6f4YR9z6BmDr`k&%|6r3agDQgV{RHbrY^ z{Wd+T6H5!6iCzO#`RXoAxeS*z5R z)K~Ge_gHF~>g4M9qpvcdW^tD!dVMuPrE)}A_=}kazHsZVpv>Dm%qugCdbx~MLE`tt zz6TRL-wT9GYJ}S6r_`Yuj!XDVB@n9zE9viF8`eWYd@!luR~abdvYide;P_dxOAb)6 zadi!kxpczfFMF(^?J%-GaXRicjwp&)<~be-+FBg22TzPtnn}?+=P{(fLlmB{9N`l} zc`$J$XxCD6=YqUjV4D+b#$)kXwTeizIwYAG}5SQSk+N@)4Gj_ zoqM;mbhRZYx=rN$-cqY;K~mULNl(!&W_ue5hqd*H2xwT;t*f#$Q}7Q4XSVW7`UYAm z{CeY^hauNaOl<BZ_NAj{Y00 zb$b21Qla}y)KU0b%=PuOL1-(}v-hC1gZ*bUEJsIM$7KdkAP%r^b%Sbo(gsT!)D8j; zq-ktJu-9ZG{W!oDX&ROue~MKLQ9hqmS_%~3+((5QFWwALm@_CQ3fg|2Y2msZBcU>J z5zeEZd_MOWf=Pt>e_M1XhZ0M_+O7ClF2(dudp>uVMagO7`UQbOnT+Ik%N(f31h^Axu8?bL2aokq5-?_)lemo@?~#6rHo-Xh-_3mn za;}JhyGgmvx-I$lTqhUVo~C!sdWxpX)^XKZOLK9LCHk^Dv8L-@EA4tV*9T6py&e+M zxlYIlf!3Lk3WijmOkZd-fXKba;N5xw@fuA2-usjkVXa=!p+{iYHFp8zSAtJv!K~V} z_J{c24(p`Kz7E+4wyIb6V}L5bxBNYOvHg{( zSb3=>Pof>ZIuqZQbo784x7vj#hT|XHdRKV012}EA!82oS{ooPpKdHSW`AHhT@lA;d zvHw5|UV)PPe(IwK>r8(jn3tMj+Wattx)6vhhBVJ6f0Lk}B6=O|!xF)T1-l5avu|aU z9oF?p0+LxKMFyENT&FQQKCV0zv6pn1khIl=OBza^#*;qclCbTK>8_$&%#zj zXY@ENQBH%6BmOAK#&c6m{cO8%`qBp;aE?`R?oiqjosI7i*}NUCDEWXovC-c_lH>B! z```MXCmdRP^`RG*90mGOz*|oedr|cEklD0%o5GV*h>>#UJJo zOSjb=l|EU=l)Mn}kSjCYN(kv4acBMKn5-Z0x$^NSKw}?gJcc@Z>3{w3Q6RJOcuofH z6ujbcZ_xIZzK4{Z{~MS0N62K3T3A+`Ib;euG;%DOr{cwCStle2Z}0_-7~!&qRwij7h22arRsgmId$RSzAp-7<+OnG zfSMxNnGfeNUviodpqjj{gX>(>}W zDnIQrS<^J>t84Ka7WL)^7+>2`&)_?n=iA(-=j?6hRafdNlY%c)cR_)y4?+e9jiJC% zbmi0S63zA(^Of{Ef6n*<_>b%SV!4E`$-1E6M)dT@o{xIN_0Cd!FDY51Pi|G;df>@X zU7Wj~W5@Ti?OVM_X1~ZdpeQUY;QnTN67krCZcVpm3LD-u+49ActMA_Y?pC< zVgQFitqf}b77%n629Z$BkBz;T_%v90SB0;`TwAjgv@)oheizE#H7}UE zh(S_UdVV9zVN{|^=}=Uqd9YRQ6m*FUgFpTi{!zRQ$5fv-4CWds0ksoG!Y}mt9HejL zwA--@@<>E3vH@u)!n^Bt+CQ|9(j}T>zs0J#_K&`SsiiH)p5_JgIKixe(z);Q?k-+} zrUzU*`$JC}u>GccV}wdXs}v-%w;85P3|*hrdOMgW>0Hyf*busZM=9bNlTA*(qh66# zP-r>N{7sl8dMPDmDrNNiq(tP{I*`BmFjk&uz3%8{i1n@>A7A{q-ULV-RSy@$+mR{f zr!6Is&eIFI^9RSUM!Osyg&&LGBJPT9J(yg+3mQ0KALEWJOY}84 zNJNcFotNde=vjOo>@@{%EIl5UCuZx}A!POyPMpb!2E3YsMAt2kL*U|!sHlnsZh0++ z6@CBQy7K+$7H-Jw0Y;=KWHhP5+dR0BE}Jri=U!UPw^;9{`c=LWGGX)j z&th~FkkMIqQT*Fek}a~w*mr#NP5senbQ|#=;Nfz(Y2Ku#XwKPiW~^1o*Ryyz+Yy1B zq*rGw*NiA{I=)WcYQT0z@Y!!~G2GK4d_qniQ!e{^89UKO+X)a3-J~-r6lHeph z>BIdP&V+y;Qe;}7`)P{hLUOmEo`tc*#fMt<9SKata$9M&b|g zM#g=bU{2zDu)k%8TIXm%tTzMh^dr5jb*T2H`!%Fk)M4YhN%+mF1%F|=>@LE(!4f*J zeT?UCnV`H)352j{soP$I_YF>7UUP1PTn}uE-}`T@?8sA6C8hSuwCgeT-lB{Euj9`R zIC~!}!%e>pC6X?T$;jA!%crf~5Dv~D9nQ4u3FFFOLFg5Ik?<%$tj2uv4^$3{%NWy^ z+W9UlZ1BqFvrn4!H#InM7q9T!Z^re-UI@`hnITZSY2M#8RF(Jdco$vlU) zH!E1#o#yEBY#{pGH^0sN$2^PN$%=$;%N{Pu=1J2ghV&BW0e%X$kdb$LdEa|;xAZv5 z+bY*z2R4>`2@}6>+j|?=(pq(Fy-L?oTZwOrefbJz`w@HEWHofmTIgmMra{CnI!=} zssP;YBh*#0xorNCb1AC`aglidP+I@H>*vgjaB9#wH z3#|F1UGzBAGPBm6zL;H5QjXFMJq2kVN>-_sZgZnmX2xgu0jQ3} zlD}%{QsJYLZK)nvZuIc>i z%G-pZ(-tM{yu6fhY}&VJEXEXPHU@Q*vm@DFoRu`+@Jn8oDFY`adWt@2EGvmPtY8k< zyK+(KmE%w41QL^FhFkFX?W`>{x=9B}av_l+dex7G&s*cMP5eG6!}E?M`rycVpHg}s zF>Gkca=i2i2V`BeF9WXdaPU&*2OC$B`Tr5^xbz{kLl5P9_ z_x4NUW&1mucS#_ZMebr_xd3A@l#!{qXAdi7YzTZJ)0i=*p!6FOUs2?fQZ5}IVrfZ8Mh8w5vZD1nao&{}2 z#u0%NVmH>D!4O9`Wxal8;~1GKJ?B?fay+A)hrqc=g=ocn-Myuf z@urYny?c@Lx;t2l1AnKA1bdZy?Ex$XZQ{1w5j-J&lX5s9Wu-`vEv?|o zOfT6il{b-a3<+z4aiu*Ua-Xu=8>;;-{4JZJqlB|HTILwuPZvwZpngqcU(N`-jaJZX zY?^ck@q0ElF13MqkCWe68KztE)oMBN9i-pwGuDeGT>7{u&EPKnx?Rr8DD-ofo8OF? zjuF}a>RzR7qk%~8jHu*Zz{ap9F@qmmUGaA1@>EM*2;E{=0B)~JR^jH%Dm_eWv)Qit zAQ{UznxwOv9W1_8?9VLj#@QJ58{7w|m3Yu!mPn|(pSd+ayi%R=m)@~$2-RBpqTmjp zdQ9NO^42uaw_&z_BO}PmFN+mjXhhH9xmU`?^@hJEymk-B5}7_&>IWLQml255Zqc|g zKO*K_&#U`X?BVh@kssbl3@-R&9!I5!+r28!*=pO>*cQE>q6~euO#B=4Eb4#(W@bDF z@foXjS=&=V_ah4=b*}`EE{=TD2?3>y>uW7r$_{JHO|{&BzSEUpo2vF*^=L8FnP~76 zF%Vq0f)>wDX0KRa6TXf~jx<$jO1CkIc?*A2>|?p+Wj?RtQr;pfnl5#!BbJMKbp{<> z%d|PwwzxHP$#R`F@|A&2G~XKD?`X!Z5B}qk23>NXu2%RQAHC)-sdjrH*L1-3TU&eq z@e%)^G1t5)FK($6=3gwqqg!SLuSR_?UAk1z;?wZwRFqIPF?S3Y?09M~nUb--%sMP6 zhJ{`6-RGeuFg>$NyC|*GP|w(Oey8*`M6RGL^-%~`$*EoGqR=Fg=&RkU{Ff*_-AAQg zRer;}!|hzs!XhpR$`bG4^I_c+36;sfUO}#ONf4+U6g1QnMoP&=S#?}4&UN-GDCM#e z@~CM~O=&4r9lkWm7I1ax$+u<^hu>x8yv<#F#c*YmG-yTu3PzHQ2v0;Wn>Y?bxD)Sf1Z++v(LO!VDVQ%Pn2!YJ-)kMs!UGf6h?jfdaFh&b3HC6>b_+;60#R1gKOkhacCg!ckPyYk^x-f;a!O7j6BPKLvU*+9FnS}C0SSkw_R@8s{U z?=#DPb%R?vjU=NMFDs^}R7#D3a`s*Y%3QL=Sj&S=5PP+yl0N=2MTHb?uSR@Ln_8S9 zdc9cD;TF1BOVJ-jDl})C4z98Dj(tU0P`-NlFoXiv4G_aVWglJ6($nK=^Fv3M3R=tU zAvTB80;X-@`I)W8`#s4wE2czsPiMU_Bo?W+QVYeST))4SGIqDV-PG`VTfqy=Qm}@b zq-*5C?hz#AGn-3Z7;Z6Iz!=Hqmk%)H){7LCRsf(=bXdM0pbvtnl&%azG=XZBuaS%Wt_dy^c12?nV7g0LZSzOQC8s zPO`w3$9_X}e~L>P!B93e5qF3VtM^&#n@DT&8y7MXOj~u-qeGTslcQju*A;UmFIY6g z!+&l`cJ_hD+fCDQqn$xGQZ;o_knEo=2r#TWxtq(UsN;(runeM2xs_(sZ)W5PkoL@Qa znQGe$>10n~!awWP7;FjdRq#9zwcSBPMR?)tc^w~=AL{Ed+@^dDe~2k^ugCCW>1S^7 zHM1>!Nthl@%|Dvu>+yvdm5rCA!PEv|vfegl{)lg;WRByfDy7tx>Uv@T(^SKYJ1x3= zI_u2}Q!lTv>WHTDZ$_pPSwed zN(FmDt$SR0Vh&T_ZJ52LyOE=9u6dEGfXSQClwcRQ0I&FWczwzTK(`ckd_1P7)8vy`|G!>XDy~N|oY#m`t zCH20baiJVF9x?f{VO6W&C*`F3Ba=)Q6|@dCHL0#0l zrRI6;R5sTc1AFN6wp1Ya6r@aQvct-7W8x@TTej!3v%>;Mje5)m+#(%zSR_M0T~Q)R zCH%1T{);!{PQa1+dMPIT@vuSp9YK3$edUQ0t-wguK@T2DN->v8xc!ab<|w*`U;4ey zCE|$);8}}eThRG7gQ3{K-~qN=> zrT~883;2zP@E}I{4Qvtr?kNWoFXWz~V0@mBZX_oLxF91%n6F5_)1H))7sB$5^vGV; zM{l`Yv(!Ia^*_Tw<6ETvCoBNd|JGrq8wlepDujhnpl5jL?dn_6y?NXJ57kqzL=;wt Q82|tP07*qoM6N<$g2S)dzyJUM literal 0 HcmV?d00001 diff --git a/inst/rmarkdown/templates/cr-ur1/skeleton/biblio_cr-urca.bib b/inst/rmarkdown/templates/cr-ur1/skeleton/biblio_cr-urca.bib new file mode 100644 index 0000000..6cafba6 --- /dev/null +++ b/inst/rmarkdown/templates/cr-ur1/skeleton/biblio_cr-urca.bib @@ -0,0 +1,9 @@ +@Book{rmarkdown_refbook2018, + title = {R Markdown: The Definitive Guide}, + author = {Yihui Xie and J.J. Allaire and Garrett Grolemund}, + publisher = {Chapman and Hall/CRC}, + address = {Boca Raton, Florida}, + year = {2018}, + note = {ISBN 9781138359338}, + url = {https://bookdown.org/yihui/rmarkdown}, + } diff --git a/inst/rmarkdown/templates/cr-ur1/skeleton/compterendu.cls b/inst/rmarkdown/templates/cr-ur1/skeleton/compterendu.cls new file mode 100644 index 0000000..2d70ecd --- /dev/null +++ b/inst/rmarkdown/templates/cr-ur1/skeleton/compterendu.cls @@ -0,0 +1,106 @@ +\NeedsTeXFormat{LaTeX2e}[1995/12/01] +\ProvidesClass{compterendu}[2019/08/28 v0.1 Standard LaTeX document class] +\LoadClass[a4paper, 11pt]{article} +\newcommand{\logouniv}[1]{\def\@logouniv{#1}} +\newcommand{\logoufr}[1]{\def\@logoufr{#1}} +\newcommand{\anac}[1]{\def\@anac{#1}} +\newcommand{\theanac}{\@anac} +\newcommand{\diplome}[1]{\def\@diplome{#1}} +\newcommand{\thediplome}{\@diplome} +\newcommand{\module}[1]{\def\@module{#1}} +\newcommand{\themodule}{\@module} +\newcommand{\enseig}[1]{\def\@enseig{#1}} +\newcommand{\theenseig}{\@enseig} +\newcommand{\evaluation}[1]{\def\@evaluation{#1}} +\newcommand{\theeval}{\@evaluation} +\newcommand{\email}[1]{\def\@email{#1}} +\newcommand{\theauthor}{\@author} +\newcommand{\thetitle}{\@title} +\logouniv{} +\logoufr{} +\anac{} +\diplome{} +\module{} +\enseig{} +\evaluation{} +\email{} + +\RequirePackage{graphicx} +\RequirePackage[table]{xcolor} +\RequirePackage{hyperref} + +\definecolor{urcalightbrown}{RGB}{172,114, 50} +\definecolor{urcabrown}{RGB}{75,0, 0} + +\renewcommand{\maketitle}{ + \thispagestyle{plain} + \noindent + \begin{minipage}{\textwidth} + \begin{tabular}{@{}c@{}} + \includegraphics[width=3cm]{\@logouniv} + \end{tabular}% + \hfill% + \begin{tabular}{@{}c@{}} + {Ann\'ee universitaire \@anac} \\ + {\@diplome}\\ + {\@module \ (resp. : \@enseig)} \\ \\ + {\bf \large \@evaluation} + \end{tabular} + \hfill + \begin{tabular}{@{}c@{}} + \\% + \includegraphics[width=2.6cm]{\@logoufr} + \end{tabular} + \end{minipage} +\par +\noindent +\hrulefill + + \vskip 20\p@ + \noindent + \begin{center}% + {\LARGE \bf \textcolor{urcabrown}{ \@title} \par}% + \vskip 3em% + {\large + \lineskip .75em% + % \begin{tabular}[t]{c}% + % \@author % \ -- \texttt{\@email} + % \end{tabular}\par}% + \begin{tabular}[t]{cc} + \begin{minipage}{0.45\textwidth} + \flushright + \@author + \end{minipage} + & + \begin{minipage}{0.45\textwidth} + \flushleft + \@email + \end{minipage} + \end{tabular}\par} + \vskip 20\p@% + {\large \@date \par}% % Set date in \large size. + \end{center}\par + \vskip 20\p@ + + \noindent + \begin{tabular}{|@{}p{\textwidth}@{}|} + \hline + \hspace{\parindent} + { \small Appr\'eciations et note du correcteur :} \\ + + \\ \\ \\ \\ \\ \\ \\ \\ \\ \\ \\ \\ \\ \\ \hline + \end{tabular} + +% \global\let\thanks\relax +% \global\let\maketitle\relax +% \global\let\@maketitle\relax +% \global\let\@thanks\@empty +% \global\let\@author\@empty +% \global\let\@date\@empty +% \global\let\@title\@empty +% \global\let\title\relax +% \global\let\author\relax +% \global\let\date\relax +% \global\let\and\relax +} + diff --git a/inst/rmarkdown/templates/cr-ur1/skeleton/logoUFR.pdf b/inst/rmarkdown/templates/cr-ur1/skeleton/logoUFR.pdf new file mode 100644 index 0000000000000000000000000000000000000000..13db5c2b7cb9f01815ee76051f6d265828230850 GIT binary patch literal 10645 zcmdsdXIm3p)NUx!n*s_*QBhGu1nD(2L8;P<^b(|lAyTA?Akr=L&=HW(yMzu(4+*^! z6d^!>h#>?LAcyCD&p$Zd&WD*jYp$7Db!PATo)!PxP=}R?j|l((us(aLWdZp27lPbwJTc44X?uMTXYddGt>JD zdI(2}?;Xda%^i5ng}NxN^VH4@gQCnB{xjw2`#Q!8!S(+`K>|G977N}F-6vD2@x>Sb zvhHJ+>oqpf=H_`|e!$aTz+H1dmJnw7iMe?t3}$$ILiIHbGJj~GWNvQ9dRh;K*Z7G= zZsoqPFo)zud}*MU5xL+9;G^HZzwPB9c7AlH9rl4@?{^C@@EW1V%UuS~$N~r3 zRtIz6<#z1>nnRrp+m8|=Sx&QwaE=%JsdeE#l4L78)-ZeM-Q)cqh@t>d3c}t;Y3h(K=RqM#MbxZ- zEU7*azpA%t^5H_JnOq~0zWXx3v4#P9`5RmT6#Hohbj~A23&^_D2fCdD{jziSwNo7j zz%hdX8eqKgLzU$!HDHX*N$M61Dj(IW0f<_-={=wW0k5*DcuUxE0~{?Fpr4FaayvEO zQeOV3XaE3sZ1=rNGDqanBltX)YMTvZ2kIwCB=T%_BsN#67EAJF>;6Ql$loKO%fAbq z;@bBpz)ZAq+2>RtOfGsKL~bR_9qD}_E$GW$#9Mn_%aJ1nLAwLDSHiGeN-+zA;B%Pg zzJ;w(UOCc)T?+eb{xTU3oMSy&Q&`KbY+{aJ)3S4}@m}BK6eaIQO0CX6; zpuWU?h@CrmlJN!mDLk0KFWYiO+FzYwz?$F|Zy;&x2A~Nr%U@%ohjBI<( z*TFx~*Mv^sUZpEv?$(=C#6j*%#NkbRWJGCoKDlA9+RqLZv9dsmw!|J&J{R5@Ezs*e z0goyK^~(s{5%w-9Xk9k)+X%0l@g>Z1IxJh$C$c{>)mkOZk&gkoeesz4 ztR{8(zwO81+tqat#lAs@6kd5wdc^xk9Kp;o$K=VWdOEzQ(>M#)>__lF4v5+F%iVdy zMfjKyBJ6!v`=TnPO^7I5q=^Q8Ud;*15vkAK#q@=G1fhmL`}&oh$r%c7B^Z#7K@NLrrJHfB%&A-;GkAWtk5fPj2q0*S3IaCh#d#ZjZtBo>7*WZ>3YK z&z8pW+C26$L6k1mFbAQ{Oo$znK7U)Dq3u1exuvu1yrs1>d-tr^oq_lk?=+`C=Xw(p zQmUKp4jv7%PLjX2+8ZL5?T%kN-lw0Jj3F-gHu@xX2xzVxUo&%!^9KX?rxrZyc8J5TVe2n{Pra&= za+%^cZgTp%Blu_NM3O3p`BlIFtyVF|y5|*v+}ySpX-x737lEh$(cQ zpj8V*=rkhS&AMWMVqiBnNAfLNp)W&e@lCq!5s^rUokMKXK;ZIVk!h+O4`pBZtFz7a zdEuS|Pno{gn@NoEjMnT$mYiKlNgj2mqU*o5d1xGu7!-WNP`lhIfm2PZ-{KgcwIaNc z(+HLCFA}*QH;)VuJb@a97~rOK`dv+T$Y8?-f?vSQm8o z66#G%OyFpMSN7b$J59xHiLg`mH-d)Ht1-s2QS=&@W#cYBlLLXA3Wq(PMn^PenXr0e zOu4>=8QXpD+5T95>O+YZ{IFX+TksGZ8>(LnlRvP( z?zzDLrI8YM$zqy8D2uTgxMuR2HJv_PM85BC7p&-e{6|`mXh$mAzx+?act^pDRjX2~ z(ap-@FH9Qglkwo+R);73c#tQEK0#xiKaOxKi~1Vu(>9&+iGX&sFG;lwVn(`ov|{JflX-sj83QgUt8YbXZL`zTgOcxxW)WSy9tZEjO&%J( z^idQ)_=U2$uWwU2to^^xDpesuy;!0&fOYj zUNNq8imIw3>3T!Aq}T7`+}T{;l9R`3J-KO`dzMo)pMLQ(cY^Xgv!@=7x7qx{4+JGo z926KNUi!%ARgyYn8EZDN(7gXjw<Zqs35kAd=f|biZJ}NXBNc#sOGLLWaX;6mass8A z^r{_vt+!#d!k3WU+=>-}#qu$Tuq5tV-+VXw8yZl4E;X-j+P%d)FRrn z%+QayAeM%|;XJZt`lB^4=3b@MOF!mbIc#?b`xoC%(ncnBXGiioC5r2?z>g<%&*X>( z0(eLr>bc%r#e(mOi$5|^dqGy%#}x4*UfHUDGrUhhzkQ4Q^GpH0Ec=`NLv3clf%o~F zDymloYqk=v1n%7M2K|VmH%}eN`qB0yzC=W4%ITqugrgA9>SZ2DyQDB=uBh$QmWo)>j?Gn^s$?v&gO~6(3mU$ynn=nQ%4u>p)Y}!{3znF6EQ0o2 zcbX#p8>5dGG+2*8yt0nOTb~c`IsSpJT1FIp8s`T7+N@QK)F|sKL8>IE&5tGJXvgvV z`p{tw<9DiBlLKN2rfDwvk;4m-@Po0 z*MfjIr)k~We%cUbRH#_1x@7lKn**;^C+f_dF4q6Tj+hcrntTq7C#V)~%Vts?6+`_pLV< zS-+UY+oEPlP0XmP4Zw1r=<7T;vr=uq z9hUOTk2U)hozNZ@%zd{xWbxV%&UDGBpQ;vB!l)86nHS&?lNo-b@gFLs+4CPF_ep}4 z@#NHp1%#gpa~>v#0;X?Eb6xZ9zS5_5l5#PVGY+r45-wjSHNe*?fCcd={+zT-0;Pz9 zghrrIn`FI*@AzV)(OpFRmr6=$^MJwN$5n9Sy1Wmy`&b!CYTeULx>@+b`_qZ454!22 zMdTIhL%thD>Q{qalvy=ISc(E=XVn^#%!^DNRzD_el=eB)mbqN&>P|9$CA2BXc4>U} zMn^bqL3*Z^tV-)4WYsS>+VNjB$1Wv3{n3<4gLN#js&c{^%z37e##Own`*5m`(o&|F zd8_hLPtibnvW#aMu?QW(t@y01&*86R>7I3v)juK#-DEdVxNu~F{sq_D@(#~$o-}gf zyhv}x+b$?iXdmUH=djL-l>zsCAy+fRX+y~gMezo|o#($3pMw6i1e^x-uyLisx=FVs z9_~MWQfhK`a6l{q1*zPQr5ofFFh#-w?R}WLVF?9Z*P(m$;u@%6Xf4euE*RrLV{0%{ls;${hEi@7tA>I1JKWdwe`)?OZ;$%=Qu|Si zxai@ER_P9CvR6ZK^*xIh&@7va`V~Kic?0VFOTC@jKY$}!4(r)oi1y&06868m-t>+d z^J2^fcVCivSp&puSp&f<5PYgEHyfRbZ_8v38Y2vp2EM05ygx_Wde?LMl*p0xzRsG% z9Lk1h{Sd;>{9q-}Bw_#*<(WcZOB9f!)ISLLQnC)3t}~l!j{I-}i9sK=c%i(TsPQ;q z0jPl$=sCy5EH7qMgMa88JPe(!fw;Wql1-g5%leMRA2Z~7nKQ-(2OrUtL=bMu zSv)m;NnD~t^k5I-!ZFMrFQB56qJCP^wjgtmru4Ix9CnxRjL3q59k}ZJ*UIhu)q^N* zqe?}hY9I79o9ZGPMdHA;7`3Un*$%I{#?)%;L9TsKGzGsJc8}utS1MfE__5_2qy<{L zZSSvRC8lGQFLvx2HGWKS_gkEb&iuJ09!`GI2BEj!ifkU)@{|uPZqzsX zymN3kgvz3ekWI!$inW$W@`GHi0ncpkIPEw&~4#;`6b==eNHR4Uai;%mdw}M4b-h-fO$})$9q|61Q007+9EcoAH zo)!R5d;EXT{l5uOEbr~I&{2Ig#ZQvBgAxky(8N5I5aKRub*1|lC!vF48GMSsNOheAbK2dp>`%mWrljC5p zSyRTRniE}zY%6a4R2$feav z(LtIeD*9+p$#KuK3zr*<6Umu0*McbB;fHwy1;r>Fi~7`?5`YX(vl-Wur7-ZCjaes5 z@LGHwqoeOE6*}nW1l6hLL+ZF_(E7AOkjjr5@c6?@*doh;b^X1UB(;dpwTFIKc$X*! z>Z5aE%5|7$K5ZD9GnwPkbMw)j@Q;Vf2fyYNFy#1ik8f-s;Ttczpc<&Ei}--b^cs)* z{>t_6$H-zxam`zpRCX`Vaf&m8w}K7tyUh!PKoNQ8Gylx|gJe#<@8)9(HFKzBe(vd7 zV%%lbR!&TAGi9O>{ooIO1r~lB0Tg!XrlM?_sM!AS{%!H)1oA9>OxC4f?%5@TD6!7k ze5PKJkKM;`N>)sJaj+D!*|J|!)IDc~VF0jbpFMfV-RrG@u>iB=a3i)ZOdB;58{=g- zU9aem*jkw^x%%A%I@UcIbnJsH=+KvWX>n06Qk;*kbQ1^ZlG@v~9K zujc~~)bU{>E5!etEUCdJ-_33LCpRii#hq1*sz{>CCf#%QJa45%JOfT&xkx=CR{U>V zN0M|f+t6ph*;U@wz1REfo_sxRenMln{znzK1l0NSEmJuKJ-+GB3DEdfL7Y=LlM9au z1*V_ee6uL$86m6QDC#J!2+%6;38_&4AP-^EPe$`Za=EQ=XtMMS2Zpg1W!&j!zl6V4!xwzExotiJaYeUZ|><+UWR^y8yt4KB5z0 z)O%d=rA4fnY`gxgrMY2-0)-68yTi>%v~&Q+$D4f8l^T7U_Yl=P?vftD5jxt()Bp+2 zJJKb7+BW19Z#sbjo$cC%fMGR#HLt@R=g|XVp-X>35IeYrI&EiW>rdmul|b3*IZcm} z0GT&$BReCWQ$lwK1mio`!xVg*pQ^Oflq0&rQC+1DryuMQfdL)s5lgoCyA){p71=?Q z7zyZRCR?9=SGa|ra!%d0Or#I3Exl`smciK0gnm2Kr0h2e{p5Y)ycLDpgm%8p7amve zs{1?D%hK>Up)a1$C{CgaU3vaU`e$OP-Z*Z`@Mm*ZNM zr+?};mLIRbUV&_@pS`zyk1q{vMmpe@MD~^-W8v59fPP1N?>^#DiYd3&a!)~M1wmbO z#mS!7%0bH+$ZN0NV?_iDA19RxRSRxIa>?i0c)oycd;MUCJoXMd%&d>zVOP+bRhJ@W zcl7$k&CQ79W~6jp{6=_w96W>8dkT)hh*7JKk{0j%{kbXX|+!W=hJIUC0hx;TjXaWmW<)DgZjj4!V#}c#@i&juOpN$-Z?Mv zE^qw;DslrVx#M988z`6;ZFz$@~5f%!h# zrz;JfD~#&%%Db<0XArYPBlV~lRrSl2>K1Y?GW9JU(!}Zmq-lQ8Ed3B-E%;&m3Z@mIUiZa6NVEqT-L?(;}r1B=KOH#AUS9yuE2a`ud!0UJKp zRUGM|NN|KT`q4Bbt_;7~il6G=Qx*)hr3uH5TT3Q7q&?R8 z67fM2vmSacJin3_9~IkGj4YB{>uQXcTR=3nxvZ)PeY;9k5VRbyI?xF|VQofo-KbjP zhm0el@FdZ-R))M64O9Fn@L^T@u<^2fcPmWnGUU__r<5Us*=lG;`m%YaLeQ&$%jI^M zR=X#w1-%#$8krPg->j+>sERVkBu9<6o9|%JR<*Ze8wi>)`O5VUWnUzx&aQ=Wlm}<` z>%1o;;lRzSvaKufN)7-e+Hvt;!cXRv*%%DUQ0}M8QtR$HB0QGgALAmsSyj6G1J>U8 zqt2NbbZR5J<50M=;-PUbwI1Az*W}r3fZ$nHuG2hA$lsmAsJacFhKN;1X6?i9^v7!7 zOe%tRLGx%`{NJ2=1K8)JYOT-6#n=yH_Y*p*q~ zP?7V!8h7$dV%7^)aJ2G74Y+C+zO`hKmCBT?jz&B}1{d-!KAu0kqm4H98T_q=R-;&V z2ind2KxZXRJ{Jy>xZ?VX-A3wcG`|Qb#UM= zVSm}TIon&W8&&6*vFZv;mkhC*L6z~ENndq}EkrrAAsO6Qd<5Uei6%1AMJdZ=2$82CnK zZP%R@%ZINv@)WDw0d$APR{G!+Zxqd%-lya7wv=XEc8CDq$v>fIAsVs;+Y1XZOL?Z-mbQo#) zQI|cs9BQyORufb0Gjivp1*cssBQSw4&ayer#i4ayyx4SX|(cPwNplVDI*;3U~;jQ5PN zz|Nbb7?}*)JS^pNeC`?f7)#jpNmaYt&KSP*=g$($1TnO#?j%hy=@QF8+q8AJ~XGC_z zn$7z4%ZhlL87^${j=on}x$8>Ce<}o%ECp(oL=c^&Bn-)+Vy$5UtIo_X0as@8nz!9) z9dddxPOtp_9rtzFX2AoW0jEmFyj1uW&Q55ixcPkValh!MS3!m6IL%p4i_HTwewbSR z%WxMj(`<+%%4O}uz1n*-uoD6Q+?YtI&I99=s#GY8(7D0rXk#u5Uf4e0av{ zUh-!IR64ToMEjjni-Ni7hi(q#=10_|rMNi*yPZKuS>krKJtjL6*^+5uAp#CqL@FjDa?+#ON>aV~p2QhA7*A|r zP4dMJ4?~w$H>pPcYQ8Yu%VG6G|4?X<&3v!_)|C+|R*XUva;pI^eG+`?d*#}dlt5%i zC3!=1X89wh`n-PO^u!kWr2xn`_#}9@QC2qE8hXXFy5lFSS6tLv4V{dWP#O#Awwq7W z)J>O;{qYfnGY2VVTRe~>t}&wnC)2F2vO-`#RiV(Y-w61vR+*Hn2fzQDJI{N2fQ56A zJt2NHt8{9h)Eg$EA&c`BCsXbiBCq$za;N)q)Y`kN3H-Muuk8rCS6Fqf%vtJFpl(k% zuNvRW0^0AukJtq%)vz7QmAQRR3l-pz^{{90OYWzIhg2HqZ~cTPhR~Qr`HTJlrT=;X zD&xn-rlCk&a!FL2Z%%`SEaQ#!Hc9ao|7Lf19oLiqtQX zms^(Ls=dX#`jaI;p?ZZT<-N@>;kuJV&*`UuzE&2>N(-_tH7UTUoZPtpA+VQWx&8hC{?`~CbN0(5QMcL5l(;{fmA$4YgsrHc6I@RZgd^}&N?$4eid?DiS zUs92Grb*jz(hH$i;ICOF^Cr_S2xX6*6Wuei5+(s>s zWU`h?tjmrQ2m9LeZJK_q5u5D^&3??VGq9tBqwG=0Y2+)4m{ZMl9ZEPSGUSJm(%TZc*_02fTgihAR(?sbD77N64VBZ*u#YU0j&aw=igQvIKpn2o8+qc;a>B9AQW z44efY43FLQwm{QhaJ=5S9uXohBN}%kJYF@j9oTJ6`tvET`B6J4R&l)&Q220zZIq@b zR?=I$+O~2uwi#|+QTxlTfGIKO2KyyMi(IK;uPZ}NvYyJ#YJ^+$N&u-2R{$ba$+gvqCWRR_l# z#q;Mv?Y6UQcPRGTkvKdryGr+Z+W~n0%Dy{Rc3PpsuZL)(1>e8DK!gWC76c=|C^H}D zCZ-Iwu|FB4DsVYV!p98$t8Zx^jab=QtYc6fn58PHH>?BJ3gfy9!7gZA#o0P>d*JWF zTt%c*csDks%{6`Jd-BOEQgLI6$bpPk1@2J(OZriN* zteH)N-!zf+^7e7aoJ+_^r&%6j_Cev^6FKtcu~*Ga0|MUm?X1mk*x4%P=HTm|uJb!H zj_{PT>ei6yh?OS$WKi`Xo~^*;e4mPp54W3}(DqcqXtZB8-*M@lPrE7RghG)9ZxPvd6ell$)AGoF+n5k?tW)_A-30jOR9isIgS~oKv z1ZFL)HQxmBTG8nrs>TE@`aSVv;?Lfj%8a(?<=um4{34tibDukt{vcJoEoNE`56*A> zRegux9eqP+bvD!%Hn(~O2V9mOoy4^2o-1LsU+4GkNS&XOAWVa=A2h|V^yzNH(rQfJ zmh_v3MTpOle@BC!%%6@^{9#*XX%n%I4CmVazEJj)Y}v}0QS&ni!^=tTWmp^`Li)(Qi1%>Ei=bNbOxP z9TnlL3#e-3*gZMe_1Q?@RtMHZhX1t4`Rl&6(DdTt;qyV^t8(^%dyn>iHJSSeN%^)o%=IGjJl;o%LA#hYDE*7LIgRL*l`D8BIZB+>XsrVMv;ou)&~y*-0gh#Z?=NlnvagM z&!=96bxRLIu*Zh~I;k%TmTa-K(&Zbo?3drUevAH;1G&vUq2$JzMb5UbZ8 zK4b39z;?PBE)32#N2vU)5spC!20piQy{e3p5n9OU$~u{nJoKpm!qT%o&-KQvw+r>Z zGiiwH{@k%@)W#oFJ9{W}I|&nA$NLPsecpjd02B$nFsd7d(OmG*b{w*tlcr*bHGnfpHXIp;p-ahB)IocQ(CG=#-PuJAF4 z^NI0+A38FCKn$Y#mUcGod=kLQEe26TUpE^*QB_M1OJ}ehgOU=1jjJ`4kh=Z*z)zaJ zV+^8N4%Y5`rhJmr<9uceqN-p|R}Vh%KaNtj{_`kR?qeH(^q1gUHtt~0$5wzQRGseX zJ#@6O@&I1*iQaG#)-q+kagLyLteU-TAIic>s5|_jGy4Cr-7=tv~dp?*7(W+s4(-!=6v-H;KE)V;f5s zhDQv0;;3=~k-)!Vd{!bNL4Tc-`9%d7=WnM_t@2yLpHBH@HwMw$o)10tT)D@HK~&e$1@J3iN(NC4 z2WJnP$AHg7HJmLyY}9P5z}7ZY*BLul19zm}h(Ywajf0)N2lZA|mpX$V-*&UKvH>;$ zk$}mrIe571+dNhUySRZ}sa})?MCw?&JMoGCw2|m9i^=WL11kSAgU=8S)A<^sonK^! zi52wU<(PSWncQz+TL-Ip6MPg*ZRU*3@$kMi?QLjUQwF*a_IuerzR(th~!3 z@=<{_kV+w^Pc5DBp|azJZavvVP&Qjc%ZDkxlwhWkWo36~Jh1h34CWeWgeHS`DQo8C zE&(aqd7NkkV1vTaU!C%J@_CPLlB+fOK=lVYU~zV4UHa~q@?AM|zwR9^5ga5DSPT?j z!aWJ87IxpsBA51UG*-Q*M#V-_9}})rYivAv7_qxbOl{L!-6`a1IPP$O$~-&)vj|g~ z_Di8`52VJm>GgFglIN$)T|5EHY>0d@z1LFi1M%FQLf{hg9Ob9lhk7hydsV>wE349mL%Ns!}ZXz69@}BwU>%NPT3Bo%X&H zE&~arJEcc}%{#aU%0?@j6MietR#D{c{&XfSGR$Zt=PY?1@Uf3%UA5mM1RQpU+%md3 zb#G8)hZq&In`U5I*vm~r^B|(?0Dj8*J$^^6(y?_17b!5>+~Dp6d3@K)MGs(ZuG_8Q z4SBLnp5soM7ZluHcZ?C8uG^igo!YmHT45jqc3hU;@+#xP4vWmVT~*v2_aBYUg^_us z1`kkDcYTez&I0O}ihr)%*?DK7SZd0 zJgz7r0jpKPna4${wDV0cg`zf_>u_CwdyV(eQBu`47?h|i=uy=N-53rkx2yJ`!nlOp zf>@=#>)fwg;fJq$Q=LH@lMMNSS_Za8ult{*oDJwIg;7#Qs}hI$uQM;niZBi3jhm=6vUJVFIioJHfb2nm69r zp3`eG?~b&h2T9L+QV;M~Z9yxby}iox)k3%LTH|b3gyTJwft$u3weU+#vshb4VR*|@ zvxs)>AAm69Q}cfokf#JY@JdG3 zIlIoTJ@_E7sNx?GP^je3C<%6ZhS25dNu{#oBs9b-`Lf1{7PLG_jSnDS6g~`~W8kX4 z(+8H(hGnhA}b27`^IMOc4fba&sa{P!SB?t!R!?fKJSNAOXhTUx<3H zZdC3NCt8h3zgNJkLzO$mITie;fm%D>N zz`lA~Y_mgv|?1VtuFkN8+lL&z}9C2qi+fd&(dT!U!v;&|!q87j2dM*Esapb$E$ zivmf237SXDzf@+$?5Cmmq2+($9E7|%Pa$EtzX4dkAW)TNurNaDMQjZB&iMd}zF{40 z|L6(c_2NFIz%2@}mzW4YIfzy$Araeo0Tdi3#6~3c4fz;p-646@0$Mx1z*|{^!5F}e zH1Mnb>=~Is(&n$Jj(+!Y@N_(WS1F#B;`7*Y4A zD&NJ;dwd3p&cn+%g-}tmp33eRbmRJdahXOb{x@dO*tojS0kn(n7oY}9d)r`SuI4%sSy)- zxoeK_2a6uj)#PMk4=}&A`CQJ~(9KZfbmyQ1GwS{d_x5@;zGQ-aYY=xj-M2lO`9UyS z9mm0}bJ0PeN{B4~=F{*Kr(@BX9>@qI#EKU`+T5xBAllj2Os~}a#f+4)eBjBOM=Us# zqd+GFwvh0ZGwwbnZie}%dbqydT@wNuf5E0SrszKodh)P5MfD0|vy-+>|KUdMn1|XI zu}l2Z|7>C^PYn&ftEje)CJ*D}aDRTS zAJo&tZ5ZR@(fzLK(b(OSbc%?8?+u$41m7K(APiY`K9)70!dBp*n06?d@ix^)vM}|E z8Ss_iwv~GU_>U|2hMEe_jT*D$-Q%NuiX}*;67qL7ls>7RCio)3*V0_R_AciX!oGhy zawh4X><7J$Pdm4cAj6;Nq4lt^R>5NbA&<7?C&n79N7mXI_^ySb7>Ql1jkSEG=8|3O zWA84(@`x_EzmJr{^pc$KErj)4I=7`!tb63aTecXE;1A~_f-bsN&X9Q69BgA36R13a%6s8ORQGR#$zx`sO1b9k9VJ+ z(BU7BRjlJuI|WSp${$jILm68K54=pTpAUMqIhP!xdCa!#zaCmx$6275GPke>bcl#q zTE|2-m6vQe92zqd$>`_{ZI8#TWkK25*l+i|DYHyV7^~1Hts-UWm(UMm{cO}&^t<2C zJbiPwQcQvaI}E*P8OJDCH*P@3grC{&L=SU;n}b_L9BfM{OIO90zrWylmwAzP|HT47 zOY3}88R<>!We(loy3F<~$XKFgX*o$bzWQBn=Z7a*M~0`-)$o8!p`OY=lTE0Xf z?n&4&2pYLv%TGi(IUQOjn)5?O9QqCuUTyf&Vmi(+I6{MI^4@G9#YDLWFCSUil+v2f z9)HiE+iXPiRXv$wK8?G%j_m%*{^cBjxDN=DV?EnPXia`%apE556wwKeN*KCvJo#mg z#_G_iFFQzsme(BR->4ES|6Ky%@{z|*6-uB&uUiM2CgH4=Wf2g~o%Kw*=#4lQS52PV z=LqZ1&-+E3wc0Z)Rmp%4Nmi*H)r)KSLvxQ1ukkANJy6JEJ zHa_a*iG#k2iGn*PU46=2;@&*EHO{2h|PX$@d0Sbi) zB7E_@9WwrP8Lh3dxx`?8rB74IPw+#fFc;LNPnDf2%1N)U7pc9vvG0n(!L34TEYC-OFM{0pu*=C5?%iOXvK8 zw`>m_P5bFmC(D;C2ww@e#9#oIA_-kwjxWA0_(ln(Im|e7hAJQb0p$93Gj@l5+}ulF zulj2Fc+H8{V^^4R#-0yLrpFsfEaqe7vY#_4o?fy867kc-)H5oV_?1N4v@{LkLj;%-gGzarAlm0z!3#oBCQ<=~$ z^XV!3MS4HG-8pQz|N4z}iTFs^l zo)i=+)oc-k$j<*<{2zH2Bo z!R%!K@RD&v{m>~Bg!Y?WY7QHWiw}2~-e0y{)XtQ8act`OlEm4ATpP1T{D-7H9_#I( z*|vBg3YFTw)W}DL(*LGie%|*7t%NDeC6&Hykd-!_e-DZ1l`o*?kSt*!Q#Ur^M~oZK zVTwl$_}>^-_@3|hT?!uKh%A%(Kn5y0ad2}vQIPH@Vu7Ui{Bcg)YEm7fMW z-Hb4?--xO?AwbwpEVa{Zdhh7yGxfhZ)3$epWUJf#UI^^7ZpLBaUG>`CTX=UnvY7Dl zuh^5<9^5{(FaM&rW7@cagz4LQAexfoxMQ+2#s|I4>@k}+J21uL#CT7`!+*iule1ux zb^ra_6TR2!L=UeZzAscwR>CAkm-+F2s!TyM)sH$N$;_aK5?Rx0#u)EkNDkQy(>^oy z)E&`x3aa`NW;#-$kQsKbD+G~~)@Mdq0^rk<9M^B*Nl4jAPAFGnZMQpNKRujN92`x* zso{%WdMjjmgSRR_*u)!Cfv-6y;BI0L>&1AlQvs^(VNY&8wogR1$f<0+@M@LuNQqOX z(7mqb*%G=!ZRHCiHWj?$3EeAOIU>J;`=mSl1~WbIA=J#@a23+j$UcUwERtoT5UvDFy5C@lsuZy|dr zm0yS2G%|7~+emx?={N~Vo>CHuYJ4YQG=ws1D|JmRN&`PXD3e+NTa@7{^K z=DPD2MT<+!Ao9GTR=Ein8?__S%e|Z%(k`=8@U2q*RpoUrzXaw0B`U6LS03Nh^DQpM z4Rvn<&p7SQ!smdvL^RfvI;aX3uJy0`)+BSY@|mQo#-O74#uA?(7e8S^p&?oAEIH$^ zaRuIeWl+*mJGU z`+UAo=wMps6~~F&1pZTptd<#wEV$-c6)u>mwy$C^O((+RTp>_bG=#7CYtClB=1k@a z$PiFEKAN#4c5opTW`Fy1IhvDK;lEJw@^NPfn9t|*oN9bPAhPUqsns_{ol#l6glWDE zlr>{UrfRuR0&Ul$Z$lxCqE!~v0URWx{L$Vg_B~33DG{SsYly=37SNs64IX;qzSL_{ z2iAS)ALuchzg|YDfCWLji9m0eA3da{UI)+*cD^#$-Rpgz`5ga#m@vTCu^I!|_?t%cGC5YN+4zeHnB(AYtujtM%wm;3Ce^T^yHu6-i zH6<-T@1h)b+hu*Nk1Cv0a^PLGQwDSv3*fFkPl)P!arcSiw|b4w-EG-cCBwf=xiAm+ z0JK?4E{rO?KS4K<{rWE3ri+!J((zC8IjnnpSxi=>O*PX2Fr_UmGN=gtMM=HAm7qC~ zQGnFb*f!-N{5`D^+lA{__P+@={@%fHywHKbDjBOk|uN zpthZe>aImbt6S-D<_NW{d)<%>t-2md3m$lH=pdkNoN13_Wq1 z1O+9$yreH!z68I-IC`xcefq2V@RXX95tXOzX|&}po~He9-fAn&rnonqiBzA9RE-~R zLw9pJ(8t;-_f~%DTllFqm2YEj65q@pKTtTBsJfb*&$KC;HrRL-*%k|`O$w{a?)xVPy zgx4Rx*L>?~Q@%oB$j_-XXd0xmjnhqhs z78w#GuH*&p0R&_IhC{s(f5G_`w1&RFP**APd%*y7<%iF1D@0a~Ew%GMNU6x7vds2N zBF>!jS*@!D(xjdvV3t3?P0gr)q0e0~XEUn&;Y&OM+Oo8ah)xldim_MO3mCSH6Q`=q zc^K`1g7uhaX!gh)()S?G&S$a4rjD4z8&}>z(EEO9{*g}!Lv@oJ{#j=YxL-6<#3&`N z0f@=O*rzeuozw3qGj{r&cNd0;livP$jVnqgBN2xt5jVfDd%+|_OXl39_f025iu-8QLV{B!G|U+z1n+WM?~rNdUv7J%(v!t^dl9=&1`DmeELbJ%(Q&^}JJ=(f51_ zEYK;m=R)=-FV0`y=_|%I;RiYkd`<>6=If|=Ux9NpI)i!petVm%&qWHzea_c^VW-!4 zHvE()s!r1C{jxkk$s3uHkff9e#G-t1q>3E+2mo6`Z8;=1QJIi!FX3Gr%IVhmHx~DF z{Z}mNXdt9n=|ueQa>}f(i?^RY^<&(5|Mx-Ljd1sgJ#&XQX{EQU_6j_#QDDRCDoM_w_@VzA&de8%GO0#ugucu@)j;(*)4CcB@_;h_V{U`EdzW)!%+d841 zPWX42?6uG3{|k}V0Fgjh`K$Z1Q{BrFeT3|)Yti7I zHqMKeFOL)yxUzs0M~x+729Q0@=6XhgekosRR@le5FSWIzoJcZ8W`F zbcbq(KT56$k7%g0J&x1YjZ@i~T%$S}z-N*}RURnczsoI0bi5i@5s)KgBY3@_W1$3r zqj|l*p!u^nP=N_HIDd+Tc~ZGz$fKKHCg$URudh!h_&ZB4utm~`5MmnRMpp^#=d*kN zu7ua`|Ez@j8-6pidS42*7cfZsBS`@j_;->D2tV8D#yFoDJza76qK;6N7nA`Kl7Ysf9QD|${eBNr_5HiUo!t_^!A|a<#E}(F<3w?oiHY*u}GS+Wy5q+ zZ#wy(71Yl+<7ualBj>Y5h>K*X>+F*20gr_JiyIp#LV z^XbJxCdGjgKy{r+_W6y_y%4-z_jO*eQR}QpPP!4}1*^XsIV!5Et`n)QAtCF1ZU6Q1CP*vCD2LGz6-VU-<#K2`ZMMLfLZgPmc3v~J2MF915OJ1jZ_M4@D-NLyoFR489 z8khf;qAap*a45<~XpN-UvYE}gHSGKT^Qo7bp?;?eE~%Mx`jAI;;Xtx;`qu(Vt%{lY zNS>`*?O$gHE!(Q3+Ry(>yZ5Ui-o9YY5`X}{HeM7vXpvyc7Lfk4%Ke$X_`*0;E%IDB z6qO=gkv=4-@y^dU9w;)PK2ZOBQt)`U-nLPBVd8^pyplph4EUyGDD(pvef&q=-&L^l z$&lnEDP3@m-!g(EY0lYclHzh#MGCZbSM>t$qv^&$;sbkJjLN{Y$N$Vk z&!1)}nAa)rN6-mJ#;XEyB``UvciE(j<=*H)zu zPpW85^0Vd{JrJf7`Ky2(O)tIi`^Y}0lWr|Q`Adz_0m|voN}XESA6-&Qd|KUpQKYsGtI*ACg&r38G8|#0=3G~0*p*c7I zVu|uG0_;;|LtFem@1_0wIioN3v_U`5{Xgve)o-_cP&Ztd`NOCV%(N z(_LqUyx)j1ul{t!WfPS%f4Q^yu>)(Y!c9*4t&^e=KoFb|e)saP;$mIK)0ZA%hUMaq zklcyj&?vg&i9VrUNBwkTuah)|F54dSf+Mq6FBp>|8qKt zI;}$;C=!bDX0Cf=yiUw@BMrNF*riyc#OQQ3c%^T{C%zNf4&9{lyvU+81a z(g0@QIo`L!0>3#fQp-$M^a6gc`+wu#(T@w+LgD_nZkoX7_rZGkSP4_IAq^iBxniOe zUe3AwgpFscdfW&2q8b>kNs6B99kM$}Qy>dkRl==%T4eVRE)Z>b`Bl7fJ9JcWG!Jyv zqrV`l$ag(6Em)%U3fI$iKQ{1WJ3{ro9@-Y6*?;TUIandFP;K`uG#+ZKxZ4X2Tiu?( zZH^nQp)4%g!_&*%FH9I7r%^epoSdlTUf%zn_ru2YeMQEhEebyWn6lzpmGx$hQ~qML z4{{_Q9<)M`-2xj(mD0u&SqEv^J}ak+^so1sCuU~P&&*+p%Q=?3=MZKmEsFFGE8kSI zX-`5`$4+Iq4AkreJJz9JZe!#tb% z=g+KXLk})KjBRh%fTV{o^9l7}OCQy(zn`)!^Iq(ej;-u%*^P zv-L%#3MEB^=%k1b(}(XXc87-MXkHDb>c)r^w|*vI;wRg8YIIlagq27qD*GHM{!tI) z14X0q3ENj(9W3%oSI(JakuXFv@!9BBkh+XiwRE(vgi$~~Pq-yZ)}y?thYhC#IhNAq z9{Q_EJD%k=hr`N8c~jORqi1ioBLoZC@vpW%_%Y>M9ObTgwpAkb#ExANwwpuT#^q;9 z<|o=iPw-cjjv=1i+R>ioR%xjmb^(4|RJ6LSy(qDa#39H zUz(C9Xt$YoZ2K5vWDW7RDi%Cod2$Qt-mw*%KIsc>j_Xa!0SPuFY|W>I;}1p@0+Z}$ zk^V_9fX|3WKJ9ej(;aWhoNLE&tu}msrF&pttR38Au&f-r)Z&m!@?|XN3dnx`I7-+p zV$)&@)GI(HZ|2%7W-&br0rQ@wOE*!f-A86J*Ns*NgFO~9HUo2gv`ZA_k`B-)w^MpW z`b33^UfI02Q!je7rp*YVrifOM^&RFKQ9|GS(dPD@q&m#Ydrq)7N8&$ju5V*?JTLR+ zJx#uWr(xr5x8Tyepf5A6e5LTfnx&x=sie4ky^@h$eu_qW-PlYnks|~fETPlw4OgZN zCTGvzogHbD;Bida&f~!!omOrVR;WC+E5|-XBcR=w`{A(tJ%bcGQh<-rnU3CXXYTf= zjxfMlL~!Paug$s^5u}w{R@fxOqEMCRuW~ou5d2d z)7$*8$Hl1hPv!J2tCNt}fa>UpO)FJjHF{1v~^wJ5#RUS_kQxbOsX}oyI z!i|@^D&EET`MRT{`?J-T{WU{Q*SMClxb?FTbS|Uz1xN&s3`b3W)^y{|2udklTxM2A zSwpqi-pdqt9N6-CTUjO*;=f!e3)V+>tA$ty65sByMHLzK5H}_AZ_AKQK;&`{J6 z2>7`tb-Za=KF!B=$+LFNKXF#Dd&+Oi@MBK)l#K%owXhafw&K~%N`q>|D{d9N!Y|m=L^2UJ8N)8~#jhi=b-v^w@eU1l!%!m3 zaS3Ix-7?XAQ?_a`>Y|9THobmluFGcD3}v{)v8y%ic&z?=i=_ES_kAl@qSR<)8irmg z&&DGRpJEjjVm>M=jeg@f8!~@C`37nvIu;JRi;e zR`X`K%sO82)O^#WNoShET$#dvw!)Q^7C7&s1%v@Ev!Z2A^De{8bQ$hiwScuar`v~E zV+oq~8iZ`y2aZ0(TtukCD;mtKQMguHi$ceBVNY)wEO;%(&=+fGdA|B@QLxo}jC{^-C> zFgeDtgLtwN?@4htI!2P-io7UEBhWtN%2LKLD+$jjXUj(>9IkobQru)%2uH=uiVkd? zeDFOk5nHPHgtENttY{WFd)bNh?K{?{B(3h}(BkYFo!(?oq76->VF7nFT)urh>m9c> zBKl;$JJF1Rbnd;)!OJx-#-8@qK8W-6V!km(_~5JOZdZ&G7H-S$?x{IQJg$cx3z_l%cWu3sx$%=P5IRnbke!TsGy?uiBe(3#^_vw7tudaZ+wh|jX z=Rl%~voxaq+|JQ;OuR!ePSUwb9Ha-Dt5 zH%Fd06niA#5sf08!A}&=Jd~%=U*Z+6+si!`YT>(Jp?2pC{8F7PDn(kph81*^htoKZ#(tVNbQT&P6bl0iQhMGLv%Eh19d{ZZC6nKwq!yB@S$Z}3 z)28-Gd1=MZD&Qh4tg;RH=5Qx1T$VoTyumtA5p%BlSxIasLiQ3~9fpHYXhzdfyH0r3 z+za5y!`L!+m7JZTZcK*7S!3M!c;cX<{EOMoY(aKjx*C(W`evWF>*<%dLrXu?k)ry% z-q;y8tbbW8uM@I%$=ckKEIA!Syy%g;xRrnKjb*x%x9{yW8nGy5C%2)n86vzWXq0fS z1EHxlP!ZoNe9DNW=0yIL?Nel&z0&Ow^ADDbRRZbbJLD_J1K4qV<=ONPb`G*_^O!Y` z-n3ca3wxZWCMCpcM7H4UDR61x<; zfnJO*02sGzUYTI8OMcMbmWnz(WC`w7of5RG_EJ`?cfb9kF)lzz+{&}%1$k#}fwRf| ze6F0@^rnmLSChomiyYpOZ}cTo5nT|~{}k#b);mA7|&mEH=r$PPoCTx!}9*xkK({ zX?BDAuP*L5ybp|uAakQ!xV5z=by~29%5R_9LCDa2%yikE_nu7TaTu4@iHpwn>|VMY zVLfHK{;58q7t8tSC5|F-&+|chfgehpW5~EsG!?Ng!0z~5{i%x&fLm5gmw|jC4j@gx zrI7_oNEPI9NJRRjtV7tuqLPAR8x?n#?pRiY*P%gXJKY0c^!V*^b;ZUBL-Z{TdYI}K zS+`vtEbF|p4Y;MkaU-#q|M+a=rS5y8$t1*QeVr;8Oso=`Y@bhj4odKW4wRJ_e{nK1 z!jYHhX)|Vr3W_ye^@--2FcOg!F5TbXAh3ey$zpPyhvX|a6#ea-b_x8$?H*%wbNgei zC}LAI(9Ury4l(tl$*T6OHcK4*{r`<3y6#1lHOlC0xOAoNR z4IX-HKCxM0V842Bsq{0x3o`QS#O*OD< zb(hLk3U=&A!Hm`gd&1sB-S#W~a5qo~qbjyCfeEQ*UQr^baOy;7Qqn3XWVap%uroPq zX$5ihO6Oj%)qhdqc`*)|1zniVFBN+~lh0+^?Xj{m*3++oA~($poC2fB!*as=%Znl( zLKCo+=_gPh5<`zU=D-hnq-%f^8RGv$A4Nth z`guSgBZ3kx?@Cd6k#VcnP^gs~9y29fA+Tm5rT;L~>Hz%GXqb;&;s-xzB!(9Muxswq z^$mKv@6Y{4EIJI_`_aUzI+vA@5$NPxHZSGV_5RH z3@Oo-MMDzr8wxyU-Ntoz&R!;*0y{)Pit^D%573~3ItnNOYBL3`AcRXxpJ=BPzdRg2 zm6o$^J(H#oQen`mxw=wdGv)qr=Zy1$XnE#LK4;QyB{S&&JRZYD*%q!LcC{6oDTj&4 zJbHzNEHFV!u_9rvJRq1DuFKWQh4xGW%o!ovl5A0dW zuygdzy9x#E zxpaBIA2gxyHuHHC&akD;UgETaBXlUpMR?NOB^X=c#5S|(F@NI)cBf7z>GUP0cLS@! z9`qe2{crJbpxlAvadfuqTdlx+){j-V$K#K!ZPy#k~ znHA-BLhFSayI z@072!pW&*ojX^Udxo5`>!4chqm#8y1daQjcfiIk=ov1v*Lh`!EGFq5caq=qSPI4;p z1=T={oAxVCFR=kF%iq27cBGFDnOdLT5Xm+RD5mSS>CEt5q8vZ5Pcd3C!*p{t`AkJz z9q&}raHRE_@S1BV%@~V15F%JcB-QtR2!!IQTVA>(f;PT$l-`lxf2>1-czsiA>j=TO zq>;6<-aY06+?%7=$vnijiue5wLBalu@jjIA+DnU+xtB3ty80A%JCOaDtbnQq=ga4l z2G20|&!`!AOSe*@;31<{!*}hsn>f+%q_oaPV zej1bJ`x(2V1060TqJ5rl!nxFoE-!ToG}$VOg5$K}zZ3IMoyggDdWE@{zVW`dS=I<1 zCulWDs_21G61GpxZxRAp%`b-5FAr~&T+TO&YWIVFF`KZ4<5#SvO&W8u4iUHeA{4YF zF`%JQh?V2HoZe}Hv?oG7Bcth{0b;%p6#BtB=~HnVk+_R1+rBB^e%R&tXMrsjq{@v? zn|P*FQcyu>9cG~I7zk!Z(MMIxEU$Sc=SAF|DQk$HS&MjeYeNB!l|i3dLHGcD;B-sz zeCukiVIKvCsMzUcODUiBi9~I%AX*UL;Qax2kS|clk7k45dQJ5eKf1%TU`B28m^+Gy zX^Skmw7jFzVIz;^jEp?*2rfe~I7Gq3jjKOULIti}(k-(%Vx84ztl3w}bi|#|bRVU5 z{7O@#aF2!}9-scBV@m<ZBB}C|YslsUm)BG*Q>viT4H@ifq+{ z?Q1*lI+=1`@<`wOGRnimz+_OhU1AKn5q>7u_g_DxC@3SQm*_PM0zO6qR2 z!l7f2HFk&J@uBFC!yxDzF4xZlB%*auaiv}P%HF#SjIp?dxb`=T1nF7djj=>}+)DR$ z%-w@mrk)nRl=P!eOx|L_gSLHg*-RJffdQv`Gk4C9=rsa)*Dwx@F3B%yLZ@S|q8ofy zl6u!uE|T6$jF7$KMfnazx=|Z{Ep_kXTi*6f!EDB9Gm451cSs8YUjE2hu!H~j! zJSAqyyqhb9+Zontt0q@U!VT_9Y(Z}4i=n*3lHN(bKdOu)Z@s@)+`D?!E?~DyKoJ~u z)z~El9^%4*tz*#*CcjJ_LdDuULG;uq!`FbDf*%b(PwM z(4Ukk(wDoFGKyo~6=jKsrBpDx0atI>(6Sl700-`FlK+86T{J#*B2_?C-pK4ER+)bR zMzKt47{A(+{UhpbCP z3@-|2Sm1QK9s4wwLAp{(up%sRa`V=3Z@!azKJz%)sEn@d;d|o<%4x9j8RKDLwN##& zP}R5qj0sUik?dEe-`&2G@4|I^eDm6=X<>&2)d8-hBHGKGbH^u-aOP=yHejx;K8M@c zDC|xzI4s@ceYn+-D{xm~nc#mWvMEw71X%N(^Z0a{=tH)h* zWu)xG+QKsui&*V-gjk{Z8^&=e{S6Q)xyQ@XLup30cY0=Y+hJ_;T4Lb#E%F=7GqeW* z&b6EMUytU0HGKiEb>HP4OhIiTL8k1A@sDTZ+ENd~Mc*H85#xwn%6dn`8?nkT{*H6f zbdS1*7|0>|ao%0sW@KZ=nyWA&uMn-v4YGGVS z4+h}IS6kH9K;0>H)Jt?oeK#I|PVWN%VL;a|&2f*=?V@X8x9+0ZP{jKwa?1b&76fKOVsyNW zay(AGGyf{m>o|0+_kxE+rPzssmtBQH?&lWrpY=G-ZNLKdw@ zF^z&(cU&Y`cx{`jlL^IP)-tqlxa3n*!|adi@SM1gG2iosaC9HH48!Eo#&13zeWcl_s^T^&?>1X!2^3RwLJkB6c@p)}lBL8*74 zo;Rbhj0O;q4jsdYynt>ZfA%jTJ&srK`xZVf`%8P=tv>jr=tv%hH)-I@uH@7v$W$$E zJ|*NGf(u6T^t!`h{J7(NU02tx1U=LT;5ji_Ca3jfjpbz@(XIEPPkzenqo))zvE3Hw zUr1j8W|zX&2Tf{-JsUnE&hPN~Utxp9F+$!2xL_1dH&N*N`=$=vaX6Q$mKk|C5c`R+ zGMrn+TS@nR9b{N63wJV+81J<5GmpOA#e8B>lo6C#zrCpQ9H1j2SL5dw;Pg>o^%aoA z>RY(pQn=sb(jwc^=GBtZsP0K@nfT1S>r3b;QLOi&FO+fcnD+q``p26u2X1dFbAu)W z4iZ38PZEBWNRJcHop5XA-BN}QiK&s;#iXS3MymqvN zhj-GMn-kB$y^oW^4aRG!1g=v~c2>g0*opj6+6*U4I80_Mm9%Z}2oZGo8KCK^eo;LvgA4h_O0^Z3`oFgg>)J(4}&J1e)Mc} zj`=!ngJe#5+Tm$hK%>H3W~Q^7#_5`C{-VjtCPv;My~tE7ZgmS$P1z>K+tkf!DOyNJ zR6WI}-)FRtVI>+ag9OasNik&@opQWyRcm}i{$AWn`k5cXF046{eE6(p zR&XZ=q{^N%fC(k+C0u!x0DLSlIX>=N(z0W&2?GslzsYcFRkV;ODGkHkV%#aY`6>$g zsS_e1r6ThgM&3Y-Q@?roCblI6HysW4-&!A*1@s#t=2b=8tYA%=&u4cQbHcNtc+l=S z7X6~$$Vp$vA~n7Z;&-PAi$ zY-0i^D6ZX8gtPIE^4-@mDuO#bJH1Q!?{+1#@AN^l5|-M|`&1pp9xq8VJIi)@?CM+W z)eI;3i+z#sdZKSdY7R5U+gf#}#{*6i-PxjohsqxaJN7r$0-^HFxL6Ym5E z+{G6c?=8GGV+&XkntQD?v$-T@>aC}Q#U$JSl5EGN%j1Qycl84kwvA>VBS^D}B7>e8 zSw#PM)M%D~%cb8`&J(4$>nedPOsnkd_fd;%@HauW(&`53dMYedFnEC-99JB#T&nK2*97%T*Iw%HX*q{Qg*8 z_T1}U&G@+Hp^(nl7Ll^Juoicsx?gRjZF0hXASEJeCrxpq+C)Y%%U4(^-C((Oe_ zIwVu`A_z`CVhvbGW{U$fipx&;4iWl`rZI0lw;V#x`K5>I7`ejv*K1)SQTZ)(v)`@b z?`y41l$24vs#VDW*&a>!@9)$-eDOLA7XRAoQk*Bytqfq(tpPGga1yYn#G{| znu-@2>YV0oB9_Enn&(3BQ+$5{AWFu1GZ2_JUR0G}CpO~VnVbT6&4_KyfJ#|1v-FvP z%&|QDxI$6Q0^>fd;&m1kt7R=STlTf?|8#eyQBfUPSi}*90X-qeHtFfeVH4?vUV&~h zYO@N_0_F=>-DR;Rp-2W`WrpDhJibVPE6BiRxY2deK;y7Wk@Vb z3MYayJjxctDoDMk6)oIh03kJ$H~9X}V`jjuR@WE#mGI$RX^SExE;%qR^MlU!kbr`* z#GJ0X7kW%8g?BI?Y8u=DwL{VZxGiReDYF0?njxjOSXd;w10~cv9Y4S23VO-*X3$hH zJWgmx#{EMANwY2@wBL@i|MvyYKu1Y9`?|IYks7$j-}_Nn;$>uGkJECI$90iLn-n$1vL2bap^@@`4Y{ z2C+T;tS57%Jj)PoZNjPH(gg9l!RB17|6KFPY!|mCtz7W{+o>v$X=^Oq;U!T$*W5G3#6xf2O#js%b2vFU zty>COruw}nQ_;zqB`WBS(pH}wR%5}0f%$CI`|7Ug{ucOwh`+FqIXJ338t@Tem!t^_ zr_Ywcb+1) zTPy2RL-@K~D^#7F(EblSutsjFCwe$>5khs(JMra8n`R5|Ct|QQKgvSyUb|V%Y}&^` zgyfAcPoq3lXT0`CowdC@WaIudU=IIOQr0DYytel=Iw5WwnBZ)cZAK(DoxyRJ=X`$9 zYAV+1WGc6H?SlqxpqPGNZW{a@rvB>YB~tx)+X<3sJPiK{NrtaglbT{VIdMUY+33XP zuCF+^bCcd_xesBU_E})Vnm$h`y0YkI{QaIJA3uky0!Y6vTXMr%GuDqCG|8*FU^ykd zT+&!kSbaugl!886KNakd@#In+w#n^_>?NwNsd;fyJG3-hr{1>KYwwVrD8wwJj6=?d zaUz^=a@DzCpNh)G10oZjD-69vujfhyQ7v7lRdveC-|K2o^(7+Js_ z=xeUono?n{Foj!S8>~rpYIHiiP)+|JaviKshWkoB-jaWxnI&>f)C>oWai*QDU^ea! z`Lblie4v%D-O)$e3{ttv5B#-?p&m4ufjE~OFge7M z`5-f*4_AMi!+ZH!z=~G5E!$i*0P{&|7~$>655T-N{(AzgHrB zC_H2(Z(~dHPfo&TfI8oeul^2h*_cNAWp7{PsVGs;=9|iWYojYM4a%*#ji{`%q9w%bGI~sBabQy*@6q`-;i}Na zA>~}X|6>2Br{Cb*D^}NON%u2D%>8=vaV+Kv1@T7;yPpb3O-wEe|M|7j%6mW-6qs$NKN?^KvwlP5PX*70D*ZnK8(ZF5^O&Gwj)^xD69wMkda+I>?6f16Z% z_76XOaLwVgxN1KCLuLl}PvHN%6uYPwkUqEjKSbXC%4I;Mu-TN?!MAU47m)V|qJ<|TIN`MLh)4#FPi2Mi`3zb_7>ymqVuy$E==88i7K0rb#saH@&fvL3 y@LlPy5fok|kIiriV>0=C3Y8Y_LHyrUge*sh^Q6(bCF25?2-VQmcBh}G;lBWCU;1SL literal 0 HcmV?d00001 diff --git a/inst/rmarkdown/templates/cr-ur1/skeleton/skeleton.Rmd b/inst/rmarkdown/templates/cr-ur1/skeleton/skeleton.Rmd new file mode 100644 index 0000000..a335155 --- /dev/null +++ b/inst/rmarkdown/templates/cr-ur1/skeleton/skeleton.Rmd @@ -0,0 +1,106 @@ +--- +documentclass: "compterendu" +lang: true +babel-lang: "french" +geometry: + - left=1.5cm + - right=1.5cm + - top=1.5cm + - bottom=2cm +title: "Un titre évocateur et relativement court pour le compte-rendu" +author: + - Prenom NOM + - Prenom2 NOM2 +email: + - premier.auteur@etudiant.univ-rennes1.fr + - second.auteur@etudiant.univ-rennes1.fr +date: "`r format(Sys.time(), '%d %B %Y')`" +abstract: "Un paragraphe présentant de façon synthétique le contenu du compte-rendu." +anac: "2022-2023" +diplome: "Master 2 Santé Publique, MPCE" +module: "MODU" +enseig: "P. NOM" +evaluation: "Compte-rendu d'analyse" +output: + bookdown::pdf_book: + template: template.tex + fig_caption: yes + keep_tex: yes + toc: yes +bibliography: biblio_cr-urca.bib +biblio-style: plain +link-citations: yes +--- +```{r include=FALSE} +knitr::opts_chunk$set(fig.pos = "!H",out.extra="") +``` +# Première partie + +```{r, echo = FALSE} +#Ce bloc configure quelques options d'affichage pour les blocs R +library('knitr') +opts_chunk$set(comment = '', echo = FALSE, tidy = TRUE, + fig.pos = 'ht!', fig.align='center', fig.width= 4.5, fig.height = 3.2) +``` + +## Avec une première sous-partie + +Le corps du document est rédigé selon la syntaxe de _Markdown_. On peut mettre des expressions en _italique_ ou en __gras__, des blocs de code en ligne (non évalués) comme celui-ci `sample(1:49, 6)`, insérer des commentaires de base de page[^commentaire], des liens hypertexte comme [celui-là](http://univ-reims.fr), des expressions mathématiques du genre exprimées selon la syntaxe de \LaTeX du genre $\cos(\theta) ^2 + \sin(\theta)^2 = 1$, voire les centrer comme ceci : +$$(a+b)^n = \sum_{k=0}^n {n \choose k} a^k b^{n-k}, \quad a,b \in \mathbb{C}, \quad n \in \mathbb{N}.$$ + +[^commentaire]: Ceci est un commentaire de bas de page. + +## Puis une seconde + +On peut également insérer des blocs de code R dont le rendu est paramétrable. Par exemple, le bloc suivant est affiché sans être évalué +```{r, echo = TRUE, eval = FALSE} +sample(1:49, 6) +``` +tandis que la sortie suivante est affichée sans que le code exécuté n'apparaisse : + + +```{r, echo = FALSE, eval = TRUE} +set.seed(7) +options(width = 60) +un_tableau <- table(sample(c("A", "B", "C"), 100, replace = TRUE), sample(1:4, 100, replace = TRUE)) +chisq.test(un_tableau) +``` + + +On peut également insérer du code R en ligne, qui sera remplacé par le résultat de son évaluation dans le document généré, par exemple, le résultat de $3 \times 4$ vaut `r 3*4`. + +# Deuxième partie + +Le template `cr-ur1` utilise le package `bookdown` apportant quelques fonctionnalités supplémentaires, dont la gestion des références croisées et des citations. La Figure \@ref(fig:dotplotex) donne un exemple de graphique accompagné de sa légende. + +(ref:capdotplotex) Un exemple de graphique produit par R, inséré et légendé grâce à _R Markdown_. S'il y a lieu, on précise la source des donnés, la cohorte et on explique comment lire le graphique. +__Cohorte :__ on peut insérer du code R dans la légende : il y a `r length(seq(0, 1, by = 0.01))` points utilisé pour tracer ce graphique. +__Lecture :__ Débrouillez-vous. + +```{r dotplotex, fig.cap = "(ref:capdotplotex)"} +plot(seq(0, 1, by = 0.01), seq(0, 1, by = 0.01)^2, type ='l') +``` + +On peut faire de même pour les tableaux, comme illustré par la Table \@ref(tab:tableex) pour laquelle on a utilisé le package `kableExtra` pour modifier le style du tableau. + +(ref:captableex) Un exemple de tableau accompagné de sa légende. + +```{r tableex, message = FALSE} +library('knitr') +library('kableExtra') +set.seed(3) +un_tableau <- table(sample(c("A", "B", "C"), 100, replace = TRUE), sample(1:4, 100, replace = TRUE)) +kable(x = un_tableau, format = 'latex', caption = "(ref:captableex)", booktabs = TRUE) %>% + kable_styling(latex_options = c('striped')) %>% + row_spec(0, bold = TRUE) +``` + +Pour citer un article, un ouvrage, une page web, etc, on remplit préalablement le fichier `biblio_cr-urca.bib` en déclarant les références dans la syntaxe de _Bibtex_ puis on insère la citation. Pour plus d'information sur le fonctionnement de _R Markodown_, on pourra consulter [@rmarkdown_refbook2018]. + +# (APPENDIX) Annexes {-} + +# Annexes + +On peut également ajouter une ou des partie(s) annexe(s) au document, permettant par exemple de détailler les procédures statistiques employées. + +# Bibliographie diff --git a/inst/rmarkdown/templates/cr-ur1/skeleton/template.tex b/inst/rmarkdown/templates/cr-ur1/skeleton/template.tex new file mode 100644 index 0000000..6c5293d --- /dev/null +++ b/inst/rmarkdown/templates/cr-ur1/skeleton/template.tex @@ -0,0 +1,406 @@ +\documentclass[$if(fontsize)$$fontsize$,$endif$$if(lang)$$babel-lang$,$endif$$if(papersize)$$papersize$paper,$endif$$for(classoption)$$classoption$$sep$,$endfor$]{$documentclass$} +$if(fontfamily)$ +\usepackage[$for(fontfamilyoptions)$$fontfamilyoptions$$sep$,$endfor$]{$fontfamily$} +$else$ +\usepackage{lmodern} +$endif$ +$if(linestretch)$ +\usepackage{setspace} +\setstretch{$linestretch$} +$endif$ +\usepackage{amssymb,amsmath} +\usepackage{ifxetex,ifluatex} +\usepackage{fixltx2e} % provides \textsubscript +\ifnum 0\ifxetex 1\fi\ifluatex 1\fi=0 % if pdftex + \usepackage[$if(fontenc)$$fontenc$$else$T1$endif$]{fontenc} + \usepackage[utf8]{inputenc} +$if(euro)$ + \usepackage{eurosym} +$endif$ +\else % if luatex or xelatex + \ifxetex + \usepackage{mathspec} + \else + \usepackage{fontspec} + \fi + \defaultfontfeatures{Ligatures=TeX,Scale=MatchLowercase} +$if(euro)$ + \newcommand{\euro}{€} +$endif$ +$if(mainfont)$ + \setmainfont[$for(mainfontoptions)$$mainfontoptions$$sep$,$endfor$]{$mainfont$} +$endif$ +$if(sansfont)$ + \setsansfont[$for(sansfontoptions)$$sansfontoptions$$sep$,$endfor$]{$sansfont$} +$endif$ +$if(monofont)$ + \setmonofont[Mapping=tex-ansi$if(monofontoptions)$,$for(monofontoptions)$$monofontoptions$$sep$,$endfor$$endif$]{$monofont$} +$endif$ +$if(mathfont)$ + \setmathfont(Digits,Latin,Greek)[$for(mathfontoptions)$$mathfontoptions$$sep$,$endfor$]{$mathfont$} +$endif$ +$if(CJKmainfont)$ + \usepackage{xeCJK} + \setCJKmainfont[$for(CJKoptions)$$CJKoptions$$sep$,$endfor$]{$CJKmainfont$} +$endif$ +\fi +% use upquote if available, for straight quotes in verbatim environments +\IfFileExists{upquote.sty}{\usepackage{upquote}}{} +% use microtype if available +\IfFileExists{microtype.sty}{% +\usepackage{microtype} +\UseMicrotypeSet[protrusion]{basicmath} % disable protrusion for tt fonts +}{} +$if(geometry)$ +\usepackage[$for(geometry)$$geometry$$sep$,$endfor$]{geometry} +$endif$ +\usepackage{hyperref} +$if(colorlinks)$ +\PassOptionsToPackage{usenames,dvipsnames}{color} % color is loaded by hyperref +$endif$ +\hypersetup{unicode=true, +$if(title-meta)$ + pdftitle={$title-meta$}, +$endif$ +$if(author-meta)$ + pdfauthor={$author-meta$}, +$endif$ +$if(keywords)$ + pdfkeywords={$for(keywords)$$keywords$$sep$; $endfor$}, +$endif$ +$if(colorlinks)$ + colorlinks=true, + linkcolor=$if(linkcolor)$$linkcolor$$else$Maroon$endif$, + citecolor=$if(citecolor)$$citecolor$$else$Blue$endif$, + urlcolor=$if(urlcolor)$$urlcolor$$else$Blue$endif$, +$else$ + pdfborder={0 0 0}, +$endif$ + breaklinks=true} +\urlstyle{same} % don't use monospace font for urls +$if(lang)$ +\ifnum 0\ifxetex 1\fi\ifluatex 1\fi=0 % if pdftex + \usepackage[shorthands=off,$for(babel-otherlangs)$$babel-otherlangs$,$endfor$main=$babel-lang$]{babel} +$if(babel-newcommands)$ + $babel-newcommands$ +$endif$ +\else + \usepackage{polyglossia} + \setmainlanguage[$polyglossia-lang.options$]{$polyglossia-lang.name$} +$for(polyglossia-otherlangs)$ + \setotherlanguage[$polyglossia-otherlangs.options$]{$polyglossia-otherlangs.name$} +$endfor$ +\fi +$endif$ +$if(natbib)$ +\usepackage$if(natbiboptions)$[$for(natbiboptions)$$natbiboptions$$sep$,$endfor$]$endif${natbib} +\bibliographystyle{$if(biblio-style)$$biblio-style$$else$plainnat$endif$} +$endif$ +$if(biblatex)$ +\usepackage$if(biblio-style)$[style=$biblio-style$]$endif${biblatex} +$if(biblatexoptions)$\ExecuteBibliographyOptions{$for(biblatexoptions)$$biblatexoptions$$sep$,$endfor$}$endif$ +$for(bibliography)$ +\addbibresource{$bibliography$} +$endfor$ +$endif$ +$if(listings)$ +\usepackage{listings} +\newcommand{\passthrough}[1]{#1} +$endif$ +% Adding environment CSLReferences for compatibility with pandoc >= 2.8 +% BEGIN +\newlength{\cslhangindent} +\setlength{\cslhangindent}{1.5em} +\newenvironment{CSLReferences}% + {\setlength{\parindent}{0pt}% + \everypar{\setlength{\hangindent}{\cslhangindent}}\ignorespaces}% + {\par} +\newenvironment{cslreferences}% + {\setlength{\parindent}{0pt}% + \everypar{\setlength{\hangindent}{\cslhangindent}}\ignorespaces}% + {\par} +% END +$if(lhs)$ +\lstnewenvironment{code}{\lstset{language=Haskell,basicstyle=\small\ttfamily}}{} +$endif$ +$if(highlighting-macros)$ +$highlighting-macros$ +$endif$ +$if(verbatim-in-note)$ +\usepackage{fancyvrb} +\VerbatimFootnotes % allows verbatim text in footnotes +$endif$ +$if(tables)$ +\usepackage{longtable,booktabs} +$endif$ +$if(graphics)$ +\usepackage{graphicx,grffile} +\makeatletter +\def\maxwidth{\ifdim\Gin@nat@width>\linewidth\linewidth\else\Gin@nat@width\fi} +\def\maxheight{\ifdim\Gin@nat@height>\textheight\textheight\else\Gin@nat@height\fi} +\makeatother +% Scale images if necessary, so that they will not overflow the page +% margins by default, and it is still possible to overwrite the defaults +% using explicit options in \includegraphics[width, height, ...]{} +\setkeys{Gin}{width=\maxwidth,height=\maxheight,keepaspectratio} +$endif$ +$if(links-as-notes)$ +% Make links footnotes instead of hotlinks: +\renewcommand{\href}[2]{#2\footnote{\url{#1}}} +$endif$ +$if(strikeout)$ +\usepackage[normalem]{ulem} +% avoid problems with \sout in headers with hyperref: +\pdfstringdefDisableCommands{\renewcommand{\sout}{}} +$endif$ +$if(indent)$ +$else$ +\IfFileExists{parskip.sty}{% +\usepackage{parskip} +}{% else +\setlength{\parindent}{0pt} +\setlength{\parskip}{6pt plus 2pt minus 1pt} +} +$endif$ +\setlength{\emergencystretch}{3em} % prevent overfull lines +\providecommand{\tightlist}{% + \setlength{\itemsep}{0pt}\setlength{\parskip}{0pt}} +$if(numbersections)$ +\setcounter{secnumdepth}{5} +$else$ +\setcounter{secnumdepth}{0} +$endif$ +$if(subparagraph)$ +$else$ +% Redefines (sub)paragraphs to behave more like sections +\ifx\paragraph\undefined\else +\let\oldparagraph\paragraph +\renewcommand{\paragraph}[1]{\oldparagraph{#1}\mbox{}} +\fi +\ifx\subparagraph\undefined\else +\let\oldsubparagraph\subparagraph +\renewcommand{\subparagraph}[1]{\oldsubparagraph{#1}\mbox{}} +\fi +$endif$ +$if(dir)$ +\ifxetex + % load bidi as late as possible as it modifies e.g. graphicx + $if(latex-dir-rtl)$ + \usepackage[RTLdocument]{bidi} + $else$ + \usepackage{bidi} + $endif$ +\fi +\ifnum 0\ifxetex 1\fi\ifluatex 1\fi=0 % if pdftex + \TeXXeTstate=1 + \newcommand{\RL}[1]{\beginR #1\endR} + \newcommand{\LR}[1]{\beginL #1\endL} + \newenvironment{RTL}{\beginR}{\endR} + \newenvironment{LTR}{\beginL}{\endL} +\fi +$endif$ + +%%% Use protect on footnotes to avoid problems with footnotes in titles +\let\rmarkdownfootnote\footnote% +\def\footnote{\protect\rmarkdownfootnote} + +$if(compact-title)$ +%%% Change title format to be more compact +\usepackage{titling} + +% Create subtitle command for use in maketitle +\providecommand{\subtitle}[1]{ + \posttitle{ + \begin{center}\large#1\end{center} + } +} + +\setlength{\droptitle}{-2em} +$endif$ + + +%Mise en page +\usepackage[left=1.5cm,right=1.5cm,top=1.5cm,bottom=2cm]{geometry} +\usepackage{lastpage} %Pour numérotaion des pages +\usepackage{eso-pic} %pour l'image de fond de la page de garde +\usepackage{enumitem} %Pour personnaliser les listes à puces +\usepackage{fancyhdr} +\usepackage{xcolor} + +%Gestion des tableaux +\usepackage{multirow} + +%Divers +\usepackage{ifthen} %Gestion des instructions conditionnelles + + +\widowpenalty=10000 +\clubpenalty=10000 + + +%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% +%% Configuration des messages de type badbox %% +%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% + +\widowpenalty=10000 +\clubpenalty=10000 + + +%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% +%% Definition environemments %% +%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% + +%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% +%% Désignation des variables de la classe %% +%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% + +$if(title)$ + \title{$title$} + $if(compact-title)$ + \pretitle{\vspace{\droptitle}\centering\huge} + \posttitle{\par} + $endif$ +$else$ + \title{} + $if(compact-title)$ + \pretitle{\vspace{\droptitle}} + \posttitle{} + $endif$ +$endif$ +$if(subtitle)$ +\subtitle{$subtitle$} +$endif$ +$if(author)$ + \author{$for(author)$$author$$sep$ \\ $endfor$} + $if(compact-title)$ + \preauthor{\centering\large\emph} + \postauthor{\par} + $endif$ +$else$ + \author{} + $if(compact-title)$ + \preauthor{}\postauthor{} + $endif$ +$endif$ +$if(date)$ + $if(compact-title)$ + \predate{\centering\large\emph} + \postdate{\par} + $endif$ + \date{$date$} +$else$ + \date{} + $if(compact-title)$ + \predate{}\postdate{} + $endif$ +$endif$ + +$for(header-includes)$ +$header-includes$ +$endfor$ + +$if(email)$ + \email{$for(email)$$email$$sep$ \\ $endfor$} +$endif$ +%\email{$if(email)$$email$$endif$} +\logouniv{$if(logouniv)$$logouniv$$else$logo_UR1.pdf$endif$} +\logoufr{$if(logoufr)$$logoufr$$else$logoUFR.pdf$endif$} +\date{$if(date)$$date$$else$\today$endif$} +\diplome{$if(diplome)$$diplome$$endif$} +\anac{$if(anac)$$anac$$endif$} +\module{$if(module)$$module$$endif$} +\enseig{$if(enseig)$$enseig$$endif$} +\evaluation{$if(evaluation)$$evaluation$$endif$} + + +%%%%%%%%%%%%%%%%%%% +%% Mise en forme %% +%%%%%%%%%%%%%%%%%%% + + +%Formatage en-têtes et pieds de pages +\pagestyle{fancy} +\fancyhead[L]{\small \thetitle} +\fancyhead[R]{} +\fancyfoot[l]{\small \theauthor} +\fancyfoot[C]{\small \it \theeval \ \themodule \ -- \theanac} +\fancyfoot[R]{\small \thepage\ / \pageref{LastPage}} +\renewcommand{\headrulewidth}{0.4pt} +\renewcommand{\footrulewidth}{0.4pt} + +\fancypagestyle{plain}{% +\fancyhf{} % clear all header and footer fields +\fancyfoot[C]{\small \thepage\ / \pageref{LastPage}} % except the center +\renewcommand{\headrulewidth}{0pt} +\renewcommand{\footrulewidth}{0pt}} + +\AtEndDocument{\thispagestyle{plain}} +% Pandoc header +$for(header-includes)$ +$header-includes$ +$endfor$ + + +\begin{document} + +\AddToShipoutPictureBG*{\includegraphics[width=\paperwidth,height=\paperheight]{$if(backgroundimage)$$backgroundimage$$else$FondUR1.png$endif$}} + + + +$if(title)$ +\maketitle +$endif$ + +\pagebreak + +$if(abstract)$ +\begin{abstract} +$abstract$ +\end{abstract} +$endif$ + + +$for(include-before)$ +$include-before$ +$endfor$ + +$if(toc)$ +{ +\hypersetup{linkcolor=black} +\setcounter{tocdepth}{$toc-depth$} +\tableofcontents +} +$endif$ + + + +$body$ + +% $if(natbib)$ +% $if(bibliography)$ +% $if(biblio-title)$ +% $if(book-class)$ +% \renewcommand\bibname{$biblio-title$} +% $else$ +% \renewcommand\refname{$biblio-title$} +% $endif$ +% $endif$ +% \bibliography{$for(bibliography)$$bibliography$$sep$,$endfor$} +% +% $endif$ +% $endif$ +% +% $if(biblatex)$ +% \printbibliography$if(biblio-title)$[title=$biblio-title$]$endif$ +% $endif$ +% +% $for(include-after)$ +% $include-after$ +% $endfor$ +% +% +% $if(lot)$\listoftables$endif$ +% +% $if(lof)$\listoffigures$endif$ + +\end{document} diff --git a/inst/rmarkdown/templates/cr-ur1/template.yaml b/inst/rmarkdown/templates/cr-ur1/template.yaml new file mode 100644 index 0000000..37fd17d --- /dev/null +++ b/inst/rmarkdown/templates/cr-ur1/template.yaml @@ -0,0 +1,4 @@ +name: cr-ur1 +description: > + R Markdown template for editing short statistical reports for UR1/ EHESP students +create_dir: TRUE diff --git a/man/hello.Rd b/man/hello.Rd new file mode 100644 index 0000000..0fa7c4b --- /dev/null +++ b/man/hello.Rd @@ -0,0 +1,12 @@ +\name{hello} +\alias{hello} +\title{Hello, World!} +\usage{ +hello() +} +\description{ +Prints 'Hello, world!'. +} +\examples{ +hello() +}