From f8aebd9e202d715d3b5defd8a4753ab25aef5129 Mon Sep 17 00:00:00 2001
From: Vedha Viyash <49812166+vedhav@users.noreply.github.com>
Date: Tue, 5 Sep 2023 12:55:41 +0530
Subject: [PATCH] Explicitly add favicon and browser tab title (#65)

Closes #64

Right now the browse titles for the apps are as follows:

1. basic-teal - Basic Teal
2. exploratory - Exploratory
3. safety - Safety
4. efficacy - Efficacy
5. patient-profile - Patient Profile
6. early-dev - Early dev
7. longitudinal - Longitudinal
8. RNA-seq - RNA seq
9. python - Python
---
 RNA-seq/app.R                   |   1 +
 RNA-seq/www/favicon.ico         | Bin 15406 -> 0 bytes
 basic-teal/app.R                |   1 +
 basic-teal/www/favicon.ico      | Bin 15406 -> 0 bytes
 early-dev/app.R                 |   1 +
 early-dev/www/favicon.ico       | Bin 15406 -> 0 bytes
 efficacy/app.R                  |   1 +
 efficacy/www/favicon.ico        | Bin 15406 -> 0 bytes
 exploratory/app.R               |   1 +
 exploratory/www/favicon.ico     | Bin 15406 -> 0 bytes
 longitudinal/app.R              |   1 +
 longitudinal/www/favicon.ico    | Bin 15406 -> 0 bytes
 patient-profile/app.R           |   1 +
 patient-profile/www/favicon.ico | Bin 15406 -> 0 bytes
 python/app.R                    |   1 +
 python/www/favicon.ico          | Bin 15406 -> 0 bytes
 safety/app.R                    |   1 +
 safety/www/favicon.ico          | Bin 15406 -> 0 bytes
 18 files changed, 9 insertions(+)
 delete mode 100644 RNA-seq/www/favicon.ico
 delete mode 100644 basic-teal/www/favicon.ico
 delete mode 100644 early-dev/www/favicon.ico
 delete mode 100644 efficacy/www/favicon.ico
 delete mode 100644 exploratory/www/favicon.ico
 delete mode 100644 longitudinal/www/favicon.ico
 delete mode 100644 patient-profile/www/favicon.ico
 delete mode 100644 python/www/favicon.ico
 delete mode 100644 safety/www/favicon.ico

diff --git a/RNA-seq/app.R b/RNA-seq/app.R
index 3d0d303a..dbccf8bb 100644
--- a/RNA-seq/app.R
+++ b/RNA-seq/app.R
@@ -69,6 +69,7 @@ app <- init(
   ),
   header = tags$span(
     style = "display: flex; align-items: center; justify-content: space-between; margin: 10px 0 10px 0;",
+    tags$head(tags$link(rel = "shortcut icon", href = "nest.png"), tags$title("RNA-Seq Analysis Teal Demo App")),
     tags$span(
       style = "font-size: 30px;",
       "Example teal app focusing on analysis of RNA-seq data with teal.modules.hermes"
diff --git a/RNA-seq/www/favicon.ico b/RNA-seq/www/favicon.ico
deleted file mode 100644
index c9351d3f8d96b38a556436f999d06617a6b5715b..0000000000000000000000000000000000000000
GIT binary patch
literal 0
HcmV?d00001

literal 15406
zcmeHOcU)A*_6Pe@njpPfKtQAyML<D8Y}mVE>?J66UrbDFiLu3Q6l*lGC&oNACiY&i
z$KJb%Chpz6Wjnv`+1<N)cUgIw-~0Xbd;9qu?%cUEbG~!t%sDf21_uX6hl&nvZVq^c
zI1H`i;E?R#;1CjGe6L^A!C?*ZVq;C;!yFt=dOA4NM;TN>4P!nYc7KkJl59$ws8nAX
z^!(wYjW3@)U0YgO>Srh=ewS3Cq$5=_HH5O&1&*7tanbxgGyU9|te{%VrsYdssg$Zo
z`qI*BRE(OD{4pd^&k;Pk9{TCWJ6#f@<ZS{gF$vWjWbq(+c1w+uAKSa<Cfeu#ax}0r
z^VG-PxOCy*=&t$fpa#_yMTt)Aqp7vEg$W+)$dqvQ!?gNrbFb=5d<{q0_}<;v+rM4e
z2Y%56gMP>N?R}QwR#ny}pfXbsnZYH;4CP|FE)rt9&E*4&cdI-OT+k%-nj`e@`k5-x
z*^^0iuO>Tl@W5STZ3l-PYm1)~&iLRUW^m7Sn*7$OEb*eeIJYXYSZ`NZd<_R#)6^(M
zqplP9`09?bT^rZk6YFnZW2_(Ddm5kUR82O&l?PuK>!cVS=cMRcznY?VST)7qm~ggD
z?i3-cdry|y-TBSh2L?GpdOKFHd`>coXxUtmkTr!*_3Ows_G_<5bI()c1$JROMy*rD
zwkqUYPn^&+s2j)_>aSb-$RKz$vVHZ67Y6)jBf4Gy6FgxIA2eYsU%y?RB0RsPBBFJ3
zMXXOvLp?(|^zDcBtDlJYx2;<7($HV@F~iS|Y3x};)-=$AX&YIa$pydcU@s=a$Bjua
z$%Oj<{km1pjP)HI4E4dA+FtSb41Ukn?^NF|TO@qDY_UM&wRhVV)q=?r`Np-J3}r}`
zJJuAx5bOWEeajzW+uK(cD_70=LRi0OzVPFQ^~#M)7YI{F4Ca2_`GcycYX=4KNOY<w
zJMhDfKS<}O4V_Nc_T>Iwuk~({BBy>NpnYmD!MP%y6=aEcQXNVU%x$VTf8yBr(o%i4
zkw5;T6@96`ibky-{r#HampOI(jj}>Jgq7NB6IqAZz3JO0TCH|4^cORheyC_bV0@#$
zXvg!fSFe^Xo;q2P>Rw%z?(HI5HT!d!T*l1C{BSjvr%J|(#(6+B4YLprV}7Y#AAR@Q
zwV$8dySD@VtVbp2C#h+AGi3kmKV)Y@Kutl8h7=Oz{fzL+l#phd(?|fj7ibx14hYsx
z@-r8tJmZU1mZa$WB&iMXstPL7>-Db>{Pd&h)WQ8~jLmc84FH+OPh@N2YKOULIIP%P
zidj-(0krK1$^+kPx2|5*3~ieWorNxfin?`TAKksH#rJcd40COBLTu$-pVk%8W_{@O
zuD@Qt(ta^!B%kbB#h|~UZJ=i(kLt38pM1nC7)FEgo1kaGR@}@@B4JKb3CW8|C}IxU
zaRbd!sZ_$Iua_#b0zHkkpXQIjE*Nd86h}^-0EXtbR;^K>?x!Fp5r<jkA_MU$7BD@5
zy%OpT!1MV@jBl6ZhH}y8434g@7}($+274jpYn$$!(MWOO)Jc-X15kHR1sgVHUx5eZ
z(lMXUKDv8HJGy%(mh4Tci=%7=Z2pQ4wFK?r`g--^2>pg0KEmqGUc#Il4}MsTlOn^t
zf=MPO*+52Qn<ft^;9fj^OuBIx_9dY#Q)3Qz2IKp8G=2*|`6o{{hWa!q&6V9=;Hw;)
z?83J4tHhix3RWL03{t1KRFtK<dNTRJ@rp6odHmO-I;b}G%vFs|uFKLls%wxL@TYmX
z$cn%GT;MrQ4IC>$K2jVs49L5(Z^t$jjh|SzTivSi<?TIrQT9pBK}?4Chg`P*5+N&W
zjga1CgEBd<Sa7?=>MKCfF$1?Kv+K^}yG1Nkc8mB*nd%lJH;;?S)}HwF7s7DBWEIUY
zkauHnUY6Ckj!AZ6M<ll5TLi9BHf!*$GH%Q*P3Y3Ss(^(Hg@7++@F63IbM*>(velkG
z(K$kRe()`Uvu5%EOBM;^b}!R@Ie3e%Nv+QC`NlD!eoW}wlLfEiW?eKPK;F$kdD#lF
zuY^0zt)lGX{JpyN5h{JXkLC$cX-V>U=StS&jB+uMS!BA=M~VH74f19h&;3kDopMY~
zc0!ct_+DL!|4DPlE&Oi{YME{9zX@-HE=63};<d^R1#!x0Sv9%gvCf9?Qj8)$@oD&G
zsz0DXEk*w4CAx^_nF>(`W4pB{{-<rH9`bGtY}pKc)+np!2KAV_3-+r?|C6ErS0;sO
zp3SJM9h2nDHg=Qhy2S>NKNWGb5Al`{N?4<gP3x=(9XgN`F&A~oC;n&4_FsQ{0P%-B
zi9#{9>Djwgq;piaam|Xd43CPkAq{INR(AB{zv<>Jtm)z<eAU{6pPpTl`!v&yo0I3x
zujw2rEb1^()1})nO})a;c)u0Pm9fFzCcp0}8)@WUV#^<P{my{gre^+8jpF4Y)8+};
z0ZW7opNV{mYot7(MrCvV2xF2{1z8Jk7p6x<4m+apJ$;|(^{Tw!xk9R2lH94JL_?FR
zZvVc9b)lhOkk5ym^2sh<u;q`uJN<Jq&GM)6;XOOE{>zsL4V(64GkiyJnaNv~nT@_z
zX8X_Qv-}qj30Z!#giN0zzGdh>b#mPtMcsbAQD>>(yYg$L`w!byu~_RHc%wZU+Yuew
z68}rK{L%lrA2iP}_g}0N=jAG^J#+vUuy}z`?b$P3RZ!3;llb7tlel2`o4~nW@&OCy
z3jvE43PIC8<|DJ3C}@s|<1Mx$K8Iu73SV}`mOn7r<!`759i(Simv(Hu9v#`ZAWtSX
z)R&11tR;&lUuc?NA`j_PIv*&1Si4;6|8GYAm<6VZ08ID#Wv83`j76uZ4z=;N{up^%
z=C`z*G;P2H`44TIqkyTpVPtEWg^>S!;xENc>Ff}1rgKuXA-`inq&y3{+$SSNKD1SH
z#ZavObL#~$MP1voqdK=`Q)*T-$f<wx3`Mf5QCDp-3~7@?{l95P{`U*Anpo){@t;`G
zgWdQ2c2yQ+{`!yKbz^#TQCz=#QS<8$J5<|>S12d-@563gxm<bn*kScIi{}ee=he%X
z+Uy`NyW>JO4*kDv7Q6`v`v1VdAN8d&ApXCA*T1%IQ891cfPZJj^-C8un^%0ToLN-J
z8GP)(0`|_etJ<YAKEobP%HPzM*)BQC`nSkbz}Mb|3@pM22JnAakd<bZzbLnfeS5IX
zo4<7XFqe+(`IpMTAN^lCZ3;iSTSv&f9sB6sT`lQVBKd}Dj)wkc8TxPJFSbS4`Za4J
zhpyeX<&XD=3qPC8C%IVr7g~c{yLds9=~q*>d+TP^$j<qSl9R{P_wU@%+`RUirWgFq
zqx<)?x3AyOd@+6uclXvUjSO<SfBUwEFiB<E$i0Sa?ff|c@v_4|AM35##Ebl(xKB3h
zw_xX}9olcvJM}ZkrLrv1)rghWqm64h8@>^K`bI=$sa^u=kMGl+eSH5ut%J^j(rxvR
z-jV+g&;;!J-u$}rdsQ3wASwR0rVZn3nS;`Dz0#BA=Z+s$V|<_L^`-sLenoq{rFqy-
z_@LZMS}(1cHyiff&8U+SJ(BXUm(InSU?<kW8jXhh-3*Y6Xltar%1fh89O%FwFP>{Z
z8$O7$)(vYLC1PmgQA4(9>c_mCk&&!7gF?&WA^m2%CZliA)e2~%6X?!w7tU)2wrpzF
z4Us4Ll?1GHC1ZRB<uS&lDP}d(q#WNZP1VsJ>BdCTjeW2OZKCQzH;gi%IZ$%^80`a}
zq703(WgjSI@xE~E;6~fNpkh%se)wjc^%#qNHuJU9i22*QCd#$}3<<EK2l14QaoKY3
z%HjWOIXWl75v@Z%kfTEg{+9pyk4V_m2*$1=C>S&aG!jI*WwTHHk8mu%Q}6o~kbslU
ze@1}LC{-$rR-;iNeF#(la(&+>|8L7%WC(0@wvY!p37^2-gTMUe2YuKXqegJgpFGjR
z2f{y>{sL+YvKb4Yv@}%)ayg&Ml%<UKDGw}FKw+S-aaPH_{{45|rWMPD+`2&~AL%H|
zj|rFW-u#{F&7ZIJde}*n{Tvhws{HP}$|-5{$>!B=A1M?3L$Kx|9ls-I7~QV#HYf+=
zG{btycuryTBSu?JYl*^6ZCN@OhK<#s&Slgcji>Kh8N9~_BW4@q(pO0ue5-+Pf6#U4
zig5Al8O@M3xoi_}S3}G~^nb?noy8y1J~-3gof+G+D|`3m4GsJfk2Xp`?Ln2_1Mc4{
z3LfMulR-a1SJY1)+}AC@UM<bj#cFLW;<x)Wt#vX3JebvUXA3W%K85SmDbeP7P&BB@
z-vU=oCA3NQFdno3@_vCBmv+PAh01QJ@p4+{+r^3X<-g0PwJ7!$iXCfLEB}1;N(;Yv
zA3SJH76HN>mkjz_@s(c&?bHDM6FPGbGS?p7yGPx(X=6nr#H6J73KN_aI|_V-VX@V%
z*5=YO_R^$dh_f(5TDMS?oH|MCSvp6%4jKX~cPz?7j=IjE)}Zrhl}dl}@+B?VLvd~<
zIXTL*JS#H!K~>}<;%cz`S7G|nr4gmfyfFQ=EH`#siVHgkXR=-ERF${(t1Qo|Rgp<?
zk?xl*^Fr)bGGcmPj2Xo}ymK3F1JlE}j>*Kc`dh_MAJ7r8FDOfKfGp5@omThfgWI>Y
zOQ(Ozx5c{9utx#zUSZYb%kn+>t$loj?|S+On|t{PszvqnrAs18`32$ng>5{zxp^Ku
z${5a)*5gcRLw9ds70z|1Hgn^sPf5;Y@zYo&Vo%dKF<QQM-W-Aa2Ilw+U|9xA0oh-F
znmUK?-q4eUc)k#LLAQ0)3ZX+xgq-wLl+mQduH5mFLF!M^UAZ>?mE|~JW*WIV%I3Co
z=S#+hs6TJ+&e7N;IyuWy-6G{py>b+-0t?u7nIrffgGUMTdW=%<8#Yk4rB8F!2a$dX
zI;#@fmOd%IO7m+E_SYDH+A}-?O~asA$8;nEgYP>@S1zA94SSelW5*pJ_p0*C6GJs!
zYF9Pyr{k+5URT3~Np`6#Z|vSi(bRVupA))E)iUC|CO77SCOhU=bxQwpYNwZ4eFa$k
z;GKWyn#KR1Y88G^-8Jg8repYzs#ZZ``9^Mt1=O&fQ`8^w8{>L+SKPjOMbxSJ2FRkq
zSmQr%?ZO2O>55bqVw%Q(US2IO$=Q!dbn*t~P$t7`2$vPOTxgo~qcXYsQB~Bq1FAZ+
zb}57BuTustT88tlMS|PWBWg#Tu9O^JW!W2@FV05-XV2m5jGM~m44NW*HE51zZrk<R
z)*-WmBxmC}yU0^~c1ezrKYRR$#$lBR*|rP#c7XOf&Bb#~8ymQ&tp~rTT@z)iIwhJm
zb$`>eY<ON1UwA?7zx$5X<M<Vg|B7Ov&WNF0L|$`66!<lWtSgTW4`FH#8^~3Xz0u<^
zq}1)mVRb}Csv<HoO<r$6Kh}TQQX%fr3GK{dTS~tuSgy$p-mXe;D(g@3>IF0RZr&vP
zYef9!r>P_Oc98IA+rtmP(;D&qJ;TTAIyKalwvW)1hHbd2@he^-MCLY=$JI2(MMQa7
zJ+YpMfPJiubD@~}p=HK4&d);@I(8J7RB}v{HvXn2)vu+M4W@aWhx4>M*RPRLT4%8~
z)C0>X0RN$q6NKNZ3=i6qrue7Hb7x%C^&fXZKOpHVReaqrCeaj=5%C(=4DekhKP%?j
zeVWU_7U4`~bf<<~-#usbVMSB<Si||J#Rs-TT>sY9%M|z8V34~7w%LB-+u?I>!5<gk
z%LHsbp$T5FT<F!TK6`9b9rfnkKFXtof$AX*?fWcqUu^Wy+!r%`V}HNQiRM4Zzo83U
zv0WK$iZ_X6TjKpD&i5eyjZ&E#`eOP6{723mJ8F`@#XiSD79mro^YvzJQO47H0eqXm
zADtf`tkJ{fA4lA*t$!7HlbRLaBP=pA;wRZ!@<cr1lggyJR+M!QYoI7>yjz<VTF3<~
zTp-Zg5zEk%&V8<5yh!r@PKsHYCj4iQ9Vw$f(a^oxYfq>%;?^p~vkhvK<i54HuX1Gv
zFJWU3Z-M+2-9;%%bY?rl#!?@X;its&HmXDYON6daUps|Xk&j9C<;FJ|q#T&=jXJ}-
zFB{!3LhirvYazyF4ibJk0|ds+Qp|?5W&R#Hd-QM_`8UA+BY4?XWp2as>c;NvFt?0j
zLs%$=O8zR-qaxD*c*dqUv&9{~g#AMUR2RpGsLzcJRv-K@Q1w%PKjqGTzRJCW{8T4K
z1*tDjsIS>KY^ZK>_7Pp{=0B^0ww+f8E?p-0Y~G}-J!AkEZ?%VTkWu{dH`sRQ&$cr7
zO&RFh(KE1b**Mb{F_O$;LVXzj)hmVAM!ngVp$FBOK9f0$`y@JfAO=Og*`#X{J)yoe
za;<<nN>!QO^=m3dCMR*9<{Z_HOW&Xw6gNZJHEO@6W$;E-s#~huckNmw`352%oEsTq
z7uGtLQ^$|Fa{fHYe@8j`f9%YWLni!^`jADvUR_w<O&gR^Z420pz_C2Vud@A@B2M%<
zpXoiCPxtK0Hu3DtHt}e$Xi}>qn_jCYn-1UB)aN5U%Wt-j8?sB)Awpl;F6@Oa(|Z)+
zUQzNmKQCE0?mM_#y{aYuRzagFtv9frC9Vb8k^G2qYWp%*O3o4fo#n{?`02xk)D%+?
z>xs`e#4Qj*l6&L)*XP@Bl?`$`D3WVM$s2iQE8_ZWQYL<IK-DyO7O>9boB2)WGkreh
zGQ5VfX&&uaio2z_M#!7_P8ZSxhO^O)(&RzYKI7dF9#H$PTdNH3-kA+TY`yk~!E7AP
zNkyL0XA9uJeC{ma-&HRDBL~aM-y{RF738PFdUazxcK@VuKXg#-_0uj@1(wxUVr2S|
zaih4Xq!@WrVnaDSBeDL9KwKoeS9dma(ge<L&1%8@@Ikfv{$ErfA5Gw+W5SvEx2)f!
z*eTrtaj{Eh&(PlBU*+IGaSE91$=}kR$sS@&8jU+rp@l=aYEK?(t37|F^Tm2KaPBN2
zaQ<vQaNcY_05QP8=~MXN@uT_L{rhkcIZYKYSWm=@>siTsv9xc|8EIY%%)v`%P80sU
z*7z-s411rGrw$$XH~6jFk8`OaYY-nHZxA0Tr?HQ#SydK?y;&T^%y1Xb=r8C#k99pM
zHhXEa?=aOP{1;Cf@b44xTaX)bfdACH;(uQ}QjCA6ZgT_vQzZZWB7WN^zMVRWIYoC!
zrTpxrZRKOHO!;{>e)(;>WXf+I;>+OP58*#xi(7ohx6^d5C@b*o_|rU{WgiXb%VKY2
z@DX(1?~@_@*}kw%ZKCQhGYW@sv&R=1X+ja#IVDa$8un!^V&QA%&lLt@Z7s%Yx?+tz
zv*<%Eo$i~KqhBPe=7{&2@E<D2{-3enH~CmYyC(mHbgOV$$6nWbIcYqX=v+ZYcP&{~
zp)bZ<Mch)sV4aV+lJ3#HJKBe!X(K;m$tT{ueog!M-d*iquV3rL`v9{>7jkqKXN<X&
zKR;+sQgY%rVlkyhMR^;amRSJ#pE+^hS9P;;<libh*o+_hG&%Vc%$w5Uxw8!TWxzkJ
za0J&9c7|f$xZ}jM!kRxT#D}4AQ^*+o6j~oZ7FPIe^v8CN(3+msX25vd8o%WY-_D-c
z|91S;rigzY?n&(YcAfI+qeohS=dI*_4`+jrm1YyxVH6|9d6E1e{Ke~+FLjR*)1|#2
ztvRgl8^-zVV?Z{Y)&{_M5@Zm%Me@czApe}L{B7kx`0w7huDN>Yg67rlFLg_1PUA^m
zr22!qxvFhziiLTTCvv2>CC86yUcG#wTaUXU`Ee2Ed&RS`AH&^qU7JYbe%qFpbWYHm
zB-;p#r$zi0$y@Ln^}p=;L2OIJkGqSdi>7|U_knDGhwl>ghxC8zs+Gd@4~KG7hY#lR
z8`hWKymDD{WZz!(#DZSzMBFRufcx$<aSv%P&PMRlFG0+ILhtTunt0#YW-O>*q(5h{
zwjmjpgTLg>n?H4nr+vy%++4&gedg8)WX|9`f$RyzbUWd!iSAu2`1E6Lc>6rXz1z1m
zPai+jK6>y#`v7+p^TI=!FUJ+}FP=WpzJB$Gj_OY6*Oz_#@S*k@&ZmCIos1{Y!DGMt
ztfDoV$V)mFEx;4wsbuAHOkWHBvihU%j_;Q-A63_|R~v;pW$8XR6PL;Zdygcn<w&m$
z`FN+ZCc_;9<k1;ma?O8$s>za&Htxr8SJB%|mJJ`2g8PqDS1d#23}tD*i?)ny(mu!0
zU^Ay<oNz`>=MEHaKLpCK)f@30F>SibTL&~5bc6Zpjdstr&8lJfd4{{)R{fCn>2IZ_
z_E|b_u@~}pmwkl$VW;3r1%apd*$L2KoDF)5Sj&5&Y-Lb5Xfeiu`xE1i|5;GxhEYri
zd|~UP<NI&>Wn&x7<;&zd%DOd9lpoo<TZQ|oq${sL6F>o=GBGow{z(6#R}!T{9Xj`K
z3OWLkzkL2&J00;jTFaXCM=JX=c%*VQrR|iV^VPPvQ?d$Yws3}s^_9K`KZ>7+l_zI2
zRCB_9X|z)lG!S$g_Cia0oXG<VxHLO{|NX|rQI>;qop~Qk<ZoQLq(OLr2aoST?Lhx9
zppjxj+UC_hU^}^JkH&)H(4(MJ&lIo)<SS_1V|Og1<6=%5b&vEX8EfltxcftPLa7vt
z@x0Q~j%c4`C534R&D*kUI%uaDwGE>94vp`hxI3mTo-<2mga3UYyJXgFGiGZYO2vKp
zZny)wXZtpUx0SRXq`M_wf=qL>EcAEDu>-Z-EbyZ^M_bSitxm_?zJ66ZAOCYh`XKhf
zN|#^{JLA4Q{htluXC!Z$n-rHwrn@{A#VCu`48-P>^i`TRmM@!QZpV}WZyF04ZyNXC
zl!BlmUpo$W>&Oon`{9WHQF50pm@=7vj`MH)&ko7_XJBrGXAL8la(Ml{Pqt7E@8vW_
zM>o_DiXA?tc*$PeneWvkNlw1wBKEC_k&+$12HQe*pqgC<WirchESn>(RQ^|UNxQ`y
zsSlMvh*Rm8VUEA}<HZZDLard+c>~6L3i8P}+O2JF+mv{xLXt|x^3qz;w4|U_vTQB-
h42;!58K7T4D?pK;^5g68&dv(Ke_#G9f&YyJ{s)l+qZ9xD

diff --git a/basic-teal/app.R b/basic-teal/app.R
index 0404ebf2..27b212e5 100644
--- a/basic-teal/app.R
+++ b/basic-teal/app.R
@@ -8,6 +8,7 @@ app <- init(
   modules = modules(example_module()),
   header = tags$span(
     style = "display: flex; align-items: center; justify-content: space-between; margin: 10px 0 10px 0;",
+    tags$head(tags$link(rel = "shortcut icon", href = "nest.png"), tags$title("Basic Teal Demo App")),
     tags$span(
       style = "font-size: 30px;",
       "My first teal app"
diff --git a/basic-teal/www/favicon.ico b/basic-teal/www/favicon.ico
deleted file mode 100644
index c9351d3f8d96b38a556436f999d06617a6b5715b..0000000000000000000000000000000000000000
GIT binary patch
literal 0
HcmV?d00001

literal 15406
zcmeHOcU)A*_6Pe@njpPfKtQAyML<D8Y}mVE>?J66UrbDFiLu3Q6l*lGC&oNACiY&i
z$KJb%Chpz6Wjnv`+1<N)cUgIw-~0Xbd;9qu?%cUEbG~!t%sDf21_uX6hl&nvZVq^c
zI1H`i;E?R#;1CjGe6L^A!C?*ZVq;C;!yFt=dOA4NM;TN>4P!nYc7KkJl59$ws8nAX
z^!(wYjW3@)U0YgO>Srh=ewS3Cq$5=_HH5O&1&*7tanbxgGyU9|te{%VrsYdssg$Zo
z`qI*BRE(OD{4pd^&k;Pk9{TCWJ6#f@<ZS{gF$vWjWbq(+c1w+uAKSa<Cfeu#ax}0r
z^VG-PxOCy*=&t$fpa#_yMTt)Aqp7vEg$W+)$dqvQ!?gNrbFb=5d<{q0_}<;v+rM4e
z2Y%56gMP>N?R}QwR#ny}pfXbsnZYH;4CP|FE)rt9&E*4&cdI-OT+k%-nj`e@`k5-x
z*^^0iuO>Tl@W5STZ3l-PYm1)~&iLRUW^m7Sn*7$OEb*eeIJYXYSZ`NZd<_R#)6^(M
zqplP9`09?bT^rZk6YFnZW2_(Ddm5kUR82O&l?PuK>!cVS=cMRcznY?VST)7qm~ggD
z?i3-cdry|y-TBSh2L?GpdOKFHd`>coXxUtmkTr!*_3Ows_G_<5bI()c1$JROMy*rD
zwkqUYPn^&+s2j)_>aSb-$RKz$vVHZ67Y6)jBf4Gy6FgxIA2eYsU%y?RB0RsPBBFJ3
zMXXOvLp?(|^zDcBtDlJYx2;<7($HV@F~iS|Y3x};)-=$AX&YIa$pydcU@s=a$Bjua
z$%Oj<{km1pjP)HI4E4dA+FtSb41Ukn?^NF|TO@qDY_UM&wRhVV)q=?r`Np-J3}r}`
zJJuAx5bOWEeajzW+uK(cD_70=LRi0OzVPFQ^~#M)7YI{F4Ca2_`GcycYX=4KNOY<w
zJMhDfKS<}O4V_Nc_T>Iwuk~({BBy>NpnYmD!MP%y6=aEcQXNVU%x$VTf8yBr(o%i4
zkw5;T6@96`ibky-{r#HampOI(jj}>Jgq7NB6IqAZz3JO0TCH|4^cORheyC_bV0@#$
zXvg!fSFe^Xo;q2P>Rw%z?(HI5HT!d!T*l1C{BSjvr%J|(#(6+B4YLprV}7Y#AAR@Q
zwV$8dySD@VtVbp2C#h+AGi3kmKV)Y@Kutl8h7=Oz{fzL+l#phd(?|fj7ibx14hYsx
z@-r8tJmZU1mZa$WB&iMXstPL7>-Db>{Pd&h)WQ8~jLmc84FH+OPh@N2YKOULIIP%P
zidj-(0krK1$^+kPx2|5*3~ieWorNxfin?`TAKksH#rJcd40COBLTu$-pVk%8W_{@O
zuD@Qt(ta^!B%kbB#h|~UZJ=i(kLt38pM1nC7)FEgo1kaGR@}@@B4JKb3CW8|C}IxU
zaRbd!sZ_$Iua_#b0zHkkpXQIjE*Nd86h}^-0EXtbR;^K>?x!Fp5r<jkA_MU$7BD@5
zy%OpT!1MV@jBl6ZhH}y8434g@7}($+274jpYn$$!(MWOO)Jc-X15kHR1sgVHUx5eZ
z(lMXUKDv8HJGy%(mh4Tci=%7=Z2pQ4wFK?r`g--^2>pg0KEmqGUc#Il4}MsTlOn^t
zf=MPO*+52Qn<ft^;9fj^OuBIx_9dY#Q)3Qz2IKp8G=2*|`6o{{hWa!q&6V9=;Hw;)
z?83J4tHhix3RWL03{t1KRFtK<dNTRJ@rp6odHmO-I;b}G%vFs|uFKLls%wxL@TYmX
z$cn%GT;MrQ4IC>$K2jVs49L5(Z^t$jjh|SzTivSi<?TIrQT9pBK}?4Chg`P*5+N&W
zjga1CgEBd<Sa7?=>MKCfF$1?Kv+K^}yG1Nkc8mB*nd%lJH;;?S)}HwF7s7DBWEIUY
zkauHnUY6Ckj!AZ6M<ll5TLi9BHf!*$GH%Q*P3Y3Ss(^(Hg@7++@F63IbM*>(velkG
z(K$kRe()`Uvu5%EOBM;^b}!R@Ie3e%Nv+QC`NlD!eoW}wlLfEiW?eKPK;F$kdD#lF
zuY^0zt)lGX{JpyN5h{JXkLC$cX-V>U=StS&jB+uMS!BA=M~VH74f19h&;3kDopMY~
zc0!ct_+DL!|4DPlE&Oi{YME{9zX@-HE=63};<d^R1#!x0Sv9%gvCf9?Qj8)$@oD&G
zsz0DXEk*w4CAx^_nF>(`W4pB{{-<rH9`bGtY}pKc)+np!2KAV_3-+r?|C6ErS0;sO
zp3SJM9h2nDHg=Qhy2S>NKNWGb5Al`{N?4<gP3x=(9XgN`F&A~oC;n&4_FsQ{0P%-B
zi9#{9>Djwgq;piaam|Xd43CPkAq{INR(AB{zv<>Jtm)z<eAU{6pPpTl`!v&yo0I3x
zujw2rEb1^()1})nO})a;c)u0Pm9fFzCcp0}8)@WUV#^<P{my{gre^+8jpF4Y)8+};
z0ZW7opNV{mYot7(MrCvV2xF2{1z8Jk7p6x<4m+apJ$;|(^{Tw!xk9R2lH94JL_?FR
zZvVc9b)lhOkk5ym^2sh<u;q`uJN<Jq&GM)6;XOOE{>zsL4V(64GkiyJnaNv~nT@_z
zX8X_Qv-}qj30Z!#giN0zzGdh>b#mPtMcsbAQD>>(yYg$L`w!byu~_RHc%wZU+Yuew
z68}rK{L%lrA2iP}_g}0N=jAG^J#+vUuy}z`?b$P3RZ!3;llb7tlel2`o4~nW@&OCy
z3jvE43PIC8<|DJ3C}@s|<1Mx$K8Iu73SV}`mOn7r<!`759i(Simv(Hu9v#`ZAWtSX
z)R&11tR;&lUuc?NA`j_PIv*&1Si4;6|8GYAm<6VZ08ID#Wv83`j76uZ4z=;N{up^%
z=C`z*G;P2H`44TIqkyTpVPtEWg^>S!;xENc>Ff}1rgKuXA-`inq&y3{+$SSNKD1SH
z#ZavObL#~$MP1voqdK=`Q)*T-$f<wx3`Mf5QCDp-3~7@?{l95P{`U*Anpo){@t;`G
zgWdQ2c2yQ+{`!yKbz^#TQCz=#QS<8$J5<|>S12d-@563gxm<bn*kScIi{}ee=he%X
z+Uy`NyW>JO4*kDv7Q6`v`v1VdAN8d&ApXCA*T1%IQ891cfPZJj^-C8un^%0ToLN-J
z8GP)(0`|_etJ<YAKEobP%HPzM*)BQC`nSkbz}Mb|3@pM22JnAakd<bZzbLnfeS5IX
zo4<7XFqe+(`IpMTAN^lCZ3;iSTSv&f9sB6sT`lQVBKd}Dj)wkc8TxPJFSbS4`Za4J
zhpyeX<&XD=3qPC8C%IVr7g~c{yLds9=~q*>d+TP^$j<qSl9R{P_wU@%+`RUirWgFq
zqx<)?x3AyOd@+6uclXvUjSO<SfBUwEFiB<E$i0Sa?ff|c@v_4|AM35##Ebl(xKB3h
zw_xX}9olcvJM}ZkrLrv1)rghWqm64h8@>^K`bI=$sa^u=kMGl+eSH5ut%J^j(rxvR
z-jV+g&;;!J-u$}rdsQ3wASwR0rVZn3nS;`Dz0#BA=Z+s$V|<_L^`-sLenoq{rFqy-
z_@LZMS}(1cHyiff&8U+SJ(BXUm(InSU?<kW8jXhh-3*Y6Xltar%1fh89O%FwFP>{Z
z8$O7$)(vYLC1PmgQA4(9>c_mCk&&!7gF?&WA^m2%CZliA)e2~%6X?!w7tU)2wrpzF
z4Us4Ll?1GHC1ZRB<uS&lDP}d(q#WNZP1VsJ>BdCTjeW2OZKCQzH;gi%IZ$%^80`a}
zq703(WgjSI@xE~E;6~fNpkh%se)wjc^%#qNHuJU9i22*QCd#$}3<<EK2l14QaoKY3
z%HjWOIXWl75v@Z%kfTEg{+9pyk4V_m2*$1=C>S&aG!jI*WwTHHk8mu%Q}6o~kbslU
ze@1}LC{-$rR-;iNeF#(la(&+>|8L7%WC(0@wvY!p37^2-gTMUe2YuKXqegJgpFGjR
z2f{y>{sL+YvKb4Yv@}%)ayg&Ml%<UKDGw}FKw+S-aaPH_{{45|rWMPD+`2&~AL%H|
zj|rFW-u#{F&7ZIJde}*n{Tvhws{HP}$|-5{$>!B=A1M?3L$Kx|9ls-I7~QV#HYf+=
zG{btycuryTBSu?JYl*^6ZCN@OhK<#s&Slgcji>Kh8N9~_BW4@q(pO0ue5-+Pf6#U4
zig5Al8O@M3xoi_}S3}G~^nb?noy8y1J~-3gof+G+D|`3m4GsJfk2Xp`?Ln2_1Mc4{
z3LfMulR-a1SJY1)+}AC@UM<bj#cFLW;<x)Wt#vX3JebvUXA3W%K85SmDbeP7P&BB@
z-vU=oCA3NQFdno3@_vCBmv+PAh01QJ@p4+{+r^3X<-g0PwJ7!$iXCfLEB}1;N(;Yv
zA3SJH76HN>mkjz_@s(c&?bHDM6FPGbGS?p7yGPx(X=6nr#H6J73KN_aI|_V-VX@V%
z*5=YO_R^$dh_f(5TDMS?oH|MCSvp6%4jKX~cPz?7j=IjE)}Zrhl}dl}@+B?VLvd~<
zIXTL*JS#H!K~>}<;%cz`S7G|nr4gmfyfFQ=EH`#siVHgkXR=-ERF${(t1Qo|Rgp<?
zk?xl*^Fr)bGGcmPj2Xo}ymK3F1JlE}j>*Kc`dh_MAJ7r8FDOfKfGp5@omThfgWI>Y
zOQ(Ozx5c{9utx#zUSZYb%kn+>t$loj?|S+On|t{PszvqnrAs18`32$ng>5{zxp^Ku
z${5a)*5gcRLw9ds70z|1Hgn^sPf5;Y@zYo&Vo%dKF<QQM-W-Aa2Ilw+U|9xA0oh-F
znmUK?-q4eUc)k#LLAQ0)3ZX+xgq-wLl+mQduH5mFLF!M^UAZ>?mE|~JW*WIV%I3Co
z=S#+hs6TJ+&e7N;IyuWy-6G{py>b+-0t?u7nIrffgGUMTdW=%<8#Yk4rB8F!2a$dX
zI;#@fmOd%IO7m+E_SYDH+A}-?O~asA$8;nEgYP>@S1zA94SSelW5*pJ_p0*C6GJs!
zYF9Pyr{k+5URT3~Np`6#Z|vSi(bRVupA))E)iUC|CO77SCOhU=bxQwpYNwZ4eFa$k
z;GKWyn#KR1Y88G^-8Jg8repYzs#ZZ``9^Mt1=O&fQ`8^w8{>L+SKPjOMbxSJ2FRkq
zSmQr%?ZO2O>55bqVw%Q(US2IO$=Q!dbn*t~P$t7`2$vPOTxgo~qcXYsQB~Bq1FAZ+
zb}57BuTustT88tlMS|PWBWg#Tu9O^JW!W2@FV05-XV2m5jGM~m44NW*HE51zZrk<R
z)*-WmBxmC}yU0^~c1ezrKYRR$#$lBR*|rP#c7XOf&Bb#~8ymQ&tp~rTT@z)iIwhJm
zb$`>eY<ON1UwA?7zx$5X<M<Vg|B7Ov&WNF0L|$`66!<lWtSgTW4`FH#8^~3Xz0u<^
zq}1)mVRb}Csv<HoO<r$6Kh}TQQX%fr3GK{dTS~tuSgy$p-mXe;D(g@3>IF0RZr&vP
zYef9!r>P_Oc98IA+rtmP(;D&qJ;TTAIyKalwvW)1hHbd2@he^-MCLY=$JI2(MMQa7
zJ+YpMfPJiubD@~}p=HK4&d);@I(8J7RB}v{HvXn2)vu+M4W@aWhx4>M*RPRLT4%8~
z)C0>X0RN$q6NKNZ3=i6qrue7Hb7x%C^&fXZKOpHVReaqrCeaj=5%C(=4DekhKP%?j
zeVWU_7U4`~bf<<~-#usbVMSB<Si||J#Rs-TT>sY9%M|z8V34~7w%LB-+u?I>!5<gk
z%LHsbp$T5FT<F!TK6`9b9rfnkKFXtof$AX*?fWcqUu^Wy+!r%`V}HNQiRM4Zzo83U
zv0WK$iZ_X6TjKpD&i5eyjZ&E#`eOP6{723mJ8F`@#XiSD79mro^YvzJQO47H0eqXm
zADtf`tkJ{fA4lA*t$!7HlbRLaBP=pA;wRZ!@<cr1lggyJR+M!QYoI7>yjz<VTF3<~
zTp-Zg5zEk%&V8<5yh!r@PKsHYCj4iQ9Vw$f(a^oxYfq>%;?^p~vkhvK<i54HuX1Gv
zFJWU3Z-M+2-9;%%bY?rl#!?@X;its&HmXDYON6daUps|Xk&j9C<;FJ|q#T&=jXJ}-
zFB{!3LhirvYazyF4ibJk0|ds+Qp|?5W&R#Hd-QM_`8UA+BY4?XWp2as>c;NvFt?0j
zLs%$=O8zR-qaxD*c*dqUv&9{~g#AMUR2RpGsLzcJRv-K@Q1w%PKjqGTzRJCW{8T4K
z1*tDjsIS>KY^ZK>_7Pp{=0B^0ww+f8E?p-0Y~G}-J!AkEZ?%VTkWu{dH`sRQ&$cr7
zO&RFh(KE1b**Mb{F_O$;LVXzj)hmVAM!ngVp$FBOK9f0$`y@JfAO=Og*`#X{J)yoe
za;<<nN>!QO^=m3dCMR*9<{Z_HOW&Xw6gNZJHEO@6W$;E-s#~huckNmw`352%oEsTq
z7uGtLQ^$|Fa{fHYe@8j`f9%YWLni!^`jADvUR_w<O&gR^Z420pz_C2Vud@A@B2M%<
zpXoiCPxtK0Hu3DtHt}e$Xi}>qn_jCYn-1UB)aN5U%Wt-j8?sB)Awpl;F6@Oa(|Z)+
zUQzNmKQCE0?mM_#y{aYuRzagFtv9frC9Vb8k^G2qYWp%*O3o4fo#n{?`02xk)D%+?
z>xs`e#4Qj*l6&L)*XP@Bl?`$`D3WVM$s2iQE8_ZWQYL<IK-DyO7O>9boB2)WGkreh
zGQ5VfX&&uaio2z_M#!7_P8ZSxhO^O)(&RzYKI7dF9#H$PTdNH3-kA+TY`yk~!E7AP
zNkyL0XA9uJeC{ma-&HRDBL~aM-y{RF738PFdUazxcK@VuKXg#-_0uj@1(wxUVr2S|
zaih4Xq!@WrVnaDSBeDL9KwKoeS9dma(ge<L&1%8@@Ikfv{$ErfA5Gw+W5SvEx2)f!
z*eTrtaj{Eh&(PlBU*+IGaSE91$=}kR$sS@&8jU+rp@l=aYEK?(t37|F^Tm2KaPBN2
zaQ<vQaNcY_05QP8=~MXN@uT_L{rhkcIZYKYSWm=@>siTsv9xc|8EIY%%)v`%P80sU
z*7z-s411rGrw$$XH~6jFk8`OaYY-nHZxA0Tr?HQ#SydK?y;&T^%y1Xb=r8C#k99pM
zHhXEa?=aOP{1;Cf@b44xTaX)bfdACH;(uQ}QjCA6ZgT_vQzZZWB7WN^zMVRWIYoC!
zrTpxrZRKOHO!;{>e)(;>WXf+I;>+OP58*#xi(7ohx6^d5C@b*o_|rU{WgiXb%VKY2
z@DX(1?~@_@*}kw%ZKCQhGYW@sv&R=1X+ja#IVDa$8un!^V&QA%&lLt@Z7s%Yx?+tz
zv*<%Eo$i~KqhBPe=7{&2@E<D2{-3enH~CmYyC(mHbgOV$$6nWbIcYqX=v+ZYcP&{~
zp)bZ<Mch)sV4aV+lJ3#HJKBe!X(K;m$tT{ueog!M-d*iquV3rL`v9{>7jkqKXN<X&
zKR;+sQgY%rVlkyhMR^;amRSJ#pE+^hS9P;;<libh*o+_hG&%Vc%$w5Uxw8!TWxzkJ
za0J&9c7|f$xZ}jM!kRxT#D}4AQ^*+o6j~oZ7FPIe^v8CN(3+msX25vd8o%WY-_D-c
z|91S;rigzY?n&(YcAfI+qeohS=dI*_4`+jrm1YyxVH6|9d6E1e{Ke~+FLjR*)1|#2
ztvRgl8^-zVV?Z{Y)&{_M5@Zm%Me@czApe}L{B7kx`0w7huDN>Yg67rlFLg_1PUA^m
zr22!qxvFhziiLTTCvv2>CC86yUcG#wTaUXU`Ee2Ed&RS`AH&^qU7JYbe%qFpbWYHm
zB-;p#r$zi0$y@Ln^}p=;L2OIJkGqSdi>7|U_knDGhwl>ghxC8zs+Gd@4~KG7hY#lR
z8`hWKymDD{WZz!(#DZSzMBFRufcx$<aSv%P&PMRlFG0+ILhtTunt0#YW-O>*q(5h{
zwjmjpgTLg>n?H4nr+vy%++4&gedg8)WX|9`f$RyzbUWd!iSAu2`1E6Lc>6rXz1z1m
zPai+jK6>y#`v7+p^TI=!FUJ+}FP=WpzJB$Gj_OY6*Oz_#@S*k@&ZmCIos1{Y!DGMt
ztfDoV$V)mFEx;4wsbuAHOkWHBvihU%j_;Q-A63_|R~v;pW$8XR6PL;Zdygcn<w&m$
z`FN+ZCc_;9<k1;ma?O8$s>za&Htxr8SJB%|mJJ`2g8PqDS1d#23}tD*i?)ny(mu!0
zU^Ay<oNz`>=MEHaKLpCK)f@30F>SibTL&~5bc6Zpjdstr&8lJfd4{{)R{fCn>2IZ_
z_E|b_u@~}pmwkl$VW;3r1%apd*$L2KoDF)5Sj&5&Y-Lb5Xfeiu`xE1i|5;GxhEYri
zd|~UP<NI&>Wn&x7<;&zd%DOd9lpoo<TZQ|oq${sL6F>o=GBGow{z(6#R}!T{9Xj`K
z3OWLkzkL2&J00;jTFaXCM=JX=c%*VQrR|iV^VPPvQ?d$Yws3}s^_9K`KZ>7+l_zI2
zRCB_9X|z)lG!S$g_Cia0oXG<VxHLO{|NX|rQI>;qop~Qk<ZoQLq(OLr2aoST?Lhx9
zppjxj+UC_hU^}^JkH&)H(4(MJ&lIo)<SS_1V|Og1<6=%5b&vEX8EfltxcftPLa7vt
z@x0Q~j%c4`C534R&D*kUI%uaDwGE>94vp`hxI3mTo-<2mga3UYyJXgFGiGZYO2vKp
zZny)wXZtpUx0SRXq`M_wf=qL>EcAEDu>-Z-EbyZ^M_bSitxm_?zJ66ZAOCYh`XKhf
zN|#^{JLA4Q{htluXC!Z$n-rHwrn@{A#VCu`48-P>^i`TRmM@!QZpV}WZyF04ZyNXC
zl!BlmUpo$W>&Oon`{9WHQF50pm@=7vj`MH)&ko7_XJBrGXAL8la(Ml{Pqt7E@8vW_
zM>o_DiXA?tc*$PeneWvkNlw1wBKEC_k&+$12HQe*pqgC<WirchESn>(RQ^|UNxQ`y
zsSlMvh*Rm8VUEA}<HZZDLard+c>~6L3i8P}+O2JF+mv{xLXt|x^3qz;w4|U_vTQB-
h42;!58K7T4D?pK;^5g68&dv(Ke_#G9f&YyJ{s)l+qZ9xD

diff --git a/early-dev/app.R b/early-dev/app.R
index 5d91a2f2..8c73ccca 100644
--- a/early-dev/app.R
+++ b/early-dev/app.R
@@ -559,6 +559,7 @@ app <- teal::init(
   ),
   header = tags$span(
     style = "display: flex; align-items: center; justify-content: space-between; margin: 10px 0 10px 0;",
+    tags$head(tags$link(rel = "shortcut icon", href = "nest.png"), tags$title("Early Development Analysis Teal Demo App")),
     tags$span(
       style = "font-size: 30px;",
       "Example teal app focusing on analysis of early-phase clinical trial data with teal.osprey"
diff --git a/early-dev/www/favicon.ico b/early-dev/www/favicon.ico
deleted file mode 100644
index c9351d3f8d96b38a556436f999d06617a6b5715b..0000000000000000000000000000000000000000
GIT binary patch
literal 0
HcmV?d00001

literal 15406
zcmeHOcU)A*_6Pe@njpPfKtQAyML<D8Y}mVE>?J66UrbDFiLu3Q6l*lGC&oNACiY&i
z$KJb%Chpz6Wjnv`+1<N)cUgIw-~0Xbd;9qu?%cUEbG~!t%sDf21_uX6hl&nvZVq^c
zI1H`i;E?R#;1CjGe6L^A!C?*ZVq;C;!yFt=dOA4NM;TN>4P!nYc7KkJl59$ws8nAX
z^!(wYjW3@)U0YgO>Srh=ewS3Cq$5=_HH5O&1&*7tanbxgGyU9|te{%VrsYdssg$Zo
z`qI*BRE(OD{4pd^&k;Pk9{TCWJ6#f@<ZS{gF$vWjWbq(+c1w+uAKSa<Cfeu#ax}0r
z^VG-PxOCy*=&t$fpa#_yMTt)Aqp7vEg$W+)$dqvQ!?gNrbFb=5d<{q0_}<;v+rM4e
z2Y%56gMP>N?R}QwR#ny}pfXbsnZYH;4CP|FE)rt9&E*4&cdI-OT+k%-nj`e@`k5-x
z*^^0iuO>Tl@W5STZ3l-PYm1)~&iLRUW^m7Sn*7$OEb*eeIJYXYSZ`NZd<_R#)6^(M
zqplP9`09?bT^rZk6YFnZW2_(Ddm5kUR82O&l?PuK>!cVS=cMRcznY?VST)7qm~ggD
z?i3-cdry|y-TBSh2L?GpdOKFHd`>coXxUtmkTr!*_3Ows_G_<5bI()c1$JROMy*rD
zwkqUYPn^&+s2j)_>aSb-$RKz$vVHZ67Y6)jBf4Gy6FgxIA2eYsU%y?RB0RsPBBFJ3
zMXXOvLp?(|^zDcBtDlJYx2;<7($HV@F~iS|Y3x};)-=$AX&YIa$pydcU@s=a$Bjua
z$%Oj<{km1pjP)HI4E4dA+FtSb41Ukn?^NF|TO@qDY_UM&wRhVV)q=?r`Np-J3}r}`
zJJuAx5bOWEeajzW+uK(cD_70=LRi0OzVPFQ^~#M)7YI{F4Ca2_`GcycYX=4KNOY<w
zJMhDfKS<}O4V_Nc_T>Iwuk~({BBy>NpnYmD!MP%y6=aEcQXNVU%x$VTf8yBr(o%i4
zkw5;T6@96`ibky-{r#HampOI(jj}>Jgq7NB6IqAZz3JO0TCH|4^cORheyC_bV0@#$
zXvg!fSFe^Xo;q2P>Rw%z?(HI5HT!d!T*l1C{BSjvr%J|(#(6+B4YLprV}7Y#AAR@Q
zwV$8dySD@VtVbp2C#h+AGi3kmKV)Y@Kutl8h7=Oz{fzL+l#phd(?|fj7ibx14hYsx
z@-r8tJmZU1mZa$WB&iMXstPL7>-Db>{Pd&h)WQ8~jLmc84FH+OPh@N2YKOULIIP%P
zidj-(0krK1$^+kPx2|5*3~ieWorNxfin?`TAKksH#rJcd40COBLTu$-pVk%8W_{@O
zuD@Qt(ta^!B%kbB#h|~UZJ=i(kLt38pM1nC7)FEgo1kaGR@}@@B4JKb3CW8|C}IxU
zaRbd!sZ_$Iua_#b0zHkkpXQIjE*Nd86h}^-0EXtbR;^K>?x!Fp5r<jkA_MU$7BD@5
zy%OpT!1MV@jBl6ZhH}y8434g@7}($+274jpYn$$!(MWOO)Jc-X15kHR1sgVHUx5eZ
z(lMXUKDv8HJGy%(mh4Tci=%7=Z2pQ4wFK?r`g--^2>pg0KEmqGUc#Il4}MsTlOn^t
zf=MPO*+52Qn<ft^;9fj^OuBIx_9dY#Q)3Qz2IKp8G=2*|`6o{{hWa!q&6V9=;Hw;)
z?83J4tHhix3RWL03{t1KRFtK<dNTRJ@rp6odHmO-I;b}G%vFs|uFKLls%wxL@TYmX
z$cn%GT;MrQ4IC>$K2jVs49L5(Z^t$jjh|SzTivSi<?TIrQT9pBK}?4Chg`P*5+N&W
zjga1CgEBd<Sa7?=>MKCfF$1?Kv+K^}yG1Nkc8mB*nd%lJH;;?S)}HwF7s7DBWEIUY
zkauHnUY6Ckj!AZ6M<ll5TLi9BHf!*$GH%Q*P3Y3Ss(^(Hg@7++@F63IbM*>(velkG
z(K$kRe()`Uvu5%EOBM;^b}!R@Ie3e%Nv+QC`NlD!eoW}wlLfEiW?eKPK;F$kdD#lF
zuY^0zt)lGX{JpyN5h{JXkLC$cX-V>U=StS&jB+uMS!BA=M~VH74f19h&;3kDopMY~
zc0!ct_+DL!|4DPlE&Oi{YME{9zX@-HE=63};<d^R1#!x0Sv9%gvCf9?Qj8)$@oD&G
zsz0DXEk*w4CAx^_nF>(`W4pB{{-<rH9`bGtY}pKc)+np!2KAV_3-+r?|C6ErS0;sO
zp3SJM9h2nDHg=Qhy2S>NKNWGb5Al`{N?4<gP3x=(9XgN`F&A~oC;n&4_FsQ{0P%-B
zi9#{9>Djwgq;piaam|Xd43CPkAq{INR(AB{zv<>Jtm)z<eAU{6pPpTl`!v&yo0I3x
zujw2rEb1^()1})nO})a;c)u0Pm9fFzCcp0}8)@WUV#^<P{my{gre^+8jpF4Y)8+};
z0ZW7opNV{mYot7(MrCvV2xF2{1z8Jk7p6x<4m+apJ$;|(^{Tw!xk9R2lH94JL_?FR
zZvVc9b)lhOkk5ym^2sh<u;q`uJN<Jq&GM)6;XOOE{>zsL4V(64GkiyJnaNv~nT@_z
zX8X_Qv-}qj30Z!#giN0zzGdh>b#mPtMcsbAQD>>(yYg$L`w!byu~_RHc%wZU+Yuew
z68}rK{L%lrA2iP}_g}0N=jAG^J#+vUuy}z`?b$P3RZ!3;llb7tlel2`o4~nW@&OCy
z3jvE43PIC8<|DJ3C}@s|<1Mx$K8Iu73SV}`mOn7r<!`759i(Simv(Hu9v#`ZAWtSX
z)R&11tR;&lUuc?NA`j_PIv*&1Si4;6|8GYAm<6VZ08ID#Wv83`j76uZ4z=;N{up^%
z=C`z*G;P2H`44TIqkyTpVPtEWg^>S!;xENc>Ff}1rgKuXA-`inq&y3{+$SSNKD1SH
z#ZavObL#~$MP1voqdK=`Q)*T-$f<wx3`Mf5QCDp-3~7@?{l95P{`U*Anpo){@t;`G
zgWdQ2c2yQ+{`!yKbz^#TQCz=#QS<8$J5<|>S12d-@563gxm<bn*kScIi{}ee=he%X
z+Uy`NyW>JO4*kDv7Q6`v`v1VdAN8d&ApXCA*T1%IQ891cfPZJj^-C8un^%0ToLN-J
z8GP)(0`|_etJ<YAKEobP%HPzM*)BQC`nSkbz}Mb|3@pM22JnAakd<bZzbLnfeS5IX
zo4<7XFqe+(`IpMTAN^lCZ3;iSTSv&f9sB6sT`lQVBKd}Dj)wkc8TxPJFSbS4`Za4J
zhpyeX<&XD=3qPC8C%IVr7g~c{yLds9=~q*>d+TP^$j<qSl9R{P_wU@%+`RUirWgFq
zqx<)?x3AyOd@+6uclXvUjSO<SfBUwEFiB<E$i0Sa?ff|c@v_4|AM35##Ebl(xKB3h
zw_xX}9olcvJM}ZkrLrv1)rghWqm64h8@>^K`bI=$sa^u=kMGl+eSH5ut%J^j(rxvR
z-jV+g&;;!J-u$}rdsQ3wASwR0rVZn3nS;`Dz0#BA=Z+s$V|<_L^`-sLenoq{rFqy-
z_@LZMS}(1cHyiff&8U+SJ(BXUm(InSU?<kW8jXhh-3*Y6Xltar%1fh89O%FwFP>{Z
z8$O7$)(vYLC1PmgQA4(9>c_mCk&&!7gF?&WA^m2%CZliA)e2~%6X?!w7tU)2wrpzF
z4Us4Ll?1GHC1ZRB<uS&lDP}d(q#WNZP1VsJ>BdCTjeW2OZKCQzH;gi%IZ$%^80`a}
zq703(WgjSI@xE~E;6~fNpkh%se)wjc^%#qNHuJU9i22*QCd#$}3<<EK2l14QaoKY3
z%HjWOIXWl75v@Z%kfTEg{+9pyk4V_m2*$1=C>S&aG!jI*WwTHHk8mu%Q}6o~kbslU
ze@1}LC{-$rR-;iNeF#(la(&+>|8L7%WC(0@wvY!p37^2-gTMUe2YuKXqegJgpFGjR
z2f{y>{sL+YvKb4Yv@}%)ayg&Ml%<UKDGw}FKw+S-aaPH_{{45|rWMPD+`2&~AL%H|
zj|rFW-u#{F&7ZIJde}*n{Tvhws{HP}$|-5{$>!B=A1M?3L$Kx|9ls-I7~QV#HYf+=
zG{btycuryTBSu?JYl*^6ZCN@OhK<#s&Slgcji>Kh8N9~_BW4@q(pO0ue5-+Pf6#U4
zig5Al8O@M3xoi_}S3}G~^nb?noy8y1J~-3gof+G+D|`3m4GsJfk2Xp`?Ln2_1Mc4{
z3LfMulR-a1SJY1)+}AC@UM<bj#cFLW;<x)Wt#vX3JebvUXA3W%K85SmDbeP7P&BB@
z-vU=oCA3NQFdno3@_vCBmv+PAh01QJ@p4+{+r^3X<-g0PwJ7!$iXCfLEB}1;N(;Yv
zA3SJH76HN>mkjz_@s(c&?bHDM6FPGbGS?p7yGPx(X=6nr#H6J73KN_aI|_V-VX@V%
z*5=YO_R^$dh_f(5TDMS?oH|MCSvp6%4jKX~cPz?7j=IjE)}Zrhl}dl}@+B?VLvd~<
zIXTL*JS#H!K~>}<;%cz`S7G|nr4gmfyfFQ=EH`#siVHgkXR=-ERF${(t1Qo|Rgp<?
zk?xl*^Fr)bGGcmPj2Xo}ymK3F1JlE}j>*Kc`dh_MAJ7r8FDOfKfGp5@omThfgWI>Y
zOQ(Ozx5c{9utx#zUSZYb%kn+>t$loj?|S+On|t{PszvqnrAs18`32$ng>5{zxp^Ku
z${5a)*5gcRLw9ds70z|1Hgn^sPf5;Y@zYo&Vo%dKF<QQM-W-Aa2Ilw+U|9xA0oh-F
znmUK?-q4eUc)k#LLAQ0)3ZX+xgq-wLl+mQduH5mFLF!M^UAZ>?mE|~JW*WIV%I3Co
z=S#+hs6TJ+&e7N;IyuWy-6G{py>b+-0t?u7nIrffgGUMTdW=%<8#Yk4rB8F!2a$dX
zI;#@fmOd%IO7m+E_SYDH+A}-?O~asA$8;nEgYP>@S1zA94SSelW5*pJ_p0*C6GJs!
zYF9Pyr{k+5URT3~Np`6#Z|vSi(bRVupA))E)iUC|CO77SCOhU=bxQwpYNwZ4eFa$k
z;GKWyn#KR1Y88G^-8Jg8repYzs#ZZ``9^Mt1=O&fQ`8^w8{>L+SKPjOMbxSJ2FRkq
zSmQr%?ZO2O>55bqVw%Q(US2IO$=Q!dbn*t~P$t7`2$vPOTxgo~qcXYsQB~Bq1FAZ+
zb}57BuTustT88tlMS|PWBWg#Tu9O^JW!W2@FV05-XV2m5jGM~m44NW*HE51zZrk<R
z)*-WmBxmC}yU0^~c1ezrKYRR$#$lBR*|rP#c7XOf&Bb#~8ymQ&tp~rTT@z)iIwhJm
zb$`>eY<ON1UwA?7zx$5X<M<Vg|B7Ov&WNF0L|$`66!<lWtSgTW4`FH#8^~3Xz0u<^
zq}1)mVRb}Csv<HoO<r$6Kh}TQQX%fr3GK{dTS~tuSgy$p-mXe;D(g@3>IF0RZr&vP
zYef9!r>P_Oc98IA+rtmP(;D&qJ;TTAIyKalwvW)1hHbd2@he^-MCLY=$JI2(MMQa7
zJ+YpMfPJiubD@~}p=HK4&d);@I(8J7RB}v{HvXn2)vu+M4W@aWhx4>M*RPRLT4%8~
z)C0>X0RN$q6NKNZ3=i6qrue7Hb7x%C^&fXZKOpHVReaqrCeaj=5%C(=4DekhKP%?j
zeVWU_7U4`~bf<<~-#usbVMSB<Si||J#Rs-TT>sY9%M|z8V34~7w%LB-+u?I>!5<gk
z%LHsbp$T5FT<F!TK6`9b9rfnkKFXtof$AX*?fWcqUu^Wy+!r%`V}HNQiRM4Zzo83U
zv0WK$iZ_X6TjKpD&i5eyjZ&E#`eOP6{723mJ8F`@#XiSD79mro^YvzJQO47H0eqXm
zADtf`tkJ{fA4lA*t$!7HlbRLaBP=pA;wRZ!@<cr1lggyJR+M!QYoI7>yjz<VTF3<~
zTp-Zg5zEk%&V8<5yh!r@PKsHYCj4iQ9Vw$f(a^oxYfq>%;?^p~vkhvK<i54HuX1Gv
zFJWU3Z-M+2-9;%%bY?rl#!?@X;its&HmXDYON6daUps|Xk&j9C<;FJ|q#T&=jXJ}-
zFB{!3LhirvYazyF4ibJk0|ds+Qp|?5W&R#Hd-QM_`8UA+BY4?XWp2as>c;NvFt?0j
zLs%$=O8zR-qaxD*c*dqUv&9{~g#AMUR2RpGsLzcJRv-K@Q1w%PKjqGTzRJCW{8T4K
z1*tDjsIS>KY^ZK>_7Pp{=0B^0ww+f8E?p-0Y~G}-J!AkEZ?%VTkWu{dH`sRQ&$cr7
zO&RFh(KE1b**Mb{F_O$;LVXzj)hmVAM!ngVp$FBOK9f0$`y@JfAO=Og*`#X{J)yoe
za;<<nN>!QO^=m3dCMR*9<{Z_HOW&Xw6gNZJHEO@6W$;E-s#~huckNmw`352%oEsTq
z7uGtLQ^$|Fa{fHYe@8j`f9%YWLni!^`jADvUR_w<O&gR^Z420pz_C2Vud@A@B2M%<
zpXoiCPxtK0Hu3DtHt}e$Xi}>qn_jCYn-1UB)aN5U%Wt-j8?sB)Awpl;F6@Oa(|Z)+
zUQzNmKQCE0?mM_#y{aYuRzagFtv9frC9Vb8k^G2qYWp%*O3o4fo#n{?`02xk)D%+?
z>xs`e#4Qj*l6&L)*XP@Bl?`$`D3WVM$s2iQE8_ZWQYL<IK-DyO7O>9boB2)WGkreh
zGQ5VfX&&uaio2z_M#!7_P8ZSxhO^O)(&RzYKI7dF9#H$PTdNH3-kA+TY`yk~!E7AP
zNkyL0XA9uJeC{ma-&HRDBL~aM-y{RF738PFdUazxcK@VuKXg#-_0uj@1(wxUVr2S|
zaih4Xq!@WrVnaDSBeDL9KwKoeS9dma(ge<L&1%8@@Ikfv{$ErfA5Gw+W5SvEx2)f!
z*eTrtaj{Eh&(PlBU*+IGaSE91$=}kR$sS@&8jU+rp@l=aYEK?(t37|F^Tm2KaPBN2
zaQ<vQaNcY_05QP8=~MXN@uT_L{rhkcIZYKYSWm=@>siTsv9xc|8EIY%%)v`%P80sU
z*7z-s411rGrw$$XH~6jFk8`OaYY-nHZxA0Tr?HQ#SydK?y;&T^%y1Xb=r8C#k99pM
zHhXEa?=aOP{1;Cf@b44xTaX)bfdACH;(uQ}QjCA6ZgT_vQzZZWB7WN^zMVRWIYoC!
zrTpxrZRKOHO!;{>e)(;>WXf+I;>+OP58*#xi(7ohx6^d5C@b*o_|rU{WgiXb%VKY2
z@DX(1?~@_@*}kw%ZKCQhGYW@sv&R=1X+ja#IVDa$8un!^V&QA%&lLt@Z7s%Yx?+tz
zv*<%Eo$i~KqhBPe=7{&2@E<D2{-3enH~CmYyC(mHbgOV$$6nWbIcYqX=v+ZYcP&{~
zp)bZ<Mch)sV4aV+lJ3#HJKBe!X(K;m$tT{ueog!M-d*iquV3rL`v9{>7jkqKXN<X&
zKR;+sQgY%rVlkyhMR^;amRSJ#pE+^hS9P;;<libh*o+_hG&%Vc%$w5Uxw8!TWxzkJ
za0J&9c7|f$xZ}jM!kRxT#D}4AQ^*+o6j~oZ7FPIe^v8CN(3+msX25vd8o%WY-_D-c
z|91S;rigzY?n&(YcAfI+qeohS=dI*_4`+jrm1YyxVH6|9d6E1e{Ke~+FLjR*)1|#2
ztvRgl8^-zVV?Z{Y)&{_M5@Zm%Me@czApe}L{B7kx`0w7huDN>Yg67rlFLg_1PUA^m
zr22!qxvFhziiLTTCvv2>CC86yUcG#wTaUXU`Ee2Ed&RS`AH&^qU7JYbe%qFpbWYHm
zB-;p#r$zi0$y@Ln^}p=;L2OIJkGqSdi>7|U_knDGhwl>ghxC8zs+Gd@4~KG7hY#lR
z8`hWKymDD{WZz!(#DZSzMBFRufcx$<aSv%P&PMRlFG0+ILhtTunt0#YW-O>*q(5h{
zwjmjpgTLg>n?H4nr+vy%++4&gedg8)WX|9`f$RyzbUWd!iSAu2`1E6Lc>6rXz1z1m
zPai+jK6>y#`v7+p^TI=!FUJ+}FP=WpzJB$Gj_OY6*Oz_#@S*k@&ZmCIos1{Y!DGMt
ztfDoV$V)mFEx;4wsbuAHOkWHBvihU%j_;Q-A63_|R~v;pW$8XR6PL;Zdygcn<w&m$
z`FN+ZCc_;9<k1;ma?O8$s>za&Htxr8SJB%|mJJ`2g8PqDS1d#23}tD*i?)ny(mu!0
zU^Ay<oNz`>=MEHaKLpCK)f@30F>SibTL&~5bc6Zpjdstr&8lJfd4{{)R{fCn>2IZ_
z_E|b_u@~}pmwkl$VW;3r1%apd*$L2KoDF)5Sj&5&Y-Lb5Xfeiu`xE1i|5;GxhEYri
zd|~UP<NI&>Wn&x7<;&zd%DOd9lpoo<TZQ|oq${sL6F>o=GBGow{z(6#R}!T{9Xj`K
z3OWLkzkL2&J00;jTFaXCM=JX=c%*VQrR|iV^VPPvQ?d$Yws3}s^_9K`KZ>7+l_zI2
zRCB_9X|z)lG!S$g_Cia0oXG<VxHLO{|NX|rQI>;qop~Qk<ZoQLq(OLr2aoST?Lhx9
zppjxj+UC_hU^}^JkH&)H(4(MJ&lIo)<SS_1V|Og1<6=%5b&vEX8EfltxcftPLa7vt
z@x0Q~j%c4`C534R&D*kUI%uaDwGE>94vp`hxI3mTo-<2mga3UYyJXgFGiGZYO2vKp
zZny)wXZtpUx0SRXq`M_wf=qL>EcAEDu>-Z-EbyZ^M_bSitxm_?zJ66ZAOCYh`XKhf
zN|#^{JLA4Q{htluXC!Z$n-rHwrn@{A#VCu`48-P>^i`TRmM@!QZpV}WZyF04ZyNXC
zl!BlmUpo$W>&Oon`{9WHQF50pm@=7vj`MH)&ko7_XJBrGXAL8la(Ml{Pqt7E@8vW_
zM>o_DiXA?tc*$PeneWvkNlw1wBKEC_k&+$12HQe*pqgC<WirchESn>(RQ^|UNxQ`y
zsSlMvh*Rm8VUEA}<HZZDLard+c>~6L3i8P}+O2JF+mv{xLXt|x^3qz;w4|U_vTQB-
h42;!58K7T4D?pK;^5g68&dv(Ke_#G9f&YyJ{s)l+qZ9xD

diff --git a/efficacy/app.R b/efficacy/app.R
index 023d74b5..7ccce37c 100644
--- a/efficacy/app.R
+++ b/efficacy/app.R
@@ -300,6 +300,7 @@ app <- init(
   ),
   header = tags$span(
     style = "display: flex; align-items: center; justify-content: space-between; margin: 10px 0 10px 0;",
+    tags$head(tags$link(rel = "shortcut icon", href = "nest.png"), tags$title("Efficacy Analysis Teal Demo App")),
     tags$span(
       style = "font-size: 30px;",
       "Example teal app focusing on efficacy analysis of clinical trial data with teal.modules.clinical"
diff --git a/efficacy/www/favicon.ico b/efficacy/www/favicon.ico
deleted file mode 100644
index c9351d3f8d96b38a556436f999d06617a6b5715b..0000000000000000000000000000000000000000
GIT binary patch
literal 0
HcmV?d00001

literal 15406
zcmeHOcU)A*_6Pe@njpPfKtQAyML<D8Y}mVE>?J66UrbDFiLu3Q6l*lGC&oNACiY&i
z$KJb%Chpz6Wjnv`+1<N)cUgIw-~0Xbd;9qu?%cUEbG~!t%sDf21_uX6hl&nvZVq^c
zI1H`i;E?R#;1CjGe6L^A!C?*ZVq;C;!yFt=dOA4NM;TN>4P!nYc7KkJl59$ws8nAX
z^!(wYjW3@)U0YgO>Srh=ewS3Cq$5=_HH5O&1&*7tanbxgGyU9|te{%VrsYdssg$Zo
z`qI*BRE(OD{4pd^&k;Pk9{TCWJ6#f@<ZS{gF$vWjWbq(+c1w+uAKSa<Cfeu#ax}0r
z^VG-PxOCy*=&t$fpa#_yMTt)Aqp7vEg$W+)$dqvQ!?gNrbFb=5d<{q0_}<;v+rM4e
z2Y%56gMP>N?R}QwR#ny}pfXbsnZYH;4CP|FE)rt9&E*4&cdI-OT+k%-nj`e@`k5-x
z*^^0iuO>Tl@W5STZ3l-PYm1)~&iLRUW^m7Sn*7$OEb*eeIJYXYSZ`NZd<_R#)6^(M
zqplP9`09?bT^rZk6YFnZW2_(Ddm5kUR82O&l?PuK>!cVS=cMRcznY?VST)7qm~ggD
z?i3-cdry|y-TBSh2L?GpdOKFHd`>coXxUtmkTr!*_3Ows_G_<5bI()c1$JROMy*rD
zwkqUYPn^&+s2j)_>aSb-$RKz$vVHZ67Y6)jBf4Gy6FgxIA2eYsU%y?RB0RsPBBFJ3
zMXXOvLp?(|^zDcBtDlJYx2;<7($HV@F~iS|Y3x};)-=$AX&YIa$pydcU@s=a$Bjua
z$%Oj<{km1pjP)HI4E4dA+FtSb41Ukn?^NF|TO@qDY_UM&wRhVV)q=?r`Np-J3}r}`
zJJuAx5bOWEeajzW+uK(cD_70=LRi0OzVPFQ^~#M)7YI{F4Ca2_`GcycYX=4KNOY<w
zJMhDfKS<}O4V_Nc_T>Iwuk~({BBy>NpnYmD!MP%y6=aEcQXNVU%x$VTf8yBr(o%i4
zkw5;T6@96`ibky-{r#HampOI(jj}>Jgq7NB6IqAZz3JO0TCH|4^cORheyC_bV0@#$
zXvg!fSFe^Xo;q2P>Rw%z?(HI5HT!d!T*l1C{BSjvr%J|(#(6+B4YLprV}7Y#AAR@Q
zwV$8dySD@VtVbp2C#h+AGi3kmKV)Y@Kutl8h7=Oz{fzL+l#phd(?|fj7ibx14hYsx
z@-r8tJmZU1mZa$WB&iMXstPL7>-Db>{Pd&h)WQ8~jLmc84FH+OPh@N2YKOULIIP%P
zidj-(0krK1$^+kPx2|5*3~ieWorNxfin?`TAKksH#rJcd40COBLTu$-pVk%8W_{@O
zuD@Qt(ta^!B%kbB#h|~UZJ=i(kLt38pM1nC7)FEgo1kaGR@}@@B4JKb3CW8|C}IxU
zaRbd!sZ_$Iua_#b0zHkkpXQIjE*Nd86h}^-0EXtbR;^K>?x!Fp5r<jkA_MU$7BD@5
zy%OpT!1MV@jBl6ZhH}y8434g@7}($+274jpYn$$!(MWOO)Jc-X15kHR1sgVHUx5eZ
z(lMXUKDv8HJGy%(mh4Tci=%7=Z2pQ4wFK?r`g--^2>pg0KEmqGUc#Il4}MsTlOn^t
zf=MPO*+52Qn<ft^;9fj^OuBIx_9dY#Q)3Qz2IKp8G=2*|`6o{{hWa!q&6V9=;Hw;)
z?83J4tHhix3RWL03{t1KRFtK<dNTRJ@rp6odHmO-I;b}G%vFs|uFKLls%wxL@TYmX
z$cn%GT;MrQ4IC>$K2jVs49L5(Z^t$jjh|SzTivSi<?TIrQT9pBK}?4Chg`P*5+N&W
zjga1CgEBd<Sa7?=>MKCfF$1?Kv+K^}yG1Nkc8mB*nd%lJH;;?S)}HwF7s7DBWEIUY
zkauHnUY6Ckj!AZ6M<ll5TLi9BHf!*$GH%Q*P3Y3Ss(^(Hg@7++@F63IbM*>(velkG
z(K$kRe()`Uvu5%EOBM;^b}!R@Ie3e%Nv+QC`NlD!eoW}wlLfEiW?eKPK;F$kdD#lF
zuY^0zt)lGX{JpyN5h{JXkLC$cX-V>U=StS&jB+uMS!BA=M~VH74f19h&;3kDopMY~
zc0!ct_+DL!|4DPlE&Oi{YME{9zX@-HE=63};<d^R1#!x0Sv9%gvCf9?Qj8)$@oD&G
zsz0DXEk*w4CAx^_nF>(`W4pB{{-<rH9`bGtY}pKc)+np!2KAV_3-+r?|C6ErS0;sO
zp3SJM9h2nDHg=Qhy2S>NKNWGb5Al`{N?4<gP3x=(9XgN`F&A~oC;n&4_FsQ{0P%-B
zi9#{9>Djwgq;piaam|Xd43CPkAq{INR(AB{zv<>Jtm)z<eAU{6pPpTl`!v&yo0I3x
zujw2rEb1^()1})nO})a;c)u0Pm9fFzCcp0}8)@WUV#^<P{my{gre^+8jpF4Y)8+};
z0ZW7opNV{mYot7(MrCvV2xF2{1z8Jk7p6x<4m+apJ$;|(^{Tw!xk9R2lH94JL_?FR
zZvVc9b)lhOkk5ym^2sh<u;q`uJN<Jq&GM)6;XOOE{>zsL4V(64GkiyJnaNv~nT@_z
zX8X_Qv-}qj30Z!#giN0zzGdh>b#mPtMcsbAQD>>(yYg$L`w!byu~_RHc%wZU+Yuew
z68}rK{L%lrA2iP}_g}0N=jAG^J#+vUuy}z`?b$P3RZ!3;llb7tlel2`o4~nW@&OCy
z3jvE43PIC8<|DJ3C}@s|<1Mx$K8Iu73SV}`mOn7r<!`759i(Simv(Hu9v#`ZAWtSX
z)R&11tR;&lUuc?NA`j_PIv*&1Si4;6|8GYAm<6VZ08ID#Wv83`j76uZ4z=;N{up^%
z=C`z*G;P2H`44TIqkyTpVPtEWg^>S!;xENc>Ff}1rgKuXA-`inq&y3{+$SSNKD1SH
z#ZavObL#~$MP1voqdK=`Q)*T-$f<wx3`Mf5QCDp-3~7@?{l95P{`U*Anpo){@t;`G
zgWdQ2c2yQ+{`!yKbz^#TQCz=#QS<8$J5<|>S12d-@563gxm<bn*kScIi{}ee=he%X
z+Uy`NyW>JO4*kDv7Q6`v`v1VdAN8d&ApXCA*T1%IQ891cfPZJj^-C8un^%0ToLN-J
z8GP)(0`|_etJ<YAKEobP%HPzM*)BQC`nSkbz}Mb|3@pM22JnAakd<bZzbLnfeS5IX
zo4<7XFqe+(`IpMTAN^lCZ3;iSTSv&f9sB6sT`lQVBKd}Dj)wkc8TxPJFSbS4`Za4J
zhpyeX<&XD=3qPC8C%IVr7g~c{yLds9=~q*>d+TP^$j<qSl9R{P_wU@%+`RUirWgFq
zqx<)?x3AyOd@+6uclXvUjSO<SfBUwEFiB<E$i0Sa?ff|c@v_4|AM35##Ebl(xKB3h
zw_xX}9olcvJM}ZkrLrv1)rghWqm64h8@>^K`bI=$sa^u=kMGl+eSH5ut%J^j(rxvR
z-jV+g&;;!J-u$}rdsQ3wASwR0rVZn3nS;`Dz0#BA=Z+s$V|<_L^`-sLenoq{rFqy-
z_@LZMS}(1cHyiff&8U+SJ(BXUm(InSU?<kW8jXhh-3*Y6Xltar%1fh89O%FwFP>{Z
z8$O7$)(vYLC1PmgQA4(9>c_mCk&&!7gF?&WA^m2%CZliA)e2~%6X?!w7tU)2wrpzF
z4Us4Ll?1GHC1ZRB<uS&lDP}d(q#WNZP1VsJ>BdCTjeW2OZKCQzH;gi%IZ$%^80`a}
zq703(WgjSI@xE~E;6~fNpkh%se)wjc^%#qNHuJU9i22*QCd#$}3<<EK2l14QaoKY3
z%HjWOIXWl75v@Z%kfTEg{+9pyk4V_m2*$1=C>S&aG!jI*WwTHHk8mu%Q}6o~kbslU
ze@1}LC{-$rR-;iNeF#(la(&+>|8L7%WC(0@wvY!p37^2-gTMUe2YuKXqegJgpFGjR
z2f{y>{sL+YvKb4Yv@}%)ayg&Ml%<UKDGw}FKw+S-aaPH_{{45|rWMPD+`2&~AL%H|
zj|rFW-u#{F&7ZIJde}*n{Tvhws{HP}$|-5{$>!B=A1M?3L$Kx|9ls-I7~QV#HYf+=
zG{btycuryTBSu?JYl*^6ZCN@OhK<#s&Slgcji>Kh8N9~_BW4@q(pO0ue5-+Pf6#U4
zig5Al8O@M3xoi_}S3}G~^nb?noy8y1J~-3gof+G+D|`3m4GsJfk2Xp`?Ln2_1Mc4{
z3LfMulR-a1SJY1)+}AC@UM<bj#cFLW;<x)Wt#vX3JebvUXA3W%K85SmDbeP7P&BB@
z-vU=oCA3NQFdno3@_vCBmv+PAh01QJ@p4+{+r^3X<-g0PwJ7!$iXCfLEB}1;N(;Yv
zA3SJH76HN>mkjz_@s(c&?bHDM6FPGbGS?p7yGPx(X=6nr#H6J73KN_aI|_V-VX@V%
z*5=YO_R^$dh_f(5TDMS?oH|MCSvp6%4jKX~cPz?7j=IjE)}Zrhl}dl}@+B?VLvd~<
zIXTL*JS#H!K~>}<;%cz`S7G|nr4gmfyfFQ=EH`#siVHgkXR=-ERF${(t1Qo|Rgp<?
zk?xl*^Fr)bGGcmPj2Xo}ymK3F1JlE}j>*Kc`dh_MAJ7r8FDOfKfGp5@omThfgWI>Y
zOQ(Ozx5c{9utx#zUSZYb%kn+>t$loj?|S+On|t{PszvqnrAs18`32$ng>5{zxp^Ku
z${5a)*5gcRLw9ds70z|1Hgn^sPf5;Y@zYo&Vo%dKF<QQM-W-Aa2Ilw+U|9xA0oh-F
znmUK?-q4eUc)k#LLAQ0)3ZX+xgq-wLl+mQduH5mFLF!M^UAZ>?mE|~JW*WIV%I3Co
z=S#+hs6TJ+&e7N;IyuWy-6G{py>b+-0t?u7nIrffgGUMTdW=%<8#Yk4rB8F!2a$dX
zI;#@fmOd%IO7m+E_SYDH+A}-?O~asA$8;nEgYP>@S1zA94SSelW5*pJ_p0*C6GJs!
zYF9Pyr{k+5URT3~Np`6#Z|vSi(bRVupA))E)iUC|CO77SCOhU=bxQwpYNwZ4eFa$k
z;GKWyn#KR1Y88G^-8Jg8repYzs#ZZ``9^Mt1=O&fQ`8^w8{>L+SKPjOMbxSJ2FRkq
zSmQr%?ZO2O>55bqVw%Q(US2IO$=Q!dbn*t~P$t7`2$vPOTxgo~qcXYsQB~Bq1FAZ+
zb}57BuTustT88tlMS|PWBWg#Tu9O^JW!W2@FV05-XV2m5jGM~m44NW*HE51zZrk<R
z)*-WmBxmC}yU0^~c1ezrKYRR$#$lBR*|rP#c7XOf&Bb#~8ymQ&tp~rTT@z)iIwhJm
zb$`>eY<ON1UwA?7zx$5X<M<Vg|B7Ov&WNF0L|$`66!<lWtSgTW4`FH#8^~3Xz0u<^
zq}1)mVRb}Csv<HoO<r$6Kh}TQQX%fr3GK{dTS~tuSgy$p-mXe;D(g@3>IF0RZr&vP
zYef9!r>P_Oc98IA+rtmP(;D&qJ;TTAIyKalwvW)1hHbd2@he^-MCLY=$JI2(MMQa7
zJ+YpMfPJiubD@~}p=HK4&d);@I(8J7RB}v{HvXn2)vu+M4W@aWhx4>M*RPRLT4%8~
z)C0>X0RN$q6NKNZ3=i6qrue7Hb7x%C^&fXZKOpHVReaqrCeaj=5%C(=4DekhKP%?j
zeVWU_7U4`~bf<<~-#usbVMSB<Si||J#Rs-TT>sY9%M|z8V34~7w%LB-+u?I>!5<gk
z%LHsbp$T5FT<F!TK6`9b9rfnkKFXtof$AX*?fWcqUu^Wy+!r%`V}HNQiRM4Zzo83U
zv0WK$iZ_X6TjKpD&i5eyjZ&E#`eOP6{723mJ8F`@#XiSD79mro^YvzJQO47H0eqXm
zADtf`tkJ{fA4lA*t$!7HlbRLaBP=pA;wRZ!@<cr1lggyJR+M!QYoI7>yjz<VTF3<~
zTp-Zg5zEk%&V8<5yh!r@PKsHYCj4iQ9Vw$f(a^oxYfq>%;?^p~vkhvK<i54HuX1Gv
zFJWU3Z-M+2-9;%%bY?rl#!?@X;its&HmXDYON6daUps|Xk&j9C<;FJ|q#T&=jXJ}-
zFB{!3LhirvYazyF4ibJk0|ds+Qp|?5W&R#Hd-QM_`8UA+BY4?XWp2as>c;NvFt?0j
zLs%$=O8zR-qaxD*c*dqUv&9{~g#AMUR2RpGsLzcJRv-K@Q1w%PKjqGTzRJCW{8T4K
z1*tDjsIS>KY^ZK>_7Pp{=0B^0ww+f8E?p-0Y~G}-J!AkEZ?%VTkWu{dH`sRQ&$cr7
zO&RFh(KE1b**Mb{F_O$;LVXzj)hmVAM!ngVp$FBOK9f0$`y@JfAO=Og*`#X{J)yoe
za;<<nN>!QO^=m3dCMR*9<{Z_HOW&Xw6gNZJHEO@6W$;E-s#~huckNmw`352%oEsTq
z7uGtLQ^$|Fa{fHYe@8j`f9%YWLni!^`jADvUR_w<O&gR^Z420pz_C2Vud@A@B2M%<
zpXoiCPxtK0Hu3DtHt}e$Xi}>qn_jCYn-1UB)aN5U%Wt-j8?sB)Awpl;F6@Oa(|Z)+
zUQzNmKQCE0?mM_#y{aYuRzagFtv9frC9Vb8k^G2qYWp%*O3o4fo#n{?`02xk)D%+?
z>xs`e#4Qj*l6&L)*XP@Bl?`$`D3WVM$s2iQE8_ZWQYL<IK-DyO7O>9boB2)WGkreh
zGQ5VfX&&uaio2z_M#!7_P8ZSxhO^O)(&RzYKI7dF9#H$PTdNH3-kA+TY`yk~!E7AP
zNkyL0XA9uJeC{ma-&HRDBL~aM-y{RF738PFdUazxcK@VuKXg#-_0uj@1(wxUVr2S|
zaih4Xq!@WrVnaDSBeDL9KwKoeS9dma(ge<L&1%8@@Ikfv{$ErfA5Gw+W5SvEx2)f!
z*eTrtaj{Eh&(PlBU*+IGaSE91$=}kR$sS@&8jU+rp@l=aYEK?(t37|F^Tm2KaPBN2
zaQ<vQaNcY_05QP8=~MXN@uT_L{rhkcIZYKYSWm=@>siTsv9xc|8EIY%%)v`%P80sU
z*7z-s411rGrw$$XH~6jFk8`OaYY-nHZxA0Tr?HQ#SydK?y;&T^%y1Xb=r8C#k99pM
zHhXEa?=aOP{1;Cf@b44xTaX)bfdACH;(uQ}QjCA6ZgT_vQzZZWB7WN^zMVRWIYoC!
zrTpxrZRKOHO!;{>e)(;>WXf+I;>+OP58*#xi(7ohx6^d5C@b*o_|rU{WgiXb%VKY2
z@DX(1?~@_@*}kw%ZKCQhGYW@sv&R=1X+ja#IVDa$8un!^V&QA%&lLt@Z7s%Yx?+tz
zv*<%Eo$i~KqhBPe=7{&2@E<D2{-3enH~CmYyC(mHbgOV$$6nWbIcYqX=v+ZYcP&{~
zp)bZ<Mch)sV4aV+lJ3#HJKBe!X(K;m$tT{ueog!M-d*iquV3rL`v9{>7jkqKXN<X&
zKR;+sQgY%rVlkyhMR^;amRSJ#pE+^hS9P;;<libh*o+_hG&%Vc%$w5Uxw8!TWxzkJ
za0J&9c7|f$xZ}jM!kRxT#D}4AQ^*+o6j~oZ7FPIe^v8CN(3+msX25vd8o%WY-_D-c
z|91S;rigzY?n&(YcAfI+qeohS=dI*_4`+jrm1YyxVH6|9d6E1e{Ke~+FLjR*)1|#2
ztvRgl8^-zVV?Z{Y)&{_M5@Zm%Me@czApe}L{B7kx`0w7huDN>Yg67rlFLg_1PUA^m
zr22!qxvFhziiLTTCvv2>CC86yUcG#wTaUXU`Ee2Ed&RS`AH&^qU7JYbe%qFpbWYHm
zB-;p#r$zi0$y@Ln^}p=;L2OIJkGqSdi>7|U_knDGhwl>ghxC8zs+Gd@4~KG7hY#lR
z8`hWKymDD{WZz!(#DZSzMBFRufcx$<aSv%P&PMRlFG0+ILhtTunt0#YW-O>*q(5h{
zwjmjpgTLg>n?H4nr+vy%++4&gedg8)WX|9`f$RyzbUWd!iSAu2`1E6Lc>6rXz1z1m
zPai+jK6>y#`v7+p^TI=!FUJ+}FP=WpzJB$Gj_OY6*Oz_#@S*k@&ZmCIos1{Y!DGMt
ztfDoV$V)mFEx;4wsbuAHOkWHBvihU%j_;Q-A63_|R~v;pW$8XR6PL;Zdygcn<w&m$
z`FN+ZCc_;9<k1;ma?O8$s>za&Htxr8SJB%|mJJ`2g8PqDS1d#23}tD*i?)ny(mu!0
zU^Ay<oNz`>=MEHaKLpCK)f@30F>SibTL&~5bc6Zpjdstr&8lJfd4{{)R{fCn>2IZ_
z_E|b_u@~}pmwkl$VW;3r1%apd*$L2KoDF)5Sj&5&Y-Lb5Xfeiu`xE1i|5;GxhEYri
zd|~UP<NI&>Wn&x7<;&zd%DOd9lpoo<TZQ|oq${sL6F>o=GBGow{z(6#R}!T{9Xj`K
z3OWLkzkL2&J00;jTFaXCM=JX=c%*VQrR|iV^VPPvQ?d$Yws3}s^_9K`KZ>7+l_zI2
zRCB_9X|z)lG!S$g_Cia0oXG<VxHLO{|NX|rQI>;qop~Qk<ZoQLq(OLr2aoST?Lhx9
zppjxj+UC_hU^}^JkH&)H(4(MJ&lIo)<SS_1V|Og1<6=%5b&vEX8EfltxcftPLa7vt
z@x0Q~j%c4`C534R&D*kUI%uaDwGE>94vp`hxI3mTo-<2mga3UYyJXgFGiGZYO2vKp
zZny)wXZtpUx0SRXq`M_wf=qL>EcAEDu>-Z-EbyZ^M_bSitxm_?zJ66ZAOCYh`XKhf
zN|#^{JLA4Q{htluXC!Z$n-rHwrn@{A#VCu`48-P>^i`TRmM@!QZpV}WZyF04ZyNXC
zl!BlmUpo$W>&Oon`{9WHQF50pm@=7vj`MH)&ko7_XJBrGXAL8la(Ml{Pqt7E@8vW_
zM>o_DiXA?tc*$PeneWvkNlw1wBKEC_k&+$12HQe*pqgC<WirchESn>(RQ^|UNxQ`y
zsSlMvh*Rm8VUEA}<HZZDLard+c>~6L3i8P}+O2JF+mv{xLXt|x^3qz;w4|U_vTQB-
h42;!58K7T4D?pK;^5g68&dv(Ke_#G9f&YyJ{s)l+qZ9xD

diff --git a/exploratory/app.R b/exploratory/app.R
index 009ee238..0514d799 100644
--- a/exploratory/app.R
+++ b/exploratory/app.R
@@ -329,6 +329,7 @@ app <- init(
   ),
   header = tags$span(
     style = "display: flex; align-items: center; justify-content: space-between; margin: 10px 0 10px 0;",
+    tags$head(tags$link(rel = "shortcut icon", href = "nest.png"), tags$title("Exploratory Analysis Teal Demo App")),
     tags$span(
       style = "font-size: 30px;",
       "Example teal app for general dataset exploration with teal.modules.general"
diff --git a/exploratory/www/favicon.ico b/exploratory/www/favicon.ico
deleted file mode 100644
index c9351d3f8d96b38a556436f999d06617a6b5715b..0000000000000000000000000000000000000000
GIT binary patch
literal 0
HcmV?d00001

literal 15406
zcmeHOcU)A*_6Pe@njpPfKtQAyML<D8Y}mVE>?J66UrbDFiLu3Q6l*lGC&oNACiY&i
z$KJb%Chpz6Wjnv`+1<N)cUgIw-~0Xbd;9qu?%cUEbG~!t%sDf21_uX6hl&nvZVq^c
zI1H`i;E?R#;1CjGe6L^A!C?*ZVq;C;!yFt=dOA4NM;TN>4P!nYc7KkJl59$ws8nAX
z^!(wYjW3@)U0YgO>Srh=ewS3Cq$5=_HH5O&1&*7tanbxgGyU9|te{%VrsYdssg$Zo
z`qI*BRE(OD{4pd^&k;Pk9{TCWJ6#f@<ZS{gF$vWjWbq(+c1w+uAKSa<Cfeu#ax}0r
z^VG-PxOCy*=&t$fpa#_yMTt)Aqp7vEg$W+)$dqvQ!?gNrbFb=5d<{q0_}<;v+rM4e
z2Y%56gMP>N?R}QwR#ny}pfXbsnZYH;4CP|FE)rt9&E*4&cdI-OT+k%-nj`e@`k5-x
z*^^0iuO>Tl@W5STZ3l-PYm1)~&iLRUW^m7Sn*7$OEb*eeIJYXYSZ`NZd<_R#)6^(M
zqplP9`09?bT^rZk6YFnZW2_(Ddm5kUR82O&l?PuK>!cVS=cMRcznY?VST)7qm~ggD
z?i3-cdry|y-TBSh2L?GpdOKFHd`>coXxUtmkTr!*_3Ows_G_<5bI()c1$JROMy*rD
zwkqUYPn^&+s2j)_>aSb-$RKz$vVHZ67Y6)jBf4Gy6FgxIA2eYsU%y?RB0RsPBBFJ3
zMXXOvLp?(|^zDcBtDlJYx2;<7($HV@F~iS|Y3x};)-=$AX&YIa$pydcU@s=a$Bjua
z$%Oj<{km1pjP)HI4E4dA+FtSb41Ukn?^NF|TO@qDY_UM&wRhVV)q=?r`Np-J3}r}`
zJJuAx5bOWEeajzW+uK(cD_70=LRi0OzVPFQ^~#M)7YI{F4Ca2_`GcycYX=4KNOY<w
zJMhDfKS<}O4V_Nc_T>Iwuk~({BBy>NpnYmD!MP%y6=aEcQXNVU%x$VTf8yBr(o%i4
zkw5;T6@96`ibky-{r#HampOI(jj}>Jgq7NB6IqAZz3JO0TCH|4^cORheyC_bV0@#$
zXvg!fSFe^Xo;q2P>Rw%z?(HI5HT!d!T*l1C{BSjvr%J|(#(6+B4YLprV}7Y#AAR@Q
zwV$8dySD@VtVbp2C#h+AGi3kmKV)Y@Kutl8h7=Oz{fzL+l#phd(?|fj7ibx14hYsx
z@-r8tJmZU1mZa$WB&iMXstPL7>-Db>{Pd&h)WQ8~jLmc84FH+OPh@N2YKOULIIP%P
zidj-(0krK1$^+kPx2|5*3~ieWorNxfin?`TAKksH#rJcd40COBLTu$-pVk%8W_{@O
zuD@Qt(ta^!B%kbB#h|~UZJ=i(kLt38pM1nC7)FEgo1kaGR@}@@B4JKb3CW8|C}IxU
zaRbd!sZ_$Iua_#b0zHkkpXQIjE*Nd86h}^-0EXtbR;^K>?x!Fp5r<jkA_MU$7BD@5
zy%OpT!1MV@jBl6ZhH}y8434g@7}($+274jpYn$$!(MWOO)Jc-X15kHR1sgVHUx5eZ
z(lMXUKDv8HJGy%(mh4Tci=%7=Z2pQ4wFK?r`g--^2>pg0KEmqGUc#Il4}MsTlOn^t
zf=MPO*+52Qn<ft^;9fj^OuBIx_9dY#Q)3Qz2IKp8G=2*|`6o{{hWa!q&6V9=;Hw;)
z?83J4tHhix3RWL03{t1KRFtK<dNTRJ@rp6odHmO-I;b}G%vFs|uFKLls%wxL@TYmX
z$cn%GT;MrQ4IC>$K2jVs49L5(Z^t$jjh|SzTivSi<?TIrQT9pBK}?4Chg`P*5+N&W
zjga1CgEBd<Sa7?=>MKCfF$1?Kv+K^}yG1Nkc8mB*nd%lJH;;?S)}HwF7s7DBWEIUY
zkauHnUY6Ckj!AZ6M<ll5TLi9BHf!*$GH%Q*P3Y3Ss(^(Hg@7++@F63IbM*>(velkG
z(K$kRe()`Uvu5%EOBM;^b}!R@Ie3e%Nv+QC`NlD!eoW}wlLfEiW?eKPK;F$kdD#lF
zuY^0zt)lGX{JpyN5h{JXkLC$cX-V>U=StS&jB+uMS!BA=M~VH74f19h&;3kDopMY~
zc0!ct_+DL!|4DPlE&Oi{YME{9zX@-HE=63};<d^R1#!x0Sv9%gvCf9?Qj8)$@oD&G
zsz0DXEk*w4CAx^_nF>(`W4pB{{-<rH9`bGtY}pKc)+np!2KAV_3-+r?|C6ErS0;sO
zp3SJM9h2nDHg=Qhy2S>NKNWGb5Al`{N?4<gP3x=(9XgN`F&A~oC;n&4_FsQ{0P%-B
zi9#{9>Djwgq;piaam|Xd43CPkAq{INR(AB{zv<>Jtm)z<eAU{6pPpTl`!v&yo0I3x
zujw2rEb1^()1})nO})a;c)u0Pm9fFzCcp0}8)@WUV#^<P{my{gre^+8jpF4Y)8+};
z0ZW7opNV{mYot7(MrCvV2xF2{1z8Jk7p6x<4m+apJ$;|(^{Tw!xk9R2lH94JL_?FR
zZvVc9b)lhOkk5ym^2sh<u;q`uJN<Jq&GM)6;XOOE{>zsL4V(64GkiyJnaNv~nT@_z
zX8X_Qv-}qj30Z!#giN0zzGdh>b#mPtMcsbAQD>>(yYg$L`w!byu~_RHc%wZU+Yuew
z68}rK{L%lrA2iP}_g}0N=jAG^J#+vUuy}z`?b$P3RZ!3;llb7tlel2`o4~nW@&OCy
z3jvE43PIC8<|DJ3C}@s|<1Mx$K8Iu73SV}`mOn7r<!`759i(Simv(Hu9v#`ZAWtSX
z)R&11tR;&lUuc?NA`j_PIv*&1Si4;6|8GYAm<6VZ08ID#Wv83`j76uZ4z=;N{up^%
z=C`z*G;P2H`44TIqkyTpVPtEWg^>S!;xENc>Ff}1rgKuXA-`inq&y3{+$SSNKD1SH
z#ZavObL#~$MP1voqdK=`Q)*T-$f<wx3`Mf5QCDp-3~7@?{l95P{`U*Anpo){@t;`G
zgWdQ2c2yQ+{`!yKbz^#TQCz=#QS<8$J5<|>S12d-@563gxm<bn*kScIi{}ee=he%X
z+Uy`NyW>JO4*kDv7Q6`v`v1VdAN8d&ApXCA*T1%IQ891cfPZJj^-C8un^%0ToLN-J
z8GP)(0`|_etJ<YAKEobP%HPzM*)BQC`nSkbz}Mb|3@pM22JnAakd<bZzbLnfeS5IX
zo4<7XFqe+(`IpMTAN^lCZ3;iSTSv&f9sB6sT`lQVBKd}Dj)wkc8TxPJFSbS4`Za4J
zhpyeX<&XD=3qPC8C%IVr7g~c{yLds9=~q*>d+TP^$j<qSl9R{P_wU@%+`RUirWgFq
zqx<)?x3AyOd@+6uclXvUjSO<SfBUwEFiB<E$i0Sa?ff|c@v_4|AM35##Ebl(xKB3h
zw_xX}9olcvJM}ZkrLrv1)rghWqm64h8@>^K`bI=$sa^u=kMGl+eSH5ut%J^j(rxvR
z-jV+g&;;!J-u$}rdsQ3wASwR0rVZn3nS;`Dz0#BA=Z+s$V|<_L^`-sLenoq{rFqy-
z_@LZMS}(1cHyiff&8U+SJ(BXUm(InSU?<kW8jXhh-3*Y6Xltar%1fh89O%FwFP>{Z
z8$O7$)(vYLC1PmgQA4(9>c_mCk&&!7gF?&WA^m2%CZliA)e2~%6X?!w7tU)2wrpzF
z4Us4Ll?1GHC1ZRB<uS&lDP}d(q#WNZP1VsJ>BdCTjeW2OZKCQzH;gi%IZ$%^80`a}
zq703(WgjSI@xE~E;6~fNpkh%se)wjc^%#qNHuJU9i22*QCd#$}3<<EK2l14QaoKY3
z%HjWOIXWl75v@Z%kfTEg{+9pyk4V_m2*$1=C>S&aG!jI*WwTHHk8mu%Q}6o~kbslU
ze@1}LC{-$rR-;iNeF#(la(&+>|8L7%WC(0@wvY!p37^2-gTMUe2YuKXqegJgpFGjR
z2f{y>{sL+YvKb4Yv@}%)ayg&Ml%<UKDGw}FKw+S-aaPH_{{45|rWMPD+`2&~AL%H|
zj|rFW-u#{F&7ZIJde}*n{Tvhws{HP}$|-5{$>!B=A1M?3L$Kx|9ls-I7~QV#HYf+=
zG{btycuryTBSu?JYl*^6ZCN@OhK<#s&Slgcji>Kh8N9~_BW4@q(pO0ue5-+Pf6#U4
zig5Al8O@M3xoi_}S3}G~^nb?noy8y1J~-3gof+G+D|`3m4GsJfk2Xp`?Ln2_1Mc4{
z3LfMulR-a1SJY1)+}AC@UM<bj#cFLW;<x)Wt#vX3JebvUXA3W%K85SmDbeP7P&BB@
z-vU=oCA3NQFdno3@_vCBmv+PAh01QJ@p4+{+r^3X<-g0PwJ7!$iXCfLEB}1;N(;Yv
zA3SJH76HN>mkjz_@s(c&?bHDM6FPGbGS?p7yGPx(X=6nr#H6J73KN_aI|_V-VX@V%
z*5=YO_R^$dh_f(5TDMS?oH|MCSvp6%4jKX~cPz?7j=IjE)}Zrhl}dl}@+B?VLvd~<
zIXTL*JS#H!K~>}<;%cz`S7G|nr4gmfyfFQ=EH`#siVHgkXR=-ERF${(t1Qo|Rgp<?
zk?xl*^Fr)bGGcmPj2Xo}ymK3F1JlE}j>*Kc`dh_MAJ7r8FDOfKfGp5@omThfgWI>Y
zOQ(Ozx5c{9utx#zUSZYb%kn+>t$loj?|S+On|t{PszvqnrAs18`32$ng>5{zxp^Ku
z${5a)*5gcRLw9ds70z|1Hgn^sPf5;Y@zYo&Vo%dKF<QQM-W-Aa2Ilw+U|9xA0oh-F
znmUK?-q4eUc)k#LLAQ0)3ZX+xgq-wLl+mQduH5mFLF!M^UAZ>?mE|~JW*WIV%I3Co
z=S#+hs6TJ+&e7N;IyuWy-6G{py>b+-0t?u7nIrffgGUMTdW=%<8#Yk4rB8F!2a$dX
zI;#@fmOd%IO7m+E_SYDH+A}-?O~asA$8;nEgYP>@S1zA94SSelW5*pJ_p0*C6GJs!
zYF9Pyr{k+5URT3~Np`6#Z|vSi(bRVupA))E)iUC|CO77SCOhU=bxQwpYNwZ4eFa$k
z;GKWyn#KR1Y88G^-8Jg8repYzs#ZZ``9^Mt1=O&fQ`8^w8{>L+SKPjOMbxSJ2FRkq
zSmQr%?ZO2O>55bqVw%Q(US2IO$=Q!dbn*t~P$t7`2$vPOTxgo~qcXYsQB~Bq1FAZ+
zb}57BuTustT88tlMS|PWBWg#Tu9O^JW!W2@FV05-XV2m5jGM~m44NW*HE51zZrk<R
z)*-WmBxmC}yU0^~c1ezrKYRR$#$lBR*|rP#c7XOf&Bb#~8ymQ&tp~rTT@z)iIwhJm
zb$`>eY<ON1UwA?7zx$5X<M<Vg|B7Ov&WNF0L|$`66!<lWtSgTW4`FH#8^~3Xz0u<^
zq}1)mVRb}Csv<HoO<r$6Kh}TQQX%fr3GK{dTS~tuSgy$p-mXe;D(g@3>IF0RZr&vP
zYef9!r>P_Oc98IA+rtmP(;D&qJ;TTAIyKalwvW)1hHbd2@he^-MCLY=$JI2(MMQa7
zJ+YpMfPJiubD@~}p=HK4&d);@I(8J7RB}v{HvXn2)vu+M4W@aWhx4>M*RPRLT4%8~
z)C0>X0RN$q6NKNZ3=i6qrue7Hb7x%C^&fXZKOpHVReaqrCeaj=5%C(=4DekhKP%?j
zeVWU_7U4`~bf<<~-#usbVMSB<Si||J#Rs-TT>sY9%M|z8V34~7w%LB-+u?I>!5<gk
z%LHsbp$T5FT<F!TK6`9b9rfnkKFXtof$AX*?fWcqUu^Wy+!r%`V}HNQiRM4Zzo83U
zv0WK$iZ_X6TjKpD&i5eyjZ&E#`eOP6{723mJ8F`@#XiSD79mro^YvzJQO47H0eqXm
zADtf`tkJ{fA4lA*t$!7HlbRLaBP=pA;wRZ!@<cr1lggyJR+M!QYoI7>yjz<VTF3<~
zTp-Zg5zEk%&V8<5yh!r@PKsHYCj4iQ9Vw$f(a^oxYfq>%;?^p~vkhvK<i54HuX1Gv
zFJWU3Z-M+2-9;%%bY?rl#!?@X;its&HmXDYON6daUps|Xk&j9C<;FJ|q#T&=jXJ}-
zFB{!3LhirvYazyF4ibJk0|ds+Qp|?5W&R#Hd-QM_`8UA+BY4?XWp2as>c;NvFt?0j
zLs%$=O8zR-qaxD*c*dqUv&9{~g#AMUR2RpGsLzcJRv-K@Q1w%PKjqGTzRJCW{8T4K
z1*tDjsIS>KY^ZK>_7Pp{=0B^0ww+f8E?p-0Y~G}-J!AkEZ?%VTkWu{dH`sRQ&$cr7
zO&RFh(KE1b**Mb{F_O$;LVXzj)hmVAM!ngVp$FBOK9f0$`y@JfAO=Og*`#X{J)yoe
za;<<nN>!QO^=m3dCMR*9<{Z_HOW&Xw6gNZJHEO@6W$;E-s#~huckNmw`352%oEsTq
z7uGtLQ^$|Fa{fHYe@8j`f9%YWLni!^`jADvUR_w<O&gR^Z420pz_C2Vud@A@B2M%<
zpXoiCPxtK0Hu3DtHt}e$Xi}>qn_jCYn-1UB)aN5U%Wt-j8?sB)Awpl;F6@Oa(|Z)+
zUQzNmKQCE0?mM_#y{aYuRzagFtv9frC9Vb8k^G2qYWp%*O3o4fo#n{?`02xk)D%+?
z>xs`e#4Qj*l6&L)*XP@Bl?`$`D3WVM$s2iQE8_ZWQYL<IK-DyO7O>9boB2)WGkreh
zGQ5VfX&&uaio2z_M#!7_P8ZSxhO^O)(&RzYKI7dF9#H$PTdNH3-kA+TY`yk~!E7AP
zNkyL0XA9uJeC{ma-&HRDBL~aM-y{RF738PFdUazxcK@VuKXg#-_0uj@1(wxUVr2S|
zaih4Xq!@WrVnaDSBeDL9KwKoeS9dma(ge<L&1%8@@Ikfv{$ErfA5Gw+W5SvEx2)f!
z*eTrtaj{Eh&(PlBU*+IGaSE91$=}kR$sS@&8jU+rp@l=aYEK?(t37|F^Tm2KaPBN2
zaQ<vQaNcY_05QP8=~MXN@uT_L{rhkcIZYKYSWm=@>siTsv9xc|8EIY%%)v`%P80sU
z*7z-s411rGrw$$XH~6jFk8`OaYY-nHZxA0Tr?HQ#SydK?y;&T^%y1Xb=r8C#k99pM
zHhXEa?=aOP{1;Cf@b44xTaX)bfdACH;(uQ}QjCA6ZgT_vQzZZWB7WN^zMVRWIYoC!
zrTpxrZRKOHO!;{>e)(;>WXf+I;>+OP58*#xi(7ohx6^d5C@b*o_|rU{WgiXb%VKY2
z@DX(1?~@_@*}kw%ZKCQhGYW@sv&R=1X+ja#IVDa$8un!^V&QA%&lLt@Z7s%Yx?+tz
zv*<%Eo$i~KqhBPe=7{&2@E<D2{-3enH~CmYyC(mHbgOV$$6nWbIcYqX=v+ZYcP&{~
zp)bZ<Mch)sV4aV+lJ3#HJKBe!X(K;m$tT{ueog!M-d*iquV3rL`v9{>7jkqKXN<X&
zKR;+sQgY%rVlkyhMR^;amRSJ#pE+^hS9P;;<libh*o+_hG&%Vc%$w5Uxw8!TWxzkJ
za0J&9c7|f$xZ}jM!kRxT#D}4AQ^*+o6j~oZ7FPIe^v8CN(3+msX25vd8o%WY-_D-c
z|91S;rigzY?n&(YcAfI+qeohS=dI*_4`+jrm1YyxVH6|9d6E1e{Ke~+FLjR*)1|#2
ztvRgl8^-zVV?Z{Y)&{_M5@Zm%Me@czApe}L{B7kx`0w7huDN>Yg67rlFLg_1PUA^m
zr22!qxvFhziiLTTCvv2>CC86yUcG#wTaUXU`Ee2Ed&RS`AH&^qU7JYbe%qFpbWYHm
zB-;p#r$zi0$y@Ln^}p=;L2OIJkGqSdi>7|U_knDGhwl>ghxC8zs+Gd@4~KG7hY#lR
z8`hWKymDD{WZz!(#DZSzMBFRufcx$<aSv%P&PMRlFG0+ILhtTunt0#YW-O>*q(5h{
zwjmjpgTLg>n?H4nr+vy%++4&gedg8)WX|9`f$RyzbUWd!iSAu2`1E6Lc>6rXz1z1m
zPai+jK6>y#`v7+p^TI=!FUJ+}FP=WpzJB$Gj_OY6*Oz_#@S*k@&ZmCIos1{Y!DGMt
ztfDoV$V)mFEx;4wsbuAHOkWHBvihU%j_;Q-A63_|R~v;pW$8XR6PL;Zdygcn<w&m$
z`FN+ZCc_;9<k1;ma?O8$s>za&Htxr8SJB%|mJJ`2g8PqDS1d#23}tD*i?)ny(mu!0
zU^Ay<oNz`>=MEHaKLpCK)f@30F>SibTL&~5bc6Zpjdstr&8lJfd4{{)R{fCn>2IZ_
z_E|b_u@~}pmwkl$VW;3r1%apd*$L2KoDF)5Sj&5&Y-Lb5Xfeiu`xE1i|5;GxhEYri
zd|~UP<NI&>Wn&x7<;&zd%DOd9lpoo<TZQ|oq${sL6F>o=GBGow{z(6#R}!T{9Xj`K
z3OWLkzkL2&J00;jTFaXCM=JX=c%*VQrR|iV^VPPvQ?d$Yws3}s^_9K`KZ>7+l_zI2
zRCB_9X|z)lG!S$g_Cia0oXG<VxHLO{|NX|rQI>;qop~Qk<ZoQLq(OLr2aoST?Lhx9
zppjxj+UC_hU^}^JkH&)H(4(MJ&lIo)<SS_1V|Og1<6=%5b&vEX8EfltxcftPLa7vt
z@x0Q~j%c4`C534R&D*kUI%uaDwGE>94vp`hxI3mTo-<2mga3UYyJXgFGiGZYO2vKp
zZny)wXZtpUx0SRXq`M_wf=qL>EcAEDu>-Z-EbyZ^M_bSitxm_?zJ66ZAOCYh`XKhf
zN|#^{JLA4Q{htluXC!Z$n-rHwrn@{A#VCu`48-P>^i`TRmM@!QZpV}WZyF04ZyNXC
zl!BlmUpo$W>&Oon`{9WHQF50pm@=7vj`MH)&ko7_XJBrGXAL8la(Ml{Pqt7E@8vW_
zM>o_DiXA?tc*$PeneWvkNlw1wBKEC_k&+$12HQe*pqgC<WirchESn>(RQ^|UNxQ`y
zsSlMvh*Rm8VUEA}<HZZDLard+c>~6L3i8P}+O2JF+mv{xLXt|x^3qz;w4|U_vTQB-
h42;!58K7T4D?pK;^5g68&dv(Ke_#G9f&YyJ{s)l+qZ9xD

diff --git a/longitudinal/app.R b/longitudinal/app.R
index b5a578c2..93e22c2d 100644
--- a/longitudinal/app.R
+++ b/longitudinal/app.R
@@ -759,6 +759,7 @@ app <- teal::init(
   ),
   header = tags$span(
     style = "display: flex; align-items: center; justify-content: space-between; margin: 10px 0 10px 0;",
+    tags$head(tags$link(rel = "shortcut icon", href = "nest.png"), tags$title("Longitudinal Analysis Teal Demo App")),
     tags$span(
       style = "font-size: 30px;",
       "Example teal app focusing on analysis of longitudinal clinical trial data with teal.goshawk"
diff --git a/longitudinal/www/favicon.ico b/longitudinal/www/favicon.ico
deleted file mode 100644
index c9351d3f8d96b38a556436f999d06617a6b5715b..0000000000000000000000000000000000000000
GIT binary patch
literal 0
HcmV?d00001

literal 15406
zcmeHOcU)A*_6Pe@njpPfKtQAyML<D8Y}mVE>?J66UrbDFiLu3Q6l*lGC&oNACiY&i
z$KJb%Chpz6Wjnv`+1<N)cUgIw-~0Xbd;9qu?%cUEbG~!t%sDf21_uX6hl&nvZVq^c
zI1H`i;E?R#;1CjGe6L^A!C?*ZVq;C;!yFt=dOA4NM;TN>4P!nYc7KkJl59$ws8nAX
z^!(wYjW3@)U0YgO>Srh=ewS3Cq$5=_HH5O&1&*7tanbxgGyU9|te{%VrsYdssg$Zo
z`qI*BRE(OD{4pd^&k;Pk9{TCWJ6#f@<ZS{gF$vWjWbq(+c1w+uAKSa<Cfeu#ax}0r
z^VG-PxOCy*=&t$fpa#_yMTt)Aqp7vEg$W+)$dqvQ!?gNrbFb=5d<{q0_}<;v+rM4e
z2Y%56gMP>N?R}QwR#ny}pfXbsnZYH;4CP|FE)rt9&E*4&cdI-OT+k%-nj`e@`k5-x
z*^^0iuO>Tl@W5STZ3l-PYm1)~&iLRUW^m7Sn*7$OEb*eeIJYXYSZ`NZd<_R#)6^(M
zqplP9`09?bT^rZk6YFnZW2_(Ddm5kUR82O&l?PuK>!cVS=cMRcznY?VST)7qm~ggD
z?i3-cdry|y-TBSh2L?GpdOKFHd`>coXxUtmkTr!*_3Ows_G_<5bI()c1$JROMy*rD
zwkqUYPn^&+s2j)_>aSb-$RKz$vVHZ67Y6)jBf4Gy6FgxIA2eYsU%y?RB0RsPBBFJ3
zMXXOvLp?(|^zDcBtDlJYx2;<7($HV@F~iS|Y3x};)-=$AX&YIa$pydcU@s=a$Bjua
z$%Oj<{km1pjP)HI4E4dA+FtSb41Ukn?^NF|TO@qDY_UM&wRhVV)q=?r`Np-J3}r}`
zJJuAx5bOWEeajzW+uK(cD_70=LRi0OzVPFQ^~#M)7YI{F4Ca2_`GcycYX=4KNOY<w
zJMhDfKS<}O4V_Nc_T>Iwuk~({BBy>NpnYmD!MP%y6=aEcQXNVU%x$VTf8yBr(o%i4
zkw5;T6@96`ibky-{r#HampOI(jj}>Jgq7NB6IqAZz3JO0TCH|4^cORheyC_bV0@#$
zXvg!fSFe^Xo;q2P>Rw%z?(HI5HT!d!T*l1C{BSjvr%J|(#(6+B4YLprV}7Y#AAR@Q
zwV$8dySD@VtVbp2C#h+AGi3kmKV)Y@Kutl8h7=Oz{fzL+l#phd(?|fj7ibx14hYsx
z@-r8tJmZU1mZa$WB&iMXstPL7>-Db>{Pd&h)WQ8~jLmc84FH+OPh@N2YKOULIIP%P
zidj-(0krK1$^+kPx2|5*3~ieWorNxfin?`TAKksH#rJcd40COBLTu$-pVk%8W_{@O
zuD@Qt(ta^!B%kbB#h|~UZJ=i(kLt38pM1nC7)FEgo1kaGR@}@@B4JKb3CW8|C}IxU
zaRbd!sZ_$Iua_#b0zHkkpXQIjE*Nd86h}^-0EXtbR;^K>?x!Fp5r<jkA_MU$7BD@5
zy%OpT!1MV@jBl6ZhH}y8434g@7}($+274jpYn$$!(MWOO)Jc-X15kHR1sgVHUx5eZ
z(lMXUKDv8HJGy%(mh4Tci=%7=Z2pQ4wFK?r`g--^2>pg0KEmqGUc#Il4}MsTlOn^t
zf=MPO*+52Qn<ft^;9fj^OuBIx_9dY#Q)3Qz2IKp8G=2*|`6o{{hWa!q&6V9=;Hw;)
z?83J4tHhix3RWL03{t1KRFtK<dNTRJ@rp6odHmO-I;b}G%vFs|uFKLls%wxL@TYmX
z$cn%GT;MrQ4IC>$K2jVs49L5(Z^t$jjh|SzTivSi<?TIrQT9pBK}?4Chg`P*5+N&W
zjga1CgEBd<Sa7?=>MKCfF$1?Kv+K^}yG1Nkc8mB*nd%lJH;;?S)}HwF7s7DBWEIUY
zkauHnUY6Ckj!AZ6M<ll5TLi9BHf!*$GH%Q*P3Y3Ss(^(Hg@7++@F63IbM*>(velkG
z(K$kRe()`Uvu5%EOBM;^b}!R@Ie3e%Nv+QC`NlD!eoW}wlLfEiW?eKPK;F$kdD#lF
zuY^0zt)lGX{JpyN5h{JXkLC$cX-V>U=StS&jB+uMS!BA=M~VH74f19h&;3kDopMY~
zc0!ct_+DL!|4DPlE&Oi{YME{9zX@-HE=63};<d^R1#!x0Sv9%gvCf9?Qj8)$@oD&G
zsz0DXEk*w4CAx^_nF>(`W4pB{{-<rH9`bGtY}pKc)+np!2KAV_3-+r?|C6ErS0;sO
zp3SJM9h2nDHg=Qhy2S>NKNWGb5Al`{N?4<gP3x=(9XgN`F&A~oC;n&4_FsQ{0P%-B
zi9#{9>Djwgq;piaam|Xd43CPkAq{INR(AB{zv<>Jtm)z<eAU{6pPpTl`!v&yo0I3x
zujw2rEb1^()1})nO})a;c)u0Pm9fFzCcp0}8)@WUV#^<P{my{gre^+8jpF4Y)8+};
z0ZW7opNV{mYot7(MrCvV2xF2{1z8Jk7p6x<4m+apJ$;|(^{Tw!xk9R2lH94JL_?FR
zZvVc9b)lhOkk5ym^2sh<u;q`uJN<Jq&GM)6;XOOE{>zsL4V(64GkiyJnaNv~nT@_z
zX8X_Qv-}qj30Z!#giN0zzGdh>b#mPtMcsbAQD>>(yYg$L`w!byu~_RHc%wZU+Yuew
z68}rK{L%lrA2iP}_g}0N=jAG^J#+vUuy}z`?b$P3RZ!3;llb7tlel2`o4~nW@&OCy
z3jvE43PIC8<|DJ3C}@s|<1Mx$K8Iu73SV}`mOn7r<!`759i(Simv(Hu9v#`ZAWtSX
z)R&11tR;&lUuc?NA`j_PIv*&1Si4;6|8GYAm<6VZ08ID#Wv83`j76uZ4z=;N{up^%
z=C`z*G;P2H`44TIqkyTpVPtEWg^>S!;xENc>Ff}1rgKuXA-`inq&y3{+$SSNKD1SH
z#ZavObL#~$MP1voqdK=`Q)*T-$f<wx3`Mf5QCDp-3~7@?{l95P{`U*Anpo){@t;`G
zgWdQ2c2yQ+{`!yKbz^#TQCz=#QS<8$J5<|>S12d-@563gxm<bn*kScIi{}ee=he%X
z+Uy`NyW>JO4*kDv7Q6`v`v1VdAN8d&ApXCA*T1%IQ891cfPZJj^-C8un^%0ToLN-J
z8GP)(0`|_etJ<YAKEobP%HPzM*)BQC`nSkbz}Mb|3@pM22JnAakd<bZzbLnfeS5IX
zo4<7XFqe+(`IpMTAN^lCZ3;iSTSv&f9sB6sT`lQVBKd}Dj)wkc8TxPJFSbS4`Za4J
zhpyeX<&XD=3qPC8C%IVr7g~c{yLds9=~q*>d+TP^$j<qSl9R{P_wU@%+`RUirWgFq
zqx<)?x3AyOd@+6uclXvUjSO<SfBUwEFiB<E$i0Sa?ff|c@v_4|AM35##Ebl(xKB3h
zw_xX}9olcvJM}ZkrLrv1)rghWqm64h8@>^K`bI=$sa^u=kMGl+eSH5ut%J^j(rxvR
z-jV+g&;;!J-u$}rdsQ3wASwR0rVZn3nS;`Dz0#BA=Z+s$V|<_L^`-sLenoq{rFqy-
z_@LZMS}(1cHyiff&8U+SJ(BXUm(InSU?<kW8jXhh-3*Y6Xltar%1fh89O%FwFP>{Z
z8$O7$)(vYLC1PmgQA4(9>c_mCk&&!7gF?&WA^m2%CZliA)e2~%6X?!w7tU)2wrpzF
z4Us4Ll?1GHC1ZRB<uS&lDP}d(q#WNZP1VsJ>BdCTjeW2OZKCQzH;gi%IZ$%^80`a}
zq703(WgjSI@xE~E;6~fNpkh%se)wjc^%#qNHuJU9i22*QCd#$}3<<EK2l14QaoKY3
z%HjWOIXWl75v@Z%kfTEg{+9pyk4V_m2*$1=C>S&aG!jI*WwTHHk8mu%Q}6o~kbslU
ze@1}LC{-$rR-;iNeF#(la(&+>|8L7%WC(0@wvY!p37^2-gTMUe2YuKXqegJgpFGjR
z2f{y>{sL+YvKb4Yv@}%)ayg&Ml%<UKDGw}FKw+S-aaPH_{{45|rWMPD+`2&~AL%H|
zj|rFW-u#{F&7ZIJde}*n{Tvhws{HP}$|-5{$>!B=A1M?3L$Kx|9ls-I7~QV#HYf+=
zG{btycuryTBSu?JYl*^6ZCN@OhK<#s&Slgcji>Kh8N9~_BW4@q(pO0ue5-+Pf6#U4
zig5Al8O@M3xoi_}S3}G~^nb?noy8y1J~-3gof+G+D|`3m4GsJfk2Xp`?Ln2_1Mc4{
z3LfMulR-a1SJY1)+}AC@UM<bj#cFLW;<x)Wt#vX3JebvUXA3W%K85SmDbeP7P&BB@
z-vU=oCA3NQFdno3@_vCBmv+PAh01QJ@p4+{+r^3X<-g0PwJ7!$iXCfLEB}1;N(;Yv
zA3SJH76HN>mkjz_@s(c&?bHDM6FPGbGS?p7yGPx(X=6nr#H6J73KN_aI|_V-VX@V%
z*5=YO_R^$dh_f(5TDMS?oH|MCSvp6%4jKX~cPz?7j=IjE)}Zrhl}dl}@+B?VLvd~<
zIXTL*JS#H!K~>}<;%cz`S7G|nr4gmfyfFQ=EH`#siVHgkXR=-ERF${(t1Qo|Rgp<?
zk?xl*^Fr)bGGcmPj2Xo}ymK3F1JlE}j>*Kc`dh_MAJ7r8FDOfKfGp5@omThfgWI>Y
zOQ(Ozx5c{9utx#zUSZYb%kn+>t$loj?|S+On|t{PszvqnrAs18`32$ng>5{zxp^Ku
z${5a)*5gcRLw9ds70z|1Hgn^sPf5;Y@zYo&Vo%dKF<QQM-W-Aa2Ilw+U|9xA0oh-F
znmUK?-q4eUc)k#LLAQ0)3ZX+xgq-wLl+mQduH5mFLF!M^UAZ>?mE|~JW*WIV%I3Co
z=S#+hs6TJ+&e7N;IyuWy-6G{py>b+-0t?u7nIrffgGUMTdW=%<8#Yk4rB8F!2a$dX
zI;#@fmOd%IO7m+E_SYDH+A}-?O~asA$8;nEgYP>@S1zA94SSelW5*pJ_p0*C6GJs!
zYF9Pyr{k+5URT3~Np`6#Z|vSi(bRVupA))E)iUC|CO77SCOhU=bxQwpYNwZ4eFa$k
z;GKWyn#KR1Y88G^-8Jg8repYzs#ZZ``9^Mt1=O&fQ`8^w8{>L+SKPjOMbxSJ2FRkq
zSmQr%?ZO2O>55bqVw%Q(US2IO$=Q!dbn*t~P$t7`2$vPOTxgo~qcXYsQB~Bq1FAZ+
zb}57BuTustT88tlMS|PWBWg#Tu9O^JW!W2@FV05-XV2m5jGM~m44NW*HE51zZrk<R
z)*-WmBxmC}yU0^~c1ezrKYRR$#$lBR*|rP#c7XOf&Bb#~8ymQ&tp~rTT@z)iIwhJm
zb$`>eY<ON1UwA?7zx$5X<M<Vg|B7Ov&WNF0L|$`66!<lWtSgTW4`FH#8^~3Xz0u<^
zq}1)mVRb}Csv<HoO<r$6Kh}TQQX%fr3GK{dTS~tuSgy$p-mXe;D(g@3>IF0RZr&vP
zYef9!r>P_Oc98IA+rtmP(;D&qJ;TTAIyKalwvW)1hHbd2@he^-MCLY=$JI2(MMQa7
zJ+YpMfPJiubD@~}p=HK4&d);@I(8J7RB}v{HvXn2)vu+M4W@aWhx4>M*RPRLT4%8~
z)C0>X0RN$q6NKNZ3=i6qrue7Hb7x%C^&fXZKOpHVReaqrCeaj=5%C(=4DekhKP%?j
zeVWU_7U4`~bf<<~-#usbVMSB<Si||J#Rs-TT>sY9%M|z8V34~7w%LB-+u?I>!5<gk
z%LHsbp$T5FT<F!TK6`9b9rfnkKFXtof$AX*?fWcqUu^Wy+!r%`V}HNQiRM4Zzo83U
zv0WK$iZ_X6TjKpD&i5eyjZ&E#`eOP6{723mJ8F`@#XiSD79mro^YvzJQO47H0eqXm
zADtf`tkJ{fA4lA*t$!7HlbRLaBP=pA;wRZ!@<cr1lggyJR+M!QYoI7>yjz<VTF3<~
zTp-Zg5zEk%&V8<5yh!r@PKsHYCj4iQ9Vw$f(a^oxYfq>%;?^p~vkhvK<i54HuX1Gv
zFJWU3Z-M+2-9;%%bY?rl#!?@X;its&HmXDYON6daUps|Xk&j9C<;FJ|q#T&=jXJ}-
zFB{!3LhirvYazyF4ibJk0|ds+Qp|?5W&R#Hd-QM_`8UA+BY4?XWp2as>c;NvFt?0j
zLs%$=O8zR-qaxD*c*dqUv&9{~g#AMUR2RpGsLzcJRv-K@Q1w%PKjqGTzRJCW{8T4K
z1*tDjsIS>KY^ZK>_7Pp{=0B^0ww+f8E?p-0Y~G}-J!AkEZ?%VTkWu{dH`sRQ&$cr7
zO&RFh(KE1b**Mb{F_O$;LVXzj)hmVAM!ngVp$FBOK9f0$`y@JfAO=Og*`#X{J)yoe
za;<<nN>!QO^=m3dCMR*9<{Z_HOW&Xw6gNZJHEO@6W$;E-s#~huckNmw`352%oEsTq
z7uGtLQ^$|Fa{fHYe@8j`f9%YWLni!^`jADvUR_w<O&gR^Z420pz_C2Vud@A@B2M%<
zpXoiCPxtK0Hu3DtHt}e$Xi}>qn_jCYn-1UB)aN5U%Wt-j8?sB)Awpl;F6@Oa(|Z)+
zUQzNmKQCE0?mM_#y{aYuRzagFtv9frC9Vb8k^G2qYWp%*O3o4fo#n{?`02xk)D%+?
z>xs`e#4Qj*l6&L)*XP@Bl?`$`D3WVM$s2iQE8_ZWQYL<IK-DyO7O>9boB2)WGkreh
zGQ5VfX&&uaio2z_M#!7_P8ZSxhO^O)(&RzYKI7dF9#H$PTdNH3-kA+TY`yk~!E7AP
zNkyL0XA9uJeC{ma-&HRDBL~aM-y{RF738PFdUazxcK@VuKXg#-_0uj@1(wxUVr2S|
zaih4Xq!@WrVnaDSBeDL9KwKoeS9dma(ge<L&1%8@@Ikfv{$ErfA5Gw+W5SvEx2)f!
z*eTrtaj{Eh&(PlBU*+IGaSE91$=}kR$sS@&8jU+rp@l=aYEK?(t37|F^Tm2KaPBN2
zaQ<vQaNcY_05QP8=~MXN@uT_L{rhkcIZYKYSWm=@>siTsv9xc|8EIY%%)v`%P80sU
z*7z-s411rGrw$$XH~6jFk8`OaYY-nHZxA0Tr?HQ#SydK?y;&T^%y1Xb=r8C#k99pM
zHhXEa?=aOP{1;Cf@b44xTaX)bfdACH;(uQ}QjCA6ZgT_vQzZZWB7WN^zMVRWIYoC!
zrTpxrZRKOHO!;{>e)(;>WXf+I;>+OP58*#xi(7ohx6^d5C@b*o_|rU{WgiXb%VKY2
z@DX(1?~@_@*}kw%ZKCQhGYW@sv&R=1X+ja#IVDa$8un!^V&QA%&lLt@Z7s%Yx?+tz
zv*<%Eo$i~KqhBPe=7{&2@E<D2{-3enH~CmYyC(mHbgOV$$6nWbIcYqX=v+ZYcP&{~
zp)bZ<Mch)sV4aV+lJ3#HJKBe!X(K;m$tT{ueog!M-d*iquV3rL`v9{>7jkqKXN<X&
zKR;+sQgY%rVlkyhMR^;amRSJ#pE+^hS9P;;<libh*o+_hG&%Vc%$w5Uxw8!TWxzkJ
za0J&9c7|f$xZ}jM!kRxT#D}4AQ^*+o6j~oZ7FPIe^v8CN(3+msX25vd8o%WY-_D-c
z|91S;rigzY?n&(YcAfI+qeohS=dI*_4`+jrm1YyxVH6|9d6E1e{Ke~+FLjR*)1|#2
ztvRgl8^-zVV?Z{Y)&{_M5@Zm%Me@czApe}L{B7kx`0w7huDN>Yg67rlFLg_1PUA^m
zr22!qxvFhziiLTTCvv2>CC86yUcG#wTaUXU`Ee2Ed&RS`AH&^qU7JYbe%qFpbWYHm
zB-;p#r$zi0$y@Ln^}p=;L2OIJkGqSdi>7|U_knDGhwl>ghxC8zs+Gd@4~KG7hY#lR
z8`hWKymDD{WZz!(#DZSzMBFRufcx$<aSv%P&PMRlFG0+ILhtTunt0#YW-O>*q(5h{
zwjmjpgTLg>n?H4nr+vy%++4&gedg8)WX|9`f$RyzbUWd!iSAu2`1E6Lc>6rXz1z1m
zPai+jK6>y#`v7+p^TI=!FUJ+}FP=WpzJB$Gj_OY6*Oz_#@S*k@&ZmCIos1{Y!DGMt
ztfDoV$V)mFEx;4wsbuAHOkWHBvihU%j_;Q-A63_|R~v;pW$8XR6PL;Zdygcn<w&m$
z`FN+ZCc_;9<k1;ma?O8$s>za&Htxr8SJB%|mJJ`2g8PqDS1d#23}tD*i?)ny(mu!0
zU^Ay<oNz`>=MEHaKLpCK)f@30F>SibTL&~5bc6Zpjdstr&8lJfd4{{)R{fCn>2IZ_
z_E|b_u@~}pmwkl$VW;3r1%apd*$L2KoDF)5Sj&5&Y-Lb5Xfeiu`xE1i|5;GxhEYri
zd|~UP<NI&>Wn&x7<;&zd%DOd9lpoo<TZQ|oq${sL6F>o=GBGow{z(6#R}!T{9Xj`K
z3OWLkzkL2&J00;jTFaXCM=JX=c%*VQrR|iV^VPPvQ?d$Yws3}s^_9K`KZ>7+l_zI2
zRCB_9X|z)lG!S$g_Cia0oXG<VxHLO{|NX|rQI>;qop~Qk<ZoQLq(OLr2aoST?Lhx9
zppjxj+UC_hU^}^JkH&)H(4(MJ&lIo)<SS_1V|Og1<6=%5b&vEX8EfltxcftPLa7vt
z@x0Q~j%c4`C534R&D*kUI%uaDwGE>94vp`hxI3mTo-<2mga3UYyJXgFGiGZYO2vKp
zZny)wXZtpUx0SRXq`M_wf=qL>EcAEDu>-Z-EbyZ^M_bSitxm_?zJ66ZAOCYh`XKhf
zN|#^{JLA4Q{htluXC!Z$n-rHwrn@{A#VCu`48-P>^i`TRmM@!QZpV}WZyF04ZyNXC
zl!BlmUpo$W>&Oon`{9WHQF50pm@=7vj`MH)&ko7_XJBrGXAL8la(Ml{Pqt7E@8vW_
zM>o_DiXA?tc*$PeneWvkNlw1wBKEC_k&+$12HQe*pqgC<WirchESn>(RQ^|UNxQ`y
zsSlMvh*Rm8VUEA}<HZZDLard+c>~6L3i8P}+O2JF+mv{xLXt|x^3qz;w4|U_vTQB-
h42;!58K7T4D?pK;^5g68&dv(Ke_#G9f&YyJ{s)l+qZ9xD

diff --git a/patient-profile/app.R b/patient-profile/app.R
index 0be66c8b..ad2e9048 100644
--- a/patient-profile/app.R
+++ b/patient-profile/app.R
@@ -480,6 +480,7 @@ app <- init(
   ),
   header = tags$span(
     style = "display: flex; align-items: center; justify-content: space-between; margin: 10px 0 10px 0;",
+    tags$head(tags$link(rel = "shortcut icon", href = "nest.png"), tags$title("Patient Profile Analysis Teal Demo App")),
     tags$span(
       style = "font-size: 30px;",
       "Example teal app focusing on patient-level analysis of clinical trial data with teal.modules.clinical"
diff --git a/patient-profile/www/favicon.ico b/patient-profile/www/favicon.ico
deleted file mode 100644
index c9351d3f8d96b38a556436f999d06617a6b5715b..0000000000000000000000000000000000000000
GIT binary patch
literal 0
HcmV?d00001

literal 15406
zcmeHOcU)A*_6Pe@njpPfKtQAyML<D8Y}mVE>?J66UrbDFiLu3Q6l*lGC&oNACiY&i
z$KJb%Chpz6Wjnv`+1<N)cUgIw-~0Xbd;9qu?%cUEbG~!t%sDf21_uX6hl&nvZVq^c
zI1H`i;E?R#;1CjGe6L^A!C?*ZVq;C;!yFt=dOA4NM;TN>4P!nYc7KkJl59$ws8nAX
z^!(wYjW3@)U0YgO>Srh=ewS3Cq$5=_HH5O&1&*7tanbxgGyU9|te{%VrsYdssg$Zo
z`qI*BRE(OD{4pd^&k;Pk9{TCWJ6#f@<ZS{gF$vWjWbq(+c1w+uAKSa<Cfeu#ax}0r
z^VG-PxOCy*=&t$fpa#_yMTt)Aqp7vEg$W+)$dqvQ!?gNrbFb=5d<{q0_}<;v+rM4e
z2Y%56gMP>N?R}QwR#ny}pfXbsnZYH;4CP|FE)rt9&E*4&cdI-OT+k%-nj`e@`k5-x
z*^^0iuO>Tl@W5STZ3l-PYm1)~&iLRUW^m7Sn*7$OEb*eeIJYXYSZ`NZd<_R#)6^(M
zqplP9`09?bT^rZk6YFnZW2_(Ddm5kUR82O&l?PuK>!cVS=cMRcznY?VST)7qm~ggD
z?i3-cdry|y-TBSh2L?GpdOKFHd`>coXxUtmkTr!*_3Ows_G_<5bI()c1$JROMy*rD
zwkqUYPn^&+s2j)_>aSb-$RKz$vVHZ67Y6)jBf4Gy6FgxIA2eYsU%y?RB0RsPBBFJ3
zMXXOvLp?(|^zDcBtDlJYx2;<7($HV@F~iS|Y3x};)-=$AX&YIa$pydcU@s=a$Bjua
z$%Oj<{km1pjP)HI4E4dA+FtSb41Ukn?^NF|TO@qDY_UM&wRhVV)q=?r`Np-J3}r}`
zJJuAx5bOWEeajzW+uK(cD_70=LRi0OzVPFQ^~#M)7YI{F4Ca2_`GcycYX=4KNOY<w
zJMhDfKS<}O4V_Nc_T>Iwuk~({BBy>NpnYmD!MP%y6=aEcQXNVU%x$VTf8yBr(o%i4
zkw5;T6@96`ibky-{r#HampOI(jj}>Jgq7NB6IqAZz3JO0TCH|4^cORheyC_bV0@#$
zXvg!fSFe^Xo;q2P>Rw%z?(HI5HT!d!T*l1C{BSjvr%J|(#(6+B4YLprV}7Y#AAR@Q
zwV$8dySD@VtVbp2C#h+AGi3kmKV)Y@Kutl8h7=Oz{fzL+l#phd(?|fj7ibx14hYsx
z@-r8tJmZU1mZa$WB&iMXstPL7>-Db>{Pd&h)WQ8~jLmc84FH+OPh@N2YKOULIIP%P
zidj-(0krK1$^+kPx2|5*3~ieWorNxfin?`TAKksH#rJcd40COBLTu$-pVk%8W_{@O
zuD@Qt(ta^!B%kbB#h|~UZJ=i(kLt38pM1nC7)FEgo1kaGR@}@@B4JKb3CW8|C}IxU
zaRbd!sZ_$Iua_#b0zHkkpXQIjE*Nd86h}^-0EXtbR;^K>?x!Fp5r<jkA_MU$7BD@5
zy%OpT!1MV@jBl6ZhH}y8434g@7}($+274jpYn$$!(MWOO)Jc-X15kHR1sgVHUx5eZ
z(lMXUKDv8HJGy%(mh4Tci=%7=Z2pQ4wFK?r`g--^2>pg0KEmqGUc#Il4}MsTlOn^t
zf=MPO*+52Qn<ft^;9fj^OuBIx_9dY#Q)3Qz2IKp8G=2*|`6o{{hWa!q&6V9=;Hw;)
z?83J4tHhix3RWL03{t1KRFtK<dNTRJ@rp6odHmO-I;b}G%vFs|uFKLls%wxL@TYmX
z$cn%GT;MrQ4IC>$K2jVs49L5(Z^t$jjh|SzTivSi<?TIrQT9pBK}?4Chg`P*5+N&W
zjga1CgEBd<Sa7?=>MKCfF$1?Kv+K^}yG1Nkc8mB*nd%lJH;;?S)}HwF7s7DBWEIUY
zkauHnUY6Ckj!AZ6M<ll5TLi9BHf!*$GH%Q*P3Y3Ss(^(Hg@7++@F63IbM*>(velkG
z(K$kRe()`Uvu5%EOBM;^b}!R@Ie3e%Nv+QC`NlD!eoW}wlLfEiW?eKPK;F$kdD#lF
zuY^0zt)lGX{JpyN5h{JXkLC$cX-V>U=StS&jB+uMS!BA=M~VH74f19h&;3kDopMY~
zc0!ct_+DL!|4DPlE&Oi{YME{9zX@-HE=63};<d^R1#!x0Sv9%gvCf9?Qj8)$@oD&G
zsz0DXEk*w4CAx^_nF>(`W4pB{{-<rH9`bGtY}pKc)+np!2KAV_3-+r?|C6ErS0;sO
zp3SJM9h2nDHg=Qhy2S>NKNWGb5Al`{N?4<gP3x=(9XgN`F&A~oC;n&4_FsQ{0P%-B
zi9#{9>Djwgq;piaam|Xd43CPkAq{INR(AB{zv<>Jtm)z<eAU{6pPpTl`!v&yo0I3x
zujw2rEb1^()1})nO})a;c)u0Pm9fFzCcp0}8)@WUV#^<P{my{gre^+8jpF4Y)8+};
z0ZW7opNV{mYot7(MrCvV2xF2{1z8Jk7p6x<4m+apJ$;|(^{Tw!xk9R2lH94JL_?FR
zZvVc9b)lhOkk5ym^2sh<u;q`uJN<Jq&GM)6;XOOE{>zsL4V(64GkiyJnaNv~nT@_z
zX8X_Qv-}qj30Z!#giN0zzGdh>b#mPtMcsbAQD>>(yYg$L`w!byu~_RHc%wZU+Yuew
z68}rK{L%lrA2iP}_g}0N=jAG^J#+vUuy}z`?b$P3RZ!3;llb7tlel2`o4~nW@&OCy
z3jvE43PIC8<|DJ3C}@s|<1Mx$K8Iu73SV}`mOn7r<!`759i(Simv(Hu9v#`ZAWtSX
z)R&11tR;&lUuc?NA`j_PIv*&1Si4;6|8GYAm<6VZ08ID#Wv83`j76uZ4z=;N{up^%
z=C`z*G;P2H`44TIqkyTpVPtEWg^>S!;xENc>Ff}1rgKuXA-`inq&y3{+$SSNKD1SH
z#ZavObL#~$MP1voqdK=`Q)*T-$f<wx3`Mf5QCDp-3~7@?{l95P{`U*Anpo){@t;`G
zgWdQ2c2yQ+{`!yKbz^#TQCz=#QS<8$J5<|>S12d-@563gxm<bn*kScIi{}ee=he%X
z+Uy`NyW>JO4*kDv7Q6`v`v1VdAN8d&ApXCA*T1%IQ891cfPZJj^-C8un^%0ToLN-J
z8GP)(0`|_etJ<YAKEobP%HPzM*)BQC`nSkbz}Mb|3@pM22JnAakd<bZzbLnfeS5IX
zo4<7XFqe+(`IpMTAN^lCZ3;iSTSv&f9sB6sT`lQVBKd}Dj)wkc8TxPJFSbS4`Za4J
zhpyeX<&XD=3qPC8C%IVr7g~c{yLds9=~q*>d+TP^$j<qSl9R{P_wU@%+`RUirWgFq
zqx<)?x3AyOd@+6uclXvUjSO<SfBUwEFiB<E$i0Sa?ff|c@v_4|AM35##Ebl(xKB3h
zw_xX}9olcvJM}ZkrLrv1)rghWqm64h8@>^K`bI=$sa^u=kMGl+eSH5ut%J^j(rxvR
z-jV+g&;;!J-u$}rdsQ3wASwR0rVZn3nS;`Dz0#BA=Z+s$V|<_L^`-sLenoq{rFqy-
z_@LZMS}(1cHyiff&8U+SJ(BXUm(InSU?<kW8jXhh-3*Y6Xltar%1fh89O%FwFP>{Z
z8$O7$)(vYLC1PmgQA4(9>c_mCk&&!7gF?&WA^m2%CZliA)e2~%6X?!w7tU)2wrpzF
z4Us4Ll?1GHC1ZRB<uS&lDP}d(q#WNZP1VsJ>BdCTjeW2OZKCQzH;gi%IZ$%^80`a}
zq703(WgjSI@xE~E;6~fNpkh%se)wjc^%#qNHuJU9i22*QCd#$}3<<EK2l14QaoKY3
z%HjWOIXWl75v@Z%kfTEg{+9pyk4V_m2*$1=C>S&aG!jI*WwTHHk8mu%Q}6o~kbslU
ze@1}LC{-$rR-;iNeF#(la(&+>|8L7%WC(0@wvY!p37^2-gTMUe2YuKXqegJgpFGjR
z2f{y>{sL+YvKb4Yv@}%)ayg&Ml%<UKDGw}FKw+S-aaPH_{{45|rWMPD+`2&~AL%H|
zj|rFW-u#{F&7ZIJde}*n{Tvhws{HP}$|-5{$>!B=A1M?3L$Kx|9ls-I7~QV#HYf+=
zG{btycuryTBSu?JYl*^6ZCN@OhK<#s&Slgcji>Kh8N9~_BW4@q(pO0ue5-+Pf6#U4
zig5Al8O@M3xoi_}S3}G~^nb?noy8y1J~-3gof+G+D|`3m4GsJfk2Xp`?Ln2_1Mc4{
z3LfMulR-a1SJY1)+}AC@UM<bj#cFLW;<x)Wt#vX3JebvUXA3W%K85SmDbeP7P&BB@
z-vU=oCA3NQFdno3@_vCBmv+PAh01QJ@p4+{+r^3X<-g0PwJ7!$iXCfLEB}1;N(;Yv
zA3SJH76HN>mkjz_@s(c&?bHDM6FPGbGS?p7yGPx(X=6nr#H6J73KN_aI|_V-VX@V%
z*5=YO_R^$dh_f(5TDMS?oH|MCSvp6%4jKX~cPz?7j=IjE)}Zrhl}dl}@+B?VLvd~<
zIXTL*JS#H!K~>}<;%cz`S7G|nr4gmfyfFQ=EH`#siVHgkXR=-ERF${(t1Qo|Rgp<?
zk?xl*^Fr)bGGcmPj2Xo}ymK3F1JlE}j>*Kc`dh_MAJ7r8FDOfKfGp5@omThfgWI>Y
zOQ(Ozx5c{9utx#zUSZYb%kn+>t$loj?|S+On|t{PszvqnrAs18`32$ng>5{zxp^Ku
z${5a)*5gcRLw9ds70z|1Hgn^sPf5;Y@zYo&Vo%dKF<QQM-W-Aa2Ilw+U|9xA0oh-F
znmUK?-q4eUc)k#LLAQ0)3ZX+xgq-wLl+mQduH5mFLF!M^UAZ>?mE|~JW*WIV%I3Co
z=S#+hs6TJ+&e7N;IyuWy-6G{py>b+-0t?u7nIrffgGUMTdW=%<8#Yk4rB8F!2a$dX
zI;#@fmOd%IO7m+E_SYDH+A}-?O~asA$8;nEgYP>@S1zA94SSelW5*pJ_p0*C6GJs!
zYF9Pyr{k+5URT3~Np`6#Z|vSi(bRVupA))E)iUC|CO77SCOhU=bxQwpYNwZ4eFa$k
z;GKWyn#KR1Y88G^-8Jg8repYzs#ZZ``9^Mt1=O&fQ`8^w8{>L+SKPjOMbxSJ2FRkq
zSmQr%?ZO2O>55bqVw%Q(US2IO$=Q!dbn*t~P$t7`2$vPOTxgo~qcXYsQB~Bq1FAZ+
zb}57BuTustT88tlMS|PWBWg#Tu9O^JW!W2@FV05-XV2m5jGM~m44NW*HE51zZrk<R
z)*-WmBxmC}yU0^~c1ezrKYRR$#$lBR*|rP#c7XOf&Bb#~8ymQ&tp~rTT@z)iIwhJm
zb$`>eY<ON1UwA?7zx$5X<M<Vg|B7Ov&WNF0L|$`66!<lWtSgTW4`FH#8^~3Xz0u<^
zq}1)mVRb}Csv<HoO<r$6Kh}TQQX%fr3GK{dTS~tuSgy$p-mXe;D(g@3>IF0RZr&vP
zYef9!r>P_Oc98IA+rtmP(;D&qJ;TTAIyKalwvW)1hHbd2@he^-MCLY=$JI2(MMQa7
zJ+YpMfPJiubD@~}p=HK4&d);@I(8J7RB}v{HvXn2)vu+M4W@aWhx4>M*RPRLT4%8~
z)C0>X0RN$q6NKNZ3=i6qrue7Hb7x%C^&fXZKOpHVReaqrCeaj=5%C(=4DekhKP%?j
zeVWU_7U4`~bf<<~-#usbVMSB<Si||J#Rs-TT>sY9%M|z8V34~7w%LB-+u?I>!5<gk
z%LHsbp$T5FT<F!TK6`9b9rfnkKFXtof$AX*?fWcqUu^Wy+!r%`V}HNQiRM4Zzo83U
zv0WK$iZ_X6TjKpD&i5eyjZ&E#`eOP6{723mJ8F`@#XiSD79mro^YvzJQO47H0eqXm
zADtf`tkJ{fA4lA*t$!7HlbRLaBP=pA;wRZ!@<cr1lggyJR+M!QYoI7>yjz<VTF3<~
zTp-Zg5zEk%&V8<5yh!r@PKsHYCj4iQ9Vw$f(a^oxYfq>%;?^p~vkhvK<i54HuX1Gv
zFJWU3Z-M+2-9;%%bY?rl#!?@X;its&HmXDYON6daUps|Xk&j9C<;FJ|q#T&=jXJ}-
zFB{!3LhirvYazyF4ibJk0|ds+Qp|?5W&R#Hd-QM_`8UA+BY4?XWp2as>c;NvFt?0j
zLs%$=O8zR-qaxD*c*dqUv&9{~g#AMUR2RpGsLzcJRv-K@Q1w%PKjqGTzRJCW{8T4K
z1*tDjsIS>KY^ZK>_7Pp{=0B^0ww+f8E?p-0Y~G}-J!AkEZ?%VTkWu{dH`sRQ&$cr7
zO&RFh(KE1b**Mb{F_O$;LVXzj)hmVAM!ngVp$FBOK9f0$`y@JfAO=Og*`#X{J)yoe
za;<<nN>!QO^=m3dCMR*9<{Z_HOW&Xw6gNZJHEO@6W$;E-s#~huckNmw`352%oEsTq
z7uGtLQ^$|Fa{fHYe@8j`f9%YWLni!^`jADvUR_w<O&gR^Z420pz_C2Vud@A@B2M%<
zpXoiCPxtK0Hu3DtHt}e$Xi}>qn_jCYn-1UB)aN5U%Wt-j8?sB)Awpl;F6@Oa(|Z)+
zUQzNmKQCE0?mM_#y{aYuRzagFtv9frC9Vb8k^G2qYWp%*O3o4fo#n{?`02xk)D%+?
z>xs`e#4Qj*l6&L)*XP@Bl?`$`D3WVM$s2iQE8_ZWQYL<IK-DyO7O>9boB2)WGkreh
zGQ5VfX&&uaio2z_M#!7_P8ZSxhO^O)(&RzYKI7dF9#H$PTdNH3-kA+TY`yk~!E7AP
zNkyL0XA9uJeC{ma-&HRDBL~aM-y{RF738PFdUazxcK@VuKXg#-_0uj@1(wxUVr2S|
zaih4Xq!@WrVnaDSBeDL9KwKoeS9dma(ge<L&1%8@@Ikfv{$ErfA5Gw+W5SvEx2)f!
z*eTrtaj{Eh&(PlBU*+IGaSE91$=}kR$sS@&8jU+rp@l=aYEK?(t37|F^Tm2KaPBN2
zaQ<vQaNcY_05QP8=~MXN@uT_L{rhkcIZYKYSWm=@>siTsv9xc|8EIY%%)v`%P80sU
z*7z-s411rGrw$$XH~6jFk8`OaYY-nHZxA0Tr?HQ#SydK?y;&T^%y1Xb=r8C#k99pM
zHhXEa?=aOP{1;Cf@b44xTaX)bfdACH;(uQ}QjCA6ZgT_vQzZZWB7WN^zMVRWIYoC!
zrTpxrZRKOHO!;{>e)(;>WXf+I;>+OP58*#xi(7ohx6^d5C@b*o_|rU{WgiXb%VKY2
z@DX(1?~@_@*}kw%ZKCQhGYW@sv&R=1X+ja#IVDa$8un!^V&QA%&lLt@Z7s%Yx?+tz
zv*<%Eo$i~KqhBPe=7{&2@E<D2{-3enH~CmYyC(mHbgOV$$6nWbIcYqX=v+ZYcP&{~
zp)bZ<Mch)sV4aV+lJ3#HJKBe!X(K;m$tT{ueog!M-d*iquV3rL`v9{>7jkqKXN<X&
zKR;+sQgY%rVlkyhMR^;amRSJ#pE+^hS9P;;<libh*o+_hG&%Vc%$w5Uxw8!TWxzkJ
za0J&9c7|f$xZ}jM!kRxT#D}4AQ^*+o6j~oZ7FPIe^v8CN(3+msX25vd8o%WY-_D-c
z|91S;rigzY?n&(YcAfI+qeohS=dI*_4`+jrm1YyxVH6|9d6E1e{Ke~+FLjR*)1|#2
ztvRgl8^-zVV?Z{Y)&{_M5@Zm%Me@czApe}L{B7kx`0w7huDN>Yg67rlFLg_1PUA^m
zr22!qxvFhziiLTTCvv2>CC86yUcG#wTaUXU`Ee2Ed&RS`AH&^qU7JYbe%qFpbWYHm
zB-;p#r$zi0$y@Ln^}p=;L2OIJkGqSdi>7|U_knDGhwl>ghxC8zs+Gd@4~KG7hY#lR
z8`hWKymDD{WZz!(#DZSzMBFRufcx$<aSv%P&PMRlFG0+ILhtTunt0#YW-O>*q(5h{
zwjmjpgTLg>n?H4nr+vy%++4&gedg8)WX|9`f$RyzbUWd!iSAu2`1E6Lc>6rXz1z1m
zPai+jK6>y#`v7+p^TI=!FUJ+}FP=WpzJB$Gj_OY6*Oz_#@S*k@&ZmCIos1{Y!DGMt
ztfDoV$V)mFEx;4wsbuAHOkWHBvihU%j_;Q-A63_|R~v;pW$8XR6PL;Zdygcn<w&m$
z`FN+ZCc_;9<k1;ma?O8$s>za&Htxr8SJB%|mJJ`2g8PqDS1d#23}tD*i?)ny(mu!0
zU^Ay<oNz`>=MEHaKLpCK)f@30F>SibTL&~5bc6Zpjdstr&8lJfd4{{)R{fCn>2IZ_
z_E|b_u@~}pmwkl$VW;3r1%apd*$L2KoDF)5Sj&5&Y-Lb5Xfeiu`xE1i|5;GxhEYri
zd|~UP<NI&>Wn&x7<;&zd%DOd9lpoo<TZQ|oq${sL6F>o=GBGow{z(6#R}!T{9Xj`K
z3OWLkzkL2&J00;jTFaXCM=JX=c%*VQrR|iV^VPPvQ?d$Yws3}s^_9K`KZ>7+l_zI2
zRCB_9X|z)lG!S$g_Cia0oXG<VxHLO{|NX|rQI>;qop~Qk<ZoQLq(OLr2aoST?Lhx9
zppjxj+UC_hU^}^JkH&)H(4(MJ&lIo)<SS_1V|Og1<6=%5b&vEX8EfltxcftPLa7vt
z@x0Q~j%c4`C534R&D*kUI%uaDwGE>94vp`hxI3mTo-<2mga3UYyJXgFGiGZYO2vKp
zZny)wXZtpUx0SRXq`M_wf=qL>EcAEDu>-Z-EbyZ^M_bSitxm_?zJ66ZAOCYh`XKhf
zN|#^{JLA4Q{htluXC!Z$n-rHwrn@{A#VCu`48-P>^i`TRmM@!QZpV}WZyF04ZyNXC
zl!BlmUpo$W>&Oon`{9WHQF50pm@=7vj`MH)&ko7_XJBrGXAL8la(Ml{Pqt7E@8vW_
zM>o_DiXA?tc*$PeneWvkNlw1wBKEC_k&+$12HQe*pqgC<WirchESn>(RQ^|UNxQ`y
zsSlMvh*Rm8VUEA}<HZZDLard+c>~6L3i8P}+O2JF+mv{xLXt|x^3qz;w4|U_vTQB-
h42;!58K7T4D?pK;^5g68&dv(Ke_#G9f&YyJ{s)l+qZ9xD

diff --git a/python/app.R b/python/app.R
index f50a499a..7902958d 100644
--- a/python/app.R
+++ b/python/app.R
@@ -100,6 +100,7 @@ app <- teal::init(
   ),
   header = tags$span(
     style = "display: flex; align-items: center; justify-content: space-between; margin: 10px 0 10px 0;",
+    tags$head(tags$link(rel = "shortcut icon", href = "nest.png"), tags$title("Python Dataset Teal Demo App")),
     tags$span(
       style = "font-size: 30px;",
       "Example teal app using python dataset connector"
diff --git a/python/www/favicon.ico b/python/www/favicon.ico
deleted file mode 100644
index c9351d3f8d96b38a556436f999d06617a6b5715b..0000000000000000000000000000000000000000
GIT binary patch
literal 0
HcmV?d00001

literal 15406
zcmeHOcU)A*_6Pe@njpPfKtQAyML<D8Y}mVE>?J66UrbDFiLu3Q6l*lGC&oNACiY&i
z$KJb%Chpz6Wjnv`+1<N)cUgIw-~0Xbd;9qu?%cUEbG~!t%sDf21_uX6hl&nvZVq^c
zI1H`i;E?R#;1CjGe6L^A!C?*ZVq;C;!yFt=dOA4NM;TN>4P!nYc7KkJl59$ws8nAX
z^!(wYjW3@)U0YgO>Srh=ewS3Cq$5=_HH5O&1&*7tanbxgGyU9|te{%VrsYdssg$Zo
z`qI*BRE(OD{4pd^&k;Pk9{TCWJ6#f@<ZS{gF$vWjWbq(+c1w+uAKSa<Cfeu#ax}0r
z^VG-PxOCy*=&t$fpa#_yMTt)Aqp7vEg$W+)$dqvQ!?gNrbFb=5d<{q0_}<;v+rM4e
z2Y%56gMP>N?R}QwR#ny}pfXbsnZYH;4CP|FE)rt9&E*4&cdI-OT+k%-nj`e@`k5-x
z*^^0iuO>Tl@W5STZ3l-PYm1)~&iLRUW^m7Sn*7$OEb*eeIJYXYSZ`NZd<_R#)6^(M
zqplP9`09?bT^rZk6YFnZW2_(Ddm5kUR82O&l?PuK>!cVS=cMRcznY?VST)7qm~ggD
z?i3-cdry|y-TBSh2L?GpdOKFHd`>coXxUtmkTr!*_3Ows_G_<5bI()c1$JROMy*rD
zwkqUYPn^&+s2j)_>aSb-$RKz$vVHZ67Y6)jBf4Gy6FgxIA2eYsU%y?RB0RsPBBFJ3
zMXXOvLp?(|^zDcBtDlJYx2;<7($HV@F~iS|Y3x};)-=$AX&YIa$pydcU@s=a$Bjua
z$%Oj<{km1pjP)HI4E4dA+FtSb41Ukn?^NF|TO@qDY_UM&wRhVV)q=?r`Np-J3}r}`
zJJuAx5bOWEeajzW+uK(cD_70=LRi0OzVPFQ^~#M)7YI{F4Ca2_`GcycYX=4KNOY<w
zJMhDfKS<}O4V_Nc_T>Iwuk~({BBy>NpnYmD!MP%y6=aEcQXNVU%x$VTf8yBr(o%i4
zkw5;T6@96`ibky-{r#HampOI(jj}>Jgq7NB6IqAZz3JO0TCH|4^cORheyC_bV0@#$
zXvg!fSFe^Xo;q2P>Rw%z?(HI5HT!d!T*l1C{BSjvr%J|(#(6+B4YLprV}7Y#AAR@Q
zwV$8dySD@VtVbp2C#h+AGi3kmKV)Y@Kutl8h7=Oz{fzL+l#phd(?|fj7ibx14hYsx
z@-r8tJmZU1mZa$WB&iMXstPL7>-Db>{Pd&h)WQ8~jLmc84FH+OPh@N2YKOULIIP%P
zidj-(0krK1$^+kPx2|5*3~ieWorNxfin?`TAKksH#rJcd40COBLTu$-pVk%8W_{@O
zuD@Qt(ta^!B%kbB#h|~UZJ=i(kLt38pM1nC7)FEgo1kaGR@}@@B4JKb3CW8|C}IxU
zaRbd!sZ_$Iua_#b0zHkkpXQIjE*Nd86h}^-0EXtbR;^K>?x!Fp5r<jkA_MU$7BD@5
zy%OpT!1MV@jBl6ZhH}y8434g@7}($+274jpYn$$!(MWOO)Jc-X15kHR1sgVHUx5eZ
z(lMXUKDv8HJGy%(mh4Tci=%7=Z2pQ4wFK?r`g--^2>pg0KEmqGUc#Il4}MsTlOn^t
zf=MPO*+52Qn<ft^;9fj^OuBIx_9dY#Q)3Qz2IKp8G=2*|`6o{{hWa!q&6V9=;Hw;)
z?83J4tHhix3RWL03{t1KRFtK<dNTRJ@rp6odHmO-I;b}G%vFs|uFKLls%wxL@TYmX
z$cn%GT;MrQ4IC>$K2jVs49L5(Z^t$jjh|SzTivSi<?TIrQT9pBK}?4Chg`P*5+N&W
zjga1CgEBd<Sa7?=>MKCfF$1?Kv+K^}yG1Nkc8mB*nd%lJH;;?S)}HwF7s7DBWEIUY
zkauHnUY6Ckj!AZ6M<ll5TLi9BHf!*$GH%Q*P3Y3Ss(^(Hg@7++@F63IbM*>(velkG
z(K$kRe()`Uvu5%EOBM;^b}!R@Ie3e%Nv+QC`NlD!eoW}wlLfEiW?eKPK;F$kdD#lF
zuY^0zt)lGX{JpyN5h{JXkLC$cX-V>U=StS&jB+uMS!BA=M~VH74f19h&;3kDopMY~
zc0!ct_+DL!|4DPlE&Oi{YME{9zX@-HE=63};<d^R1#!x0Sv9%gvCf9?Qj8)$@oD&G
zsz0DXEk*w4CAx^_nF>(`W4pB{{-<rH9`bGtY}pKc)+np!2KAV_3-+r?|C6ErS0;sO
zp3SJM9h2nDHg=Qhy2S>NKNWGb5Al`{N?4<gP3x=(9XgN`F&A~oC;n&4_FsQ{0P%-B
zi9#{9>Djwgq;piaam|Xd43CPkAq{INR(AB{zv<>Jtm)z<eAU{6pPpTl`!v&yo0I3x
zujw2rEb1^()1})nO})a;c)u0Pm9fFzCcp0}8)@WUV#^<P{my{gre^+8jpF4Y)8+};
z0ZW7opNV{mYot7(MrCvV2xF2{1z8Jk7p6x<4m+apJ$;|(^{Tw!xk9R2lH94JL_?FR
zZvVc9b)lhOkk5ym^2sh<u;q`uJN<Jq&GM)6;XOOE{>zsL4V(64GkiyJnaNv~nT@_z
zX8X_Qv-}qj30Z!#giN0zzGdh>b#mPtMcsbAQD>>(yYg$L`w!byu~_RHc%wZU+Yuew
z68}rK{L%lrA2iP}_g}0N=jAG^J#+vUuy}z`?b$P3RZ!3;llb7tlel2`o4~nW@&OCy
z3jvE43PIC8<|DJ3C}@s|<1Mx$K8Iu73SV}`mOn7r<!`759i(Simv(Hu9v#`ZAWtSX
z)R&11tR;&lUuc?NA`j_PIv*&1Si4;6|8GYAm<6VZ08ID#Wv83`j76uZ4z=;N{up^%
z=C`z*G;P2H`44TIqkyTpVPtEWg^>S!;xENc>Ff}1rgKuXA-`inq&y3{+$SSNKD1SH
z#ZavObL#~$MP1voqdK=`Q)*T-$f<wx3`Mf5QCDp-3~7@?{l95P{`U*Anpo){@t;`G
zgWdQ2c2yQ+{`!yKbz^#TQCz=#QS<8$J5<|>S12d-@563gxm<bn*kScIi{}ee=he%X
z+Uy`NyW>JO4*kDv7Q6`v`v1VdAN8d&ApXCA*T1%IQ891cfPZJj^-C8un^%0ToLN-J
z8GP)(0`|_etJ<YAKEobP%HPzM*)BQC`nSkbz}Mb|3@pM22JnAakd<bZzbLnfeS5IX
zo4<7XFqe+(`IpMTAN^lCZ3;iSTSv&f9sB6sT`lQVBKd}Dj)wkc8TxPJFSbS4`Za4J
zhpyeX<&XD=3qPC8C%IVr7g~c{yLds9=~q*>d+TP^$j<qSl9R{P_wU@%+`RUirWgFq
zqx<)?x3AyOd@+6uclXvUjSO<SfBUwEFiB<E$i0Sa?ff|c@v_4|AM35##Ebl(xKB3h
zw_xX}9olcvJM}ZkrLrv1)rghWqm64h8@>^K`bI=$sa^u=kMGl+eSH5ut%J^j(rxvR
z-jV+g&;;!J-u$}rdsQ3wASwR0rVZn3nS;`Dz0#BA=Z+s$V|<_L^`-sLenoq{rFqy-
z_@LZMS}(1cHyiff&8U+SJ(BXUm(InSU?<kW8jXhh-3*Y6Xltar%1fh89O%FwFP>{Z
z8$O7$)(vYLC1PmgQA4(9>c_mCk&&!7gF?&WA^m2%CZliA)e2~%6X?!w7tU)2wrpzF
z4Us4Ll?1GHC1ZRB<uS&lDP}d(q#WNZP1VsJ>BdCTjeW2OZKCQzH;gi%IZ$%^80`a}
zq703(WgjSI@xE~E;6~fNpkh%se)wjc^%#qNHuJU9i22*QCd#$}3<<EK2l14QaoKY3
z%HjWOIXWl75v@Z%kfTEg{+9pyk4V_m2*$1=C>S&aG!jI*WwTHHk8mu%Q}6o~kbslU
ze@1}LC{-$rR-;iNeF#(la(&+>|8L7%WC(0@wvY!p37^2-gTMUe2YuKXqegJgpFGjR
z2f{y>{sL+YvKb4Yv@}%)ayg&Ml%<UKDGw}FKw+S-aaPH_{{45|rWMPD+`2&~AL%H|
zj|rFW-u#{F&7ZIJde}*n{Tvhws{HP}$|-5{$>!B=A1M?3L$Kx|9ls-I7~QV#HYf+=
zG{btycuryTBSu?JYl*^6ZCN@OhK<#s&Slgcji>Kh8N9~_BW4@q(pO0ue5-+Pf6#U4
zig5Al8O@M3xoi_}S3}G~^nb?noy8y1J~-3gof+G+D|`3m4GsJfk2Xp`?Ln2_1Mc4{
z3LfMulR-a1SJY1)+}AC@UM<bj#cFLW;<x)Wt#vX3JebvUXA3W%K85SmDbeP7P&BB@
z-vU=oCA3NQFdno3@_vCBmv+PAh01QJ@p4+{+r^3X<-g0PwJ7!$iXCfLEB}1;N(;Yv
zA3SJH76HN>mkjz_@s(c&?bHDM6FPGbGS?p7yGPx(X=6nr#H6J73KN_aI|_V-VX@V%
z*5=YO_R^$dh_f(5TDMS?oH|MCSvp6%4jKX~cPz?7j=IjE)}Zrhl}dl}@+B?VLvd~<
zIXTL*JS#H!K~>}<;%cz`S7G|nr4gmfyfFQ=EH`#siVHgkXR=-ERF${(t1Qo|Rgp<?
zk?xl*^Fr)bGGcmPj2Xo}ymK3F1JlE}j>*Kc`dh_MAJ7r8FDOfKfGp5@omThfgWI>Y
zOQ(Ozx5c{9utx#zUSZYb%kn+>t$loj?|S+On|t{PszvqnrAs18`32$ng>5{zxp^Ku
z${5a)*5gcRLw9ds70z|1Hgn^sPf5;Y@zYo&Vo%dKF<QQM-W-Aa2Ilw+U|9xA0oh-F
znmUK?-q4eUc)k#LLAQ0)3ZX+xgq-wLl+mQduH5mFLF!M^UAZ>?mE|~JW*WIV%I3Co
z=S#+hs6TJ+&e7N;IyuWy-6G{py>b+-0t?u7nIrffgGUMTdW=%<8#Yk4rB8F!2a$dX
zI;#@fmOd%IO7m+E_SYDH+A}-?O~asA$8;nEgYP>@S1zA94SSelW5*pJ_p0*C6GJs!
zYF9Pyr{k+5URT3~Np`6#Z|vSi(bRVupA))E)iUC|CO77SCOhU=bxQwpYNwZ4eFa$k
z;GKWyn#KR1Y88G^-8Jg8repYzs#ZZ``9^Mt1=O&fQ`8^w8{>L+SKPjOMbxSJ2FRkq
zSmQr%?ZO2O>55bqVw%Q(US2IO$=Q!dbn*t~P$t7`2$vPOTxgo~qcXYsQB~Bq1FAZ+
zb}57BuTustT88tlMS|PWBWg#Tu9O^JW!W2@FV05-XV2m5jGM~m44NW*HE51zZrk<R
z)*-WmBxmC}yU0^~c1ezrKYRR$#$lBR*|rP#c7XOf&Bb#~8ymQ&tp~rTT@z)iIwhJm
zb$`>eY<ON1UwA?7zx$5X<M<Vg|B7Ov&WNF0L|$`66!<lWtSgTW4`FH#8^~3Xz0u<^
zq}1)mVRb}Csv<HoO<r$6Kh}TQQX%fr3GK{dTS~tuSgy$p-mXe;D(g@3>IF0RZr&vP
zYef9!r>P_Oc98IA+rtmP(;D&qJ;TTAIyKalwvW)1hHbd2@he^-MCLY=$JI2(MMQa7
zJ+YpMfPJiubD@~}p=HK4&d);@I(8J7RB}v{HvXn2)vu+M4W@aWhx4>M*RPRLT4%8~
z)C0>X0RN$q6NKNZ3=i6qrue7Hb7x%C^&fXZKOpHVReaqrCeaj=5%C(=4DekhKP%?j
zeVWU_7U4`~bf<<~-#usbVMSB<Si||J#Rs-TT>sY9%M|z8V34~7w%LB-+u?I>!5<gk
z%LHsbp$T5FT<F!TK6`9b9rfnkKFXtof$AX*?fWcqUu^Wy+!r%`V}HNQiRM4Zzo83U
zv0WK$iZ_X6TjKpD&i5eyjZ&E#`eOP6{723mJ8F`@#XiSD79mro^YvzJQO47H0eqXm
zADtf`tkJ{fA4lA*t$!7HlbRLaBP=pA;wRZ!@<cr1lggyJR+M!QYoI7>yjz<VTF3<~
zTp-Zg5zEk%&V8<5yh!r@PKsHYCj4iQ9Vw$f(a^oxYfq>%;?^p~vkhvK<i54HuX1Gv
zFJWU3Z-M+2-9;%%bY?rl#!?@X;its&HmXDYON6daUps|Xk&j9C<;FJ|q#T&=jXJ}-
zFB{!3LhirvYazyF4ibJk0|ds+Qp|?5W&R#Hd-QM_`8UA+BY4?XWp2as>c;NvFt?0j
zLs%$=O8zR-qaxD*c*dqUv&9{~g#AMUR2RpGsLzcJRv-K@Q1w%PKjqGTzRJCW{8T4K
z1*tDjsIS>KY^ZK>_7Pp{=0B^0ww+f8E?p-0Y~G}-J!AkEZ?%VTkWu{dH`sRQ&$cr7
zO&RFh(KE1b**Mb{F_O$;LVXzj)hmVAM!ngVp$FBOK9f0$`y@JfAO=Og*`#X{J)yoe
za;<<nN>!QO^=m3dCMR*9<{Z_HOW&Xw6gNZJHEO@6W$;E-s#~huckNmw`352%oEsTq
z7uGtLQ^$|Fa{fHYe@8j`f9%YWLni!^`jADvUR_w<O&gR^Z420pz_C2Vud@A@B2M%<
zpXoiCPxtK0Hu3DtHt}e$Xi}>qn_jCYn-1UB)aN5U%Wt-j8?sB)Awpl;F6@Oa(|Z)+
zUQzNmKQCE0?mM_#y{aYuRzagFtv9frC9Vb8k^G2qYWp%*O3o4fo#n{?`02xk)D%+?
z>xs`e#4Qj*l6&L)*XP@Bl?`$`D3WVM$s2iQE8_ZWQYL<IK-DyO7O>9boB2)WGkreh
zGQ5VfX&&uaio2z_M#!7_P8ZSxhO^O)(&RzYKI7dF9#H$PTdNH3-kA+TY`yk~!E7AP
zNkyL0XA9uJeC{ma-&HRDBL~aM-y{RF738PFdUazxcK@VuKXg#-_0uj@1(wxUVr2S|
zaih4Xq!@WrVnaDSBeDL9KwKoeS9dma(ge<L&1%8@@Ikfv{$ErfA5Gw+W5SvEx2)f!
z*eTrtaj{Eh&(PlBU*+IGaSE91$=}kR$sS@&8jU+rp@l=aYEK?(t37|F^Tm2KaPBN2
zaQ<vQaNcY_05QP8=~MXN@uT_L{rhkcIZYKYSWm=@>siTsv9xc|8EIY%%)v`%P80sU
z*7z-s411rGrw$$XH~6jFk8`OaYY-nHZxA0Tr?HQ#SydK?y;&T^%y1Xb=r8C#k99pM
zHhXEa?=aOP{1;Cf@b44xTaX)bfdACH;(uQ}QjCA6ZgT_vQzZZWB7WN^zMVRWIYoC!
zrTpxrZRKOHO!;{>e)(;>WXf+I;>+OP58*#xi(7ohx6^d5C@b*o_|rU{WgiXb%VKY2
z@DX(1?~@_@*}kw%ZKCQhGYW@sv&R=1X+ja#IVDa$8un!^V&QA%&lLt@Z7s%Yx?+tz
zv*<%Eo$i~KqhBPe=7{&2@E<D2{-3enH~CmYyC(mHbgOV$$6nWbIcYqX=v+ZYcP&{~
zp)bZ<Mch)sV4aV+lJ3#HJKBe!X(K;m$tT{ueog!M-d*iquV3rL`v9{>7jkqKXN<X&
zKR;+sQgY%rVlkyhMR^;amRSJ#pE+^hS9P;;<libh*o+_hG&%Vc%$w5Uxw8!TWxzkJ
za0J&9c7|f$xZ}jM!kRxT#D}4AQ^*+o6j~oZ7FPIe^v8CN(3+msX25vd8o%WY-_D-c
z|91S;rigzY?n&(YcAfI+qeohS=dI*_4`+jrm1YyxVH6|9d6E1e{Ke~+FLjR*)1|#2
ztvRgl8^-zVV?Z{Y)&{_M5@Zm%Me@czApe}L{B7kx`0w7huDN>Yg67rlFLg_1PUA^m
zr22!qxvFhziiLTTCvv2>CC86yUcG#wTaUXU`Ee2Ed&RS`AH&^qU7JYbe%qFpbWYHm
zB-;p#r$zi0$y@Ln^}p=;L2OIJkGqSdi>7|U_knDGhwl>ghxC8zs+Gd@4~KG7hY#lR
z8`hWKymDD{WZz!(#DZSzMBFRufcx$<aSv%P&PMRlFG0+ILhtTunt0#YW-O>*q(5h{
zwjmjpgTLg>n?H4nr+vy%++4&gedg8)WX|9`f$RyzbUWd!iSAu2`1E6Lc>6rXz1z1m
zPai+jK6>y#`v7+p^TI=!FUJ+}FP=WpzJB$Gj_OY6*Oz_#@S*k@&ZmCIos1{Y!DGMt
ztfDoV$V)mFEx;4wsbuAHOkWHBvihU%j_;Q-A63_|R~v;pW$8XR6PL;Zdygcn<w&m$
z`FN+ZCc_;9<k1;ma?O8$s>za&Htxr8SJB%|mJJ`2g8PqDS1d#23}tD*i?)ny(mu!0
zU^Ay<oNz`>=MEHaKLpCK)f@30F>SibTL&~5bc6Zpjdstr&8lJfd4{{)R{fCn>2IZ_
z_E|b_u@~}pmwkl$VW;3r1%apd*$L2KoDF)5Sj&5&Y-Lb5Xfeiu`xE1i|5;GxhEYri
zd|~UP<NI&>Wn&x7<;&zd%DOd9lpoo<TZQ|oq${sL6F>o=GBGow{z(6#R}!T{9Xj`K
z3OWLkzkL2&J00;jTFaXCM=JX=c%*VQrR|iV^VPPvQ?d$Yws3}s^_9K`KZ>7+l_zI2
zRCB_9X|z)lG!S$g_Cia0oXG<VxHLO{|NX|rQI>;qop~Qk<ZoQLq(OLr2aoST?Lhx9
zppjxj+UC_hU^}^JkH&)H(4(MJ&lIo)<SS_1V|Og1<6=%5b&vEX8EfltxcftPLa7vt
z@x0Q~j%c4`C534R&D*kUI%uaDwGE>94vp`hxI3mTo-<2mga3UYyJXgFGiGZYO2vKp
zZny)wXZtpUx0SRXq`M_wf=qL>EcAEDu>-Z-EbyZ^M_bSitxm_?zJ66ZAOCYh`XKhf
zN|#^{JLA4Q{htluXC!Z$n-rHwrn@{A#VCu`48-P>^i`TRmM@!QZpV}WZyF04ZyNXC
zl!BlmUpo$W>&Oon`{9WHQF50pm@=7vj`MH)&ko7_XJBrGXAL8la(Ml{Pqt7E@8vW_
zM>o_DiXA?tc*$PeneWvkNlw1wBKEC_k&+$12HQe*pqgC<WirchESn>(RQ^|UNxQ`y
zsSlMvh*Rm8VUEA}<HZZDLard+c>~6L3i8P}+O2JF+mv{xLXt|x^3qz;w4|U_vTQB-
h42;!58K7T4D?pK;^5g68&dv(Ke_#G9f&YyJ{s)l+qZ9xD

diff --git a/safety/app.R b/safety/app.R
index 5481c1bc..5227af87 100644
--- a/safety/app.R
+++ b/safety/app.R
@@ -588,6 +588,7 @@ app <- teal::init(
   ),
   header = tags$span(
     style = "display: flex; align-items: center; justify-content: space-between; margin: 10px 0 10px 0;",
+    tags$head(tags$link(rel = "shortcut icon", href = "nest.png"), tags$title("Safety Analysis Teal Demo App")),
     tags$span(
       style = "font-size: 30px;",
       "Example teal app focusing on safety analysis of clinical trial data with teal.modules.clinical"
diff --git a/safety/www/favicon.ico b/safety/www/favicon.ico
deleted file mode 100644
index c9351d3f8d96b38a556436f999d06617a6b5715b..0000000000000000000000000000000000000000
GIT binary patch
literal 0
HcmV?d00001

literal 15406
zcmeHOcU)A*_6Pe@njpPfKtQAyML<D8Y}mVE>?J66UrbDFiLu3Q6l*lGC&oNACiY&i
z$KJb%Chpz6Wjnv`+1<N)cUgIw-~0Xbd;9qu?%cUEbG~!t%sDf21_uX6hl&nvZVq^c
zI1H`i;E?R#;1CjGe6L^A!C?*ZVq;C;!yFt=dOA4NM;TN>4P!nYc7KkJl59$ws8nAX
z^!(wYjW3@)U0YgO>Srh=ewS3Cq$5=_HH5O&1&*7tanbxgGyU9|te{%VrsYdssg$Zo
z`qI*BRE(OD{4pd^&k;Pk9{TCWJ6#f@<ZS{gF$vWjWbq(+c1w+uAKSa<Cfeu#ax}0r
z^VG-PxOCy*=&t$fpa#_yMTt)Aqp7vEg$W+)$dqvQ!?gNrbFb=5d<{q0_}<;v+rM4e
z2Y%56gMP>N?R}QwR#ny}pfXbsnZYH;4CP|FE)rt9&E*4&cdI-OT+k%-nj`e@`k5-x
z*^^0iuO>Tl@W5STZ3l-PYm1)~&iLRUW^m7Sn*7$OEb*eeIJYXYSZ`NZd<_R#)6^(M
zqplP9`09?bT^rZk6YFnZW2_(Ddm5kUR82O&l?PuK>!cVS=cMRcznY?VST)7qm~ggD
z?i3-cdry|y-TBSh2L?GpdOKFHd`>coXxUtmkTr!*_3Ows_G_<5bI()c1$JROMy*rD
zwkqUYPn^&+s2j)_>aSb-$RKz$vVHZ67Y6)jBf4Gy6FgxIA2eYsU%y?RB0RsPBBFJ3
zMXXOvLp?(|^zDcBtDlJYx2;<7($HV@F~iS|Y3x};)-=$AX&YIa$pydcU@s=a$Bjua
z$%Oj<{km1pjP)HI4E4dA+FtSb41Ukn?^NF|TO@qDY_UM&wRhVV)q=?r`Np-J3}r}`
zJJuAx5bOWEeajzW+uK(cD_70=LRi0OzVPFQ^~#M)7YI{F4Ca2_`GcycYX=4KNOY<w
zJMhDfKS<}O4V_Nc_T>Iwuk~({BBy>NpnYmD!MP%y6=aEcQXNVU%x$VTf8yBr(o%i4
zkw5;T6@96`ibky-{r#HampOI(jj}>Jgq7NB6IqAZz3JO0TCH|4^cORheyC_bV0@#$
zXvg!fSFe^Xo;q2P>Rw%z?(HI5HT!d!T*l1C{BSjvr%J|(#(6+B4YLprV}7Y#AAR@Q
zwV$8dySD@VtVbp2C#h+AGi3kmKV)Y@Kutl8h7=Oz{fzL+l#phd(?|fj7ibx14hYsx
z@-r8tJmZU1mZa$WB&iMXstPL7>-Db>{Pd&h)WQ8~jLmc84FH+OPh@N2YKOULIIP%P
zidj-(0krK1$^+kPx2|5*3~ieWorNxfin?`TAKksH#rJcd40COBLTu$-pVk%8W_{@O
zuD@Qt(ta^!B%kbB#h|~UZJ=i(kLt38pM1nC7)FEgo1kaGR@}@@B4JKb3CW8|C}IxU
zaRbd!sZ_$Iua_#b0zHkkpXQIjE*Nd86h}^-0EXtbR;^K>?x!Fp5r<jkA_MU$7BD@5
zy%OpT!1MV@jBl6ZhH}y8434g@7}($+274jpYn$$!(MWOO)Jc-X15kHR1sgVHUx5eZ
z(lMXUKDv8HJGy%(mh4Tci=%7=Z2pQ4wFK?r`g--^2>pg0KEmqGUc#Il4}MsTlOn^t
zf=MPO*+52Qn<ft^;9fj^OuBIx_9dY#Q)3Qz2IKp8G=2*|`6o{{hWa!q&6V9=;Hw;)
z?83J4tHhix3RWL03{t1KRFtK<dNTRJ@rp6odHmO-I;b}G%vFs|uFKLls%wxL@TYmX
z$cn%GT;MrQ4IC>$K2jVs49L5(Z^t$jjh|SzTivSi<?TIrQT9pBK}?4Chg`P*5+N&W
zjga1CgEBd<Sa7?=>MKCfF$1?Kv+K^}yG1Nkc8mB*nd%lJH;;?S)}HwF7s7DBWEIUY
zkauHnUY6Ckj!AZ6M<ll5TLi9BHf!*$GH%Q*P3Y3Ss(^(Hg@7++@F63IbM*>(velkG
z(K$kRe()`Uvu5%EOBM;^b}!R@Ie3e%Nv+QC`NlD!eoW}wlLfEiW?eKPK;F$kdD#lF
zuY^0zt)lGX{JpyN5h{JXkLC$cX-V>U=StS&jB+uMS!BA=M~VH74f19h&;3kDopMY~
zc0!ct_+DL!|4DPlE&Oi{YME{9zX@-HE=63};<d^R1#!x0Sv9%gvCf9?Qj8)$@oD&G
zsz0DXEk*w4CAx^_nF>(`W4pB{{-<rH9`bGtY}pKc)+np!2KAV_3-+r?|C6ErS0;sO
zp3SJM9h2nDHg=Qhy2S>NKNWGb5Al`{N?4<gP3x=(9XgN`F&A~oC;n&4_FsQ{0P%-B
zi9#{9>Djwgq;piaam|Xd43CPkAq{INR(AB{zv<>Jtm)z<eAU{6pPpTl`!v&yo0I3x
zujw2rEb1^()1})nO})a;c)u0Pm9fFzCcp0}8)@WUV#^<P{my{gre^+8jpF4Y)8+};
z0ZW7opNV{mYot7(MrCvV2xF2{1z8Jk7p6x<4m+apJ$;|(^{Tw!xk9R2lH94JL_?FR
zZvVc9b)lhOkk5ym^2sh<u;q`uJN<Jq&GM)6;XOOE{>zsL4V(64GkiyJnaNv~nT@_z
zX8X_Qv-}qj30Z!#giN0zzGdh>b#mPtMcsbAQD>>(yYg$L`w!byu~_RHc%wZU+Yuew
z68}rK{L%lrA2iP}_g}0N=jAG^J#+vUuy}z`?b$P3RZ!3;llb7tlel2`o4~nW@&OCy
z3jvE43PIC8<|DJ3C}@s|<1Mx$K8Iu73SV}`mOn7r<!`759i(Simv(Hu9v#`ZAWtSX
z)R&11tR;&lUuc?NA`j_PIv*&1Si4;6|8GYAm<6VZ08ID#Wv83`j76uZ4z=;N{up^%
z=C`z*G;P2H`44TIqkyTpVPtEWg^>S!;xENc>Ff}1rgKuXA-`inq&y3{+$SSNKD1SH
z#ZavObL#~$MP1voqdK=`Q)*T-$f<wx3`Mf5QCDp-3~7@?{l95P{`U*Anpo){@t;`G
zgWdQ2c2yQ+{`!yKbz^#TQCz=#QS<8$J5<|>S12d-@563gxm<bn*kScIi{}ee=he%X
z+Uy`NyW>JO4*kDv7Q6`v`v1VdAN8d&ApXCA*T1%IQ891cfPZJj^-C8un^%0ToLN-J
z8GP)(0`|_etJ<YAKEobP%HPzM*)BQC`nSkbz}Mb|3@pM22JnAakd<bZzbLnfeS5IX
zo4<7XFqe+(`IpMTAN^lCZ3;iSTSv&f9sB6sT`lQVBKd}Dj)wkc8TxPJFSbS4`Za4J
zhpyeX<&XD=3qPC8C%IVr7g~c{yLds9=~q*>d+TP^$j<qSl9R{P_wU@%+`RUirWgFq
zqx<)?x3AyOd@+6uclXvUjSO<SfBUwEFiB<E$i0Sa?ff|c@v_4|AM35##Ebl(xKB3h
zw_xX}9olcvJM}ZkrLrv1)rghWqm64h8@>^K`bI=$sa^u=kMGl+eSH5ut%J^j(rxvR
z-jV+g&;;!J-u$}rdsQ3wASwR0rVZn3nS;`Dz0#BA=Z+s$V|<_L^`-sLenoq{rFqy-
z_@LZMS}(1cHyiff&8U+SJ(BXUm(InSU?<kW8jXhh-3*Y6Xltar%1fh89O%FwFP>{Z
z8$O7$)(vYLC1PmgQA4(9>c_mCk&&!7gF?&WA^m2%CZliA)e2~%6X?!w7tU)2wrpzF
z4Us4Ll?1GHC1ZRB<uS&lDP}d(q#WNZP1VsJ>BdCTjeW2OZKCQzH;gi%IZ$%^80`a}
zq703(WgjSI@xE~E;6~fNpkh%se)wjc^%#qNHuJU9i22*QCd#$}3<<EK2l14QaoKY3
z%HjWOIXWl75v@Z%kfTEg{+9pyk4V_m2*$1=C>S&aG!jI*WwTHHk8mu%Q}6o~kbslU
ze@1}LC{-$rR-;iNeF#(la(&+>|8L7%WC(0@wvY!p37^2-gTMUe2YuKXqegJgpFGjR
z2f{y>{sL+YvKb4Yv@}%)ayg&Ml%<UKDGw}FKw+S-aaPH_{{45|rWMPD+`2&~AL%H|
zj|rFW-u#{F&7ZIJde}*n{Tvhws{HP}$|-5{$>!B=A1M?3L$Kx|9ls-I7~QV#HYf+=
zG{btycuryTBSu?JYl*^6ZCN@OhK<#s&Slgcji>Kh8N9~_BW4@q(pO0ue5-+Pf6#U4
zig5Al8O@M3xoi_}S3}G~^nb?noy8y1J~-3gof+G+D|`3m4GsJfk2Xp`?Ln2_1Mc4{
z3LfMulR-a1SJY1)+}AC@UM<bj#cFLW;<x)Wt#vX3JebvUXA3W%K85SmDbeP7P&BB@
z-vU=oCA3NQFdno3@_vCBmv+PAh01QJ@p4+{+r^3X<-g0PwJ7!$iXCfLEB}1;N(;Yv
zA3SJH76HN>mkjz_@s(c&?bHDM6FPGbGS?p7yGPx(X=6nr#H6J73KN_aI|_V-VX@V%
z*5=YO_R^$dh_f(5TDMS?oH|MCSvp6%4jKX~cPz?7j=IjE)}Zrhl}dl}@+B?VLvd~<
zIXTL*JS#H!K~>}<;%cz`S7G|nr4gmfyfFQ=EH`#siVHgkXR=-ERF${(t1Qo|Rgp<?
zk?xl*^Fr)bGGcmPj2Xo}ymK3F1JlE}j>*Kc`dh_MAJ7r8FDOfKfGp5@omThfgWI>Y
zOQ(Ozx5c{9utx#zUSZYb%kn+>t$loj?|S+On|t{PszvqnrAs18`32$ng>5{zxp^Ku
z${5a)*5gcRLw9ds70z|1Hgn^sPf5;Y@zYo&Vo%dKF<QQM-W-Aa2Ilw+U|9xA0oh-F
znmUK?-q4eUc)k#LLAQ0)3ZX+xgq-wLl+mQduH5mFLF!M^UAZ>?mE|~JW*WIV%I3Co
z=S#+hs6TJ+&e7N;IyuWy-6G{py>b+-0t?u7nIrffgGUMTdW=%<8#Yk4rB8F!2a$dX
zI;#@fmOd%IO7m+E_SYDH+A}-?O~asA$8;nEgYP>@S1zA94SSelW5*pJ_p0*C6GJs!
zYF9Pyr{k+5URT3~Np`6#Z|vSi(bRVupA))E)iUC|CO77SCOhU=bxQwpYNwZ4eFa$k
z;GKWyn#KR1Y88G^-8Jg8repYzs#ZZ``9^Mt1=O&fQ`8^w8{>L+SKPjOMbxSJ2FRkq
zSmQr%?ZO2O>55bqVw%Q(US2IO$=Q!dbn*t~P$t7`2$vPOTxgo~qcXYsQB~Bq1FAZ+
zb}57BuTustT88tlMS|PWBWg#Tu9O^JW!W2@FV05-XV2m5jGM~m44NW*HE51zZrk<R
z)*-WmBxmC}yU0^~c1ezrKYRR$#$lBR*|rP#c7XOf&Bb#~8ymQ&tp~rTT@z)iIwhJm
zb$`>eY<ON1UwA?7zx$5X<M<Vg|B7Ov&WNF0L|$`66!<lWtSgTW4`FH#8^~3Xz0u<^
zq}1)mVRb}Csv<HoO<r$6Kh}TQQX%fr3GK{dTS~tuSgy$p-mXe;D(g@3>IF0RZr&vP
zYef9!r>P_Oc98IA+rtmP(;D&qJ;TTAIyKalwvW)1hHbd2@he^-MCLY=$JI2(MMQa7
zJ+YpMfPJiubD@~}p=HK4&d);@I(8J7RB}v{HvXn2)vu+M4W@aWhx4>M*RPRLT4%8~
z)C0>X0RN$q6NKNZ3=i6qrue7Hb7x%C^&fXZKOpHVReaqrCeaj=5%C(=4DekhKP%?j
zeVWU_7U4`~bf<<~-#usbVMSB<Si||J#Rs-TT>sY9%M|z8V34~7w%LB-+u?I>!5<gk
z%LHsbp$T5FT<F!TK6`9b9rfnkKFXtof$AX*?fWcqUu^Wy+!r%`V}HNQiRM4Zzo83U
zv0WK$iZ_X6TjKpD&i5eyjZ&E#`eOP6{723mJ8F`@#XiSD79mro^YvzJQO47H0eqXm
zADtf`tkJ{fA4lA*t$!7HlbRLaBP=pA;wRZ!@<cr1lggyJR+M!QYoI7>yjz<VTF3<~
zTp-Zg5zEk%&V8<5yh!r@PKsHYCj4iQ9Vw$f(a^oxYfq>%;?^p~vkhvK<i54HuX1Gv
zFJWU3Z-M+2-9;%%bY?rl#!?@X;its&HmXDYON6daUps|Xk&j9C<;FJ|q#T&=jXJ}-
zFB{!3LhirvYazyF4ibJk0|ds+Qp|?5W&R#Hd-QM_`8UA+BY4?XWp2as>c;NvFt?0j
zLs%$=O8zR-qaxD*c*dqUv&9{~g#AMUR2RpGsLzcJRv-K@Q1w%PKjqGTzRJCW{8T4K
z1*tDjsIS>KY^ZK>_7Pp{=0B^0ww+f8E?p-0Y~G}-J!AkEZ?%VTkWu{dH`sRQ&$cr7
zO&RFh(KE1b**Mb{F_O$;LVXzj)hmVAM!ngVp$FBOK9f0$`y@JfAO=Og*`#X{J)yoe
za;<<nN>!QO^=m3dCMR*9<{Z_HOW&Xw6gNZJHEO@6W$;E-s#~huckNmw`352%oEsTq
z7uGtLQ^$|Fa{fHYe@8j`f9%YWLni!^`jADvUR_w<O&gR^Z420pz_C2Vud@A@B2M%<
zpXoiCPxtK0Hu3DtHt}e$Xi}>qn_jCYn-1UB)aN5U%Wt-j8?sB)Awpl;F6@Oa(|Z)+
zUQzNmKQCE0?mM_#y{aYuRzagFtv9frC9Vb8k^G2qYWp%*O3o4fo#n{?`02xk)D%+?
z>xs`e#4Qj*l6&L)*XP@Bl?`$`D3WVM$s2iQE8_ZWQYL<IK-DyO7O>9boB2)WGkreh
zGQ5VfX&&uaio2z_M#!7_P8ZSxhO^O)(&RzYKI7dF9#H$PTdNH3-kA+TY`yk~!E7AP
zNkyL0XA9uJeC{ma-&HRDBL~aM-y{RF738PFdUazxcK@VuKXg#-_0uj@1(wxUVr2S|
zaih4Xq!@WrVnaDSBeDL9KwKoeS9dma(ge<L&1%8@@Ikfv{$ErfA5Gw+W5SvEx2)f!
z*eTrtaj{Eh&(PlBU*+IGaSE91$=}kR$sS@&8jU+rp@l=aYEK?(t37|F^Tm2KaPBN2
zaQ<vQaNcY_05QP8=~MXN@uT_L{rhkcIZYKYSWm=@>siTsv9xc|8EIY%%)v`%P80sU
z*7z-s411rGrw$$XH~6jFk8`OaYY-nHZxA0Tr?HQ#SydK?y;&T^%y1Xb=r8C#k99pM
zHhXEa?=aOP{1;Cf@b44xTaX)bfdACH;(uQ}QjCA6ZgT_vQzZZWB7WN^zMVRWIYoC!
zrTpxrZRKOHO!;{>e)(;>WXf+I;>+OP58*#xi(7ohx6^d5C@b*o_|rU{WgiXb%VKY2
z@DX(1?~@_@*}kw%ZKCQhGYW@sv&R=1X+ja#IVDa$8un!^V&QA%&lLt@Z7s%Yx?+tz
zv*<%Eo$i~KqhBPe=7{&2@E<D2{-3enH~CmYyC(mHbgOV$$6nWbIcYqX=v+ZYcP&{~
zp)bZ<Mch)sV4aV+lJ3#HJKBe!X(K;m$tT{ueog!M-d*iquV3rL`v9{>7jkqKXN<X&
zKR;+sQgY%rVlkyhMR^;amRSJ#pE+^hS9P;;<libh*o+_hG&%Vc%$w5Uxw8!TWxzkJ
za0J&9c7|f$xZ}jM!kRxT#D}4AQ^*+o6j~oZ7FPIe^v8CN(3+msX25vd8o%WY-_D-c
z|91S;rigzY?n&(YcAfI+qeohS=dI*_4`+jrm1YyxVH6|9d6E1e{Ke~+FLjR*)1|#2
ztvRgl8^-zVV?Z{Y)&{_M5@Zm%Me@czApe}L{B7kx`0w7huDN>Yg67rlFLg_1PUA^m
zr22!qxvFhziiLTTCvv2>CC86yUcG#wTaUXU`Ee2Ed&RS`AH&^qU7JYbe%qFpbWYHm
zB-;p#r$zi0$y@Ln^}p=;L2OIJkGqSdi>7|U_knDGhwl>ghxC8zs+Gd@4~KG7hY#lR
z8`hWKymDD{WZz!(#DZSzMBFRufcx$<aSv%P&PMRlFG0+ILhtTunt0#YW-O>*q(5h{
zwjmjpgTLg>n?H4nr+vy%++4&gedg8)WX|9`f$RyzbUWd!iSAu2`1E6Lc>6rXz1z1m
zPai+jK6>y#`v7+p^TI=!FUJ+}FP=WpzJB$Gj_OY6*Oz_#@S*k@&ZmCIos1{Y!DGMt
ztfDoV$V)mFEx;4wsbuAHOkWHBvihU%j_;Q-A63_|R~v;pW$8XR6PL;Zdygcn<w&m$
z`FN+ZCc_;9<k1;ma?O8$s>za&Htxr8SJB%|mJJ`2g8PqDS1d#23}tD*i?)ny(mu!0
zU^Ay<oNz`>=MEHaKLpCK)f@30F>SibTL&~5bc6Zpjdstr&8lJfd4{{)R{fCn>2IZ_
z_E|b_u@~}pmwkl$VW;3r1%apd*$L2KoDF)5Sj&5&Y-Lb5Xfeiu`xE1i|5;GxhEYri
zd|~UP<NI&>Wn&x7<;&zd%DOd9lpoo<TZQ|oq${sL6F>o=GBGow{z(6#R}!T{9Xj`K
z3OWLkzkL2&J00;jTFaXCM=JX=c%*VQrR|iV^VPPvQ?d$Yws3}s^_9K`KZ>7+l_zI2
zRCB_9X|z)lG!S$g_Cia0oXG<VxHLO{|NX|rQI>;qop~Qk<ZoQLq(OLr2aoST?Lhx9
zppjxj+UC_hU^}^JkH&)H(4(MJ&lIo)<SS_1V|Og1<6=%5b&vEX8EfltxcftPLa7vt
z@x0Q~j%c4`C534R&D*kUI%uaDwGE>94vp`hxI3mTo-<2mga3UYyJXgFGiGZYO2vKp
zZny)wXZtpUx0SRXq`M_wf=qL>EcAEDu>-Z-EbyZ^M_bSitxm_?zJ66ZAOCYh`XKhf
zN|#^{JLA4Q{htluXC!Z$n-rHwrn@{A#VCu`48-P>^i`TRmM@!QZpV}WZyF04ZyNXC
zl!BlmUpo$W>&Oon`{9WHQF50pm@=7vj`MH)&ko7_XJBrGXAL8la(Ml{Pqt7E@8vW_
zM>o_DiXA?tc*$PeneWvkNlw1wBKEC_k&+$12HQe*pqgC<WirchESn>(RQ^|UNxQ`y
zsSlMvh*Rm8VUEA}<HZZDLard+c>~6L3i8P}+O2JF+mv{xLXt|x^3qz;w4|U_vTQB-
h42;!58K7T4D?pK;^5g68&dv(Ke_#G9f&YyJ{s)l+qZ9xD