From 24c8375c3f2ea236010f08c8716dcd86bef6f5cf Mon Sep 17 00:00:00 2001
From: Brian Caffo <bcaffo@gmail.com>
Date: Mon, 16 Feb 2015 13:42:36 -0500
Subject: [PATCH] Trying to fix repo errors and inconsistencies

---
 .../assets/fig/unnamed-chunk-1.png            | Bin 0 -> 6338 bytes
 .../assets/fig/unnamed-chunk-3.png            | Bin 0 -> 2701 bytes
 .../assets/fig/unnamed-chunk-4.png            | Bin 0 -> 2868 bytes
 .../assets/fig/unnamed-chunk-1.png            | Bin 0 -> 4806 bytes
 .../assets/fig/unnamed-chunk-2.png            | Bin 0 -> 4765 bytes
 .../assets/fig/unnamed-chunk-4.png            | Bin 0 -> 3232 bytes
 .../assets/fig/unnamed-chunk-5.png            | Bin 0 -> 2987 bytes
 09_DevelopingDataProducts/rCharts/index.html  | 603 ------------------
 09_DevelopingDataProducts/rCharts/test.html   | 184 ++++++
 dependencyGraph.R                             |   0
 10 files changed, 184 insertions(+), 603 deletions(-)
 create mode 100644 06_StatisticalInference/02_01_CommonDistributions/assets/fig/unnamed-chunk-1.png
 create mode 100644 06_StatisticalInference/02_01_CommonDistributions/assets/fig/unnamed-chunk-3.png
 create mode 100644 06_StatisticalInference/02_01_CommonDistributions/assets/fig/unnamed-chunk-4.png
 create mode 100644 07_RegressionModels/03_04_bonus/assets/fig/unnamed-chunk-1.png
 create mode 100644 07_RegressionModels/03_04_bonus/assets/fig/unnamed-chunk-2.png
 create mode 100644 07_RegressionModels/03_04_bonus/assets/fig/unnamed-chunk-4.png
 create mode 100644 07_RegressionModels/03_04_bonus/assets/fig/unnamed-chunk-5.png
 create mode 100644 09_DevelopingDataProducts/rCharts/test.html
 create mode 100644 dependencyGraph.R

diff --git a/06_StatisticalInference/02_01_CommonDistributions/assets/fig/unnamed-chunk-1.png b/06_StatisticalInference/02_01_CommonDistributions/assets/fig/unnamed-chunk-1.png
new file mode 100644
index 0000000000000000000000000000000000000000..0dc91dee2dae922e8dd412279fde1418185765ac
GIT binary patch
literal 6338
zcmb_>XHe6@*X}Q&_pYIf2uPFA2?!`n2vvF$LJ87UK&n*fEr5U^phz!4f)F|qDI&es
zh%^C_qI3`fFW!6Se!BDC`=7ZxbGAJD?CzP_b3W{|aRz!1Xeikz0RW)U(o{1901)P%
zkrQ1Zmnk^NRg+|(W2{cNAY63;00sa^00skKD8LDOHMr`*0OUUac2%QbPDmIE1w+jt
z{|65VAd&y3QAj5k5{pG*2`CtV`o}|}oPd8s)Eo+nLgD97cmmc5_(#E`uoqbD1z`>a
zo5Q2#F0gYK1OgUGz@rEkSi;5Jl_xpEoK080i1`@m8D0KI1+XlZJHA><@l?~o8vv*n
z{~2g(KI9w#uIFp1-8c5n-Oi&3TKPf~tt#s#plcZ*tJ{`SA2%uGI!$(YIb2!xs)vL7
zP8w!cQU9X^1p?|1>*V2kxKPJq_Sb2HSVf8i`j`?i#Ei=o41*Z~-X*}A4rm}7oF)06
zPgJqb?9azk&$o*mhyE=*dxF_--96lQ?$H!G?zz!cHaN(um{H==M>BYn8z;{f{`@j6
z+#`o9P)J`FsC2vAVWaGa{l2Yz429UWFL1ieZqL@WT@Q*``^|~*49h*;Io@u_)v-}t
zIDf(M^i1yZ6LjN<D+lKCfIFRkkHmf2<Z00D)e`-h@$CTp-`y_LG1XVchT^F(;l0m$
zKDXt86}GHD1N$Uf$1Q^{R<bllVIH(r?|vT@F0Njz)g0T~t~?sw{-v8RpYAU{8^q0k
zjgiwIbiTN|q4|QO>n^C})Z4F1nG;3G=@G`LZY#eCmQN2+ri>A5eiRe<u74iXlEu+V
z*WBfT-yq+Vfa!gu>Sw|@3^L)4tb}pN39U?TL@-9V^}4y8$?USV&lLsqan0T{Yt3G{
zfUr&+S<L>gr&4_U;YpLa8R8uk@`(uq@XEj%CT+py8Y3?vO1(#X#6|C$&Fec2qU7iX
zR}0fmVcT>EgEdoUW4htRuMa~N_2V8(^rZSen&QRLcA4VbR&gp!|M?~UUsf2C`TnIm
z?k`<!AGih%YYPdPxon_72tQ<*VVF3Q39C{aA;-HNZy$r)X)4}z+U%ef8ZAFx|EO96
z_bI&!Ehy%DK_RT4zt})4jo}*Zn!*2$xL<zqJNm+j8_&%Ft9yqGQ}dcS!eOE}5bzhL
zSpjtpSKu?+|Ci`22ZEYjEAgCL?3MTIFs!H90{&?iWqlj9IXc^#%D)Og=zc#xVe&e$
z?0ozA7K-78-B6JV1#`!Z-)cSmnLp4V^x3@(=UDeAAuNr`&$~+w18>ffUoHvU->kOP
z?0G|qS?6wFTafC!C1h^pKTMnM7}*wbsw=_A^?j^|ARVR{Y|dtW@#q=)P@#AD_qI%d
zx4CQ%lg4Zg#I6)|seSX$_`<PG{m-9~!#^wKV&cr=_H5&p-x2wh+WO~~2jrP7Ycvip
zf?n;V4gV})n3BHy+mG)58&%!u8@Di4NSZ>3M4!kfj=cD`@$|pV)RFOTW41VIgf@Bb
z)Wj0kswT)C6t3^Btt2KMCYlei8;ZO;C^}>(Y=~ye)1t}(Y<Poa%z5{pL|(9=;Dskb
zii1h-o{Ve4rxN*mO8IZ}f4WXmZ^CBB)+5_AZuHoa_<albw>IRPxd+^lPhpF%X8hI7
z(Fz%CiD|I&(1SIynWC6Ty;9vJfK^pxw6w(9UK`|)7iNfGj95ROxcMVVjRF%pYCZ9G
zO=DPU9A?qxrU0UP2&T60!;O?Sr7{irRn2W!Y6+i3?I5Y-#XS&<<KM~xrjmE#-HOGR
z$kT4!<1e8VSzv6Rg*U_py^l{He)jPI$eko5T_bigK}1HU)>4mSAM?xgYBK%-B~C#@
z4I}6hrNq+|Btd&M3G8Ad)EE=<C_Z<J9hgzb4$Nxe;D!le%yJ?rl1Z#r(Suq&e-b=Y
z_G%d~Jf~F>C~7q~@|vhu+hKs^No2~H1n#7i!S#1Ej~vyG3;0ixq!Sa1C_p{@P^wT@
z<xgw2ww;Q&v)~3;6{S=M8cmehTk;o>ScGM6IkUQisNH)JWmJzeIsetY#}z0j7Fo_i
zXGsisAGeeqt)Qp!wN;>6D_LFGUZoG0KPg|HlmM$;F0J$Lto1ncu27e@T-Dc|1>B;=
ze!3<v2kkTZv*Q}I-R^f=F;r{!f7Fg|r4i@!KwyuW{(;Ck5(;x;)zg<nlf+rV-mKLF
z!H734Khp{j_i5ynp@EVg1$9M%etl<XhCIfLbW2-s33#PnzMLTU<sv;@*~(Vy{*ry{
zYLz#ekslR;<Z%*&L;3SgkrN63B40B(`==~%&`YnMM8daf=%E&yY3d30VRh}?rf?N#
zH74%xTuodgdWN0Ex5<-*d%1uq^@4uoc`pgHW`C7#O`QbalrAHd55icpedMa8l-XnG
zHfZ;?A;YM!b*QF4#KckYk}MUd6M(mLS^jW4P>%azj{%qcfMf*;#^)v*&Y6LcHW$)6
zopy_ORD|m+|IMQRD9+C`_Ps*acQPnEwg`JWnjgBO&T}BufahG&lFLqW_Q^E%NV@xm
z0y-sRRK+E_hb|XG#Vl<63}JZu&1tTa79yy5@pY}ofWzJi*GyKiC6iv-w83}VVl~6`
z@fL*b`pc-KSa*%AbH{fSMF2I5$F&{uh0)xP7H=?QCtq2cNcST4^=~M~p^Qdc6%nQ8
zg@4YN&XL{S0k>~8LBNeDnAwjeV?VRnZ=}MLywb+TzqxKW(?BuyEbLm;d2a^*kqk}W
z2d)9?$#)uo>e;Vhy)7N<$OARQq|Mi0j3uUm;@Zo`m-PM2koBfRO5Ck}FC(fi^f`^@
zU<XALJX@B3$E&UsKMh>}&!)q|z_PsxQ+%LB2fKabmjsDG&o)5}{B9Xm-p7upcuFUH
z_pOzfu7RoEim>zs{i{D813d}(`g24BJ4&RG6&kP`5=Y$c)hPb?ql%osCsjm&`sHK_
zyQ+*pyuSr_<*~V#=2XN;=8Z4x#Qc5qEh)>*Q|{rrs@(Q(!&s>?Xqxi0Q%J1vw}CQI
zRxu;QH|kL;!4H)x)Sv0CgrWDN&xLL6jUpgVn9RLH?o(0OYCe0!VxJNNX<&0;y;#Hx
zO6PzwMY6xlGA4Znz6kedhJ^ENG2b~^OzqsBY7UpKnoZ0q6D_=U4jF(w?CU>}h0^ub
z2n03rl|p#ARq9(|4@u0I$P)VmCyu-&ek@cVCL_3C`rUF(!gw50Y0Q(o&|;l9@|$G^
zv(Jr*C8ddHz0GgSnx>f9-Tu*))3-`pL3+S^+8~sLUF^x{;(3EhZfB^^`BZK_l<)eK
zS&;wGR9!My%V>C5YC6*<F<sASd2>BjWH~VwT-g0%D)CW5G^c|WLd34&n}}P!mwpCk
z#7q+~<wu`hVAq4WtGqt(jxnwjN`yGz%41KNh~Tt`Av6+bH)}g4)s5q$*<XqaFj{5x
z`B>-=rj8eCECr@>+KVGHc?bR&9xUHN6K_&pE;~EsjaCfVStFL=7*&H-<7;u=XhuQ5
zb#s@mR1CPGYkFZdkA>}z4?c8?l&aOriWG%((ocB^=ejA(-jUbTqI9jFA?KB=086%7
z{RU?t>McpL=H~-D#Bal*M6vL$+LFne)qi1Ir#tWQIWut})s|c3S+vk`Bw6`2lKTs|
zZ%PJlr6(oj1mYY8iR-`SB_~L_N)urSaaBP|kZpyb$3!Zb9|PlJr3*G(SrPg%f;^`@
zxr9G~bMKbkmOOd#fqX{7Z*%zj%wbY~(p$aCE)*)@)i%g!dHbg&etm1?j)_N+hoh<#
zA+$;GhRmMHgHQ{77E0=kv=i!^V1CN*dj^{OMdRr+ir(pH7NDiMMwo~0;jxkCzR1bT
zqN|imdR2+<b1QzzgOn8zB3h}S1?d^RHy-dpsX%LQpB)}0=-VGH*udH%Th#jUf0uv<
z9AgDJn6Gn|bm?FADs4v}OUb&v5sI?U2x3%u`@pr~4yM3=_>KJ57u2IXm2$u#*|5=X
z4QH<Jt*{flZ!C{tUDb;m`C5cAL&8O>7-xCWtn1mb(?YK(p@%#gw~22QmNsFFPT`-d
z8{OZNz@rgGDjRt)OsgqbB8O&pK${&CqWWD9-KFrnfsT{mcZFWb$JKtuO#OKuP2VwP
z=)HRU==-yfi(R*6DHG=HF*v*Vm^Mk)4!tC(-WI$QULI27Ft+Q?C#9_xpHXkZWlt$w
z82*=6=TMUK<kb2wg`c>8!aN{$7LYu#UiQL`I8$-n>v&G!7}jp}e3%yztH2oj#z;zO
zSvsukyz=aFQ>=L%iZJqZ!)}A2B5(I@-k$&PUH$<5eVx%yHopI_@rD1pU%KmgIR900
zOF;_|p6RTg^Hlfo$%TbW;om4BbI(JnfJSflI!2VB3g$q_O9qZo+~h}v$@PjU@_!7R
zVh;Rd$c;eg1Q6r2LN>%FIfkpa-6tD`%H=>YPrKDzVqxIS&0P^(SpFV)>?;<`-UH%2
zA)<bdC-f~|E%%zD?l!7YyCREuspsq@aBGkVR_-$I0+Svvj;-s%1p130{C%pW^{Vjx
zt3=Z{=Z|cXbh8?tc4A&^g+1#gnF5@;M+};xrn_@_qK`a+aqu=1fWH>}P}6&#6kS&h
z8UXxCSZ6AruwD9L=MY2{1mY@SWlZ&&b5UG-N&?4*L$6Vrr`7M%7%43yUG=DdmMts?
z!lG^&$QrgHnwqGJ|Bx>Vlm4(VQ@Z?%8ZslSu~@S`Va}1iLnKuzgTTJ!I%cQC_z*1v
zDcXY%F~2Zi)7>9Lg%+s6ZV>c38W0gBMKkEgxqG|j3@~qceh<Ue{&};<K!&phLpU0?
za6-zXg;9ZPv{{ZM8vD-Cp?%=|JN-mK7fQQB+DlIJ@GzR3nl=M{89@nn#Rcd3c@DCm
zrLtB>pGd$o^`~A|3@1jhMp5V&d8Gz2x3dwKg0G3Mx<iXrJz8q-Cvxz82!b5Kfh}d;
z>}!fKiVMX`iZ@7|f^~g7HJ67QkE}o#ox-MVC=`!Zo6fZStI2w{GUa?}F>4OIe2q;n
zI_($wb7V944&mPXAtrnYweXS-N=Y2jh8ol)Ji}ju`yzSKzbM)$#C;IgbCn2s1ecO~
zZd;L=q@+%w<+A%qGb7yf9OqP7h9+bhA?I8?R*lRB5&d5T-aqe)pP+^imJlN^0KDM<
z<xcI1?EnUrnvrm^a;(`KQEYJggjyB-7<&V{M_#B)X7HV@bt}famKO1&=l7_Wy7oh?
zV9T(0m&QCeZP~G)9e#_;I(j^~orFi+HPg4v5}5glphZ~T?;{=jqwmsHX9_}Z<r}$f
z@@Q;Nx`vHPR{1-dSaOlMlGfR>VB)8{@+lKDO^4=vVs(!`JwpU=w}somx?=MxzVy4%
z;Nq3yS2{dni;qA!xs3r@5o~)(%i8jgXDm{_JK1bRD2xSOZt1`(Zl9*%y(}NL+UBF}
zF4-mF`~s-tG|Qfc$*xl3sm1Nz33;-x0>Wo0$%cnuEBcio+E3xd3GbDoveg`k9DYbh
zLg(Q9i|M>v_U4iXRu|!;p5ew_)|3VglplEVh>UE;Sxm|MHisIh6YI@_kK})kP+8HM
zy13Hd)C7}rJ^U%+M!kGM=pXl*+Da_UEZMMM{fioC-3=aBf=c{v8xzGj4b)AMpiRI|
zUL;a+G?Am+_TFHky_PAQyGkVW4O_JGR+~!|^-M7b{N=qg_~+|-HSz*!R__=fUltva
z{n{)3VJ)5CvPWBS`DJ-|8<Cot{0l&=b#PO&5~7M8;&Nj@C;uS2R!ra#qSzBR%TU4N
z{GfT~#({=3*>gmIn;eV*I`)jmIdUv}OwV=PjhMf@*i`V)x(&>0nr5M$#>);7yq_`N
zW#SE1?KB+P*fO=epyyqamBp;Ll$@Pf{AACv#5H!`lCNRs2@ZB~Ld?rTTWo2rfqA)8
zbM4cDiId6(;;!M6^XnVPp&1iHnFmAAzTqco$XIa+jrNt+GvB{=8<?TboOJ1C+&iOI
z^1TF|0CaGZ@_ENTtv{}K4dA_Q^i*Xz+s%5{0ua6xAv-M3=F-h9a_awuP1U^$mqk`M
zwwyh7tJ`NDmr~kP4zLqkLJKK;IoUsQk_F|Hn+-~IoW$I;WCDrJ1h{JOXnae};K#UM
zMDQ|H#>HO$srSZkgj6JKN#FYw*MnY9o^Iy72u4Q%Gj|*SS+X#qBob-EF5g+}exfRm
zWCwWf4(gJlN6PI1Sao3HSZ=hh-g3xfyoR}phN!y1qDiH-T{Xu0FOK|bJDRfyi_|R2
zY6<ZjCENgD&O?EIW`S}IlIHL7x{(LkA<H7I-lL!;N0nhd7|2Df6*|o36_e|vGuG)a
zp(`1XR<~utnO-(rE20uX7Ig|gf|=NCQTd4^)MXeU3|<R#{UTE~8MuZJe(In#g+nkK
zyi`?qZnKi|hk*yIvDrzD3%ln$_L7qA4;yLs1I!}EniV<;nmTeTQ|3-i<B<+KV)|yD
zqKFBEz=sCQlTBOiY|yhK#Pl+WzUanSp03@De;q*dji>%LR8Quh55K%DgX6US9##Wa
zrh+D4M-aIS^)W-LsSbVDvl(F_K1{CKR74I_#Wn1XgVIVpSWmFKP%oo-8&TrNT&-E^
zk8Z|#{-!b0BxuI4rp2sJQx7F6hRF@EWuAh4^jR#`OSbV}->CU(kQaP5#Qn_H48S&j
zWqc3$yrJrTA5o|FwOcb&pTdHlT2UrAHUL!8S!r^A%F$uO!Hjc?QYYK2+)KqV!1{ID
zkEa=g;&$PWV2y$1DZ^sQ)i*@%D{IOb`p*(VUn9xUKg#<nS8sN<nt%P%RtcEuWY2_R
zY-qAsx9%xHD!M2`O&!TZet#(w>b_Q6vb)Mb^>auXFk0#6lp49!16i-@(pDe~U2++q
z9bh(FC{F_`L%W+XlKT%#_;Eh|H5GH-I`ZBwqmmVzk_2UPm@{azG-WV7WNgvK`Y=nn
zJZS(^S4Wvy=*1vmK%5D8az^=@SWnxf-!Vwbza`|EgP&~Zz)zE9x^Zup8rnUm5sBz1
z$yRKe_TRKzc=k!kQZvO%yx3qyhD3)?B%D=6=Q`wsX282};~;-$milFp@rpxc@Ahjm
z|IRD=4oDkmx|wAoUF$#5^!dF6|7(wCoF=dP8#C+!xU|mVR~Cwz6|ALnj;9hKLALym
zb6vHtu&D1*s+p)6!4*@$D@`ME&+B+Y42g&`Habll-+b&~XdBYz@+@0$O(z=vr)V-<
zl<&T>b#e98t1sg?tsuisU82Kjv&1l2qN*sy5~m`m<yFdC7j|pf?mfw^rf~+#d*U6r
z{}Z#%`1!w-&!)!l-6Jf3K@t}9_dx>||3`bawDsQ#rA0WKot*LYg%8#K7xMy%+$THJ
zbU${_ZIxwZQ7?{zkI=&zilLW1w++=*5RX!Q8#>MIUcN@5w)g$I(rDP`M+1(}8|V&D
zHng=1;>pvcOirzVDv0^@a1>eZA<OV(xwfCSNI?7OI(J9`-N^mFj*sTwg`W3O)U=%*
zW+~bz@?ca8xVg!$4$u2~p?Ewk);?O=74r8oUq8;wZ--pLsH0MVcxv!wPxL<rJ!Hk)
zPj*^pRyceQLq7${87JZI{-zEAMVmcQ=iOR;+vhfOmnaKLczbrSb=GC^d_b||V8|}U
zA$Q??=g+Q^(5}tjPzPW$FWh2ZI|w9$hoN)2hbp^h+%o)+mjAHH^g-+tFGU^TTSzeu
zJO4wU51q|UeA9M8mn-z|GtcK*f5>m8E43|}9hXKwW1Z#-Pp!D_C;$IJk!~YGh`qb$
zJtLnJI^+tQ4?XGoo3bu+cqdG;uG;o{AAJxVu6elCs6C+GvW*EL-odf4dT~TUpzjR=
wj&|40`2ra?gRCk|u0%>dV9Vn_RLBoP-Dp(!<M`^#|9wPgsq3kIP(eie7wD(vg#Z8m

literal 0
HcmV?d00001

diff --git a/06_StatisticalInference/02_01_CommonDistributions/assets/fig/unnamed-chunk-3.png b/06_StatisticalInference/02_01_CommonDistributions/assets/fig/unnamed-chunk-3.png
new file mode 100644
index 0000000000000000000000000000000000000000..15a225cd90026ab9e2d84c24025b373fd087298d
GIT binary patch
literal 2701
zcmd5;X;f3!7LK)8C{v;c2t+ZcSRpbfV1kK&H(?N{3S|}nn?QtEhY%qM3RQYTkT{_z
z1mt362!oXbkU<5c$n1qakU*dcl*<eyfP#S++n;?u-g>{@S!eIF_qV^Z_gd$yv)ADs
zb$3+%TJLKV3Z?Gs1RO`9)`fi*<@E~0&GzP~Vu?HI>PeBW$`vLGML?lwC;|aR;G^hb
zg`=<tC>nvFn0x}AM&L_me=%q%8trp{PoooPVmY6H;(un)_;eJXPvG+<d@-NjC*k+W
z#dMT-RV-eWOZWsyA78R6maNL<Vw${<FJBeQS0#$lk8WmXDT?o59e4Lw`)>!zGH*6O
zu}kHwlkWu-N_FFBS=T9z`=r1wI|KHfQ5jQ$3HEzyE$Rfrm|?5#-1j|4U7dMlcGb+M
zb*J4drRUqHq9y*8?gs>?0cGE^_S(S+yE>bE+oP(Wc6=D-|49u&-sNsB<z@*3TCI6V
zd2XY0u%)8}w)L>gfqFE}bT0p>pB#o6x*+5HYJf#~VR2~E>**GQVL>t_OQ4o+WY4)_
zv7O%)3f$XUsX~Cz(w1ZAbi2Ump<x@40W6)P+gu%+GpX+l&a4b{(!np+6*<TjJ7<ea
z%${Elb)7#ZnyJ-u#ZIh@X0}I_3HEJkbpe(x{#rVf{Bd{pWhbLbUU&(ZQYZET8Xum5
zW;1QkQu}+Jz)!gsWH{nMfqU$z25=J2(SozbERv8nGTtH~2)O*H#~7+l2ve66G1xoy
z@K(oU<Va!!j%aw;5`#qp;kv9bD`%tSgy2+Aqv3TLg|(aNiX&=)-R8SGM<YOFAC-h7
zswv!J3~cXY%8BgjHzf+67HCaz-V8-1p3Ji0r5DYZc}FH*<67U;J;w6iA*z@t%%F&r
zk`W_nmjeJ#8N_<m8!(5>A0zQzq>%Y~PtnjZqvb2vbswN3B^g!+4X7eBusdjvIfSeZ
zdOC=d$S>?X^25sO7eBiFoB*Ux@OD+EU<C0<{9n;RqMzyHcF9)&&rY;KKe~9r7Wl!`
z@f%2LFWO)m39>i9ICN2MrvY^07oDl|zk_94A&^}!(TAjVB4r@_$)WP?5|tPx$o>M>
zGw^CSqsjpKwkbhaMYdc93SK-wI4mN8-M^O|KP<8WwcnXa$gMjLEzeEmGl-e`glM?9
z$@~~l-ur02(Q-nqbYo3i6eFC-Yvp_Kwnn*h-JLocIKZ@SNuOAptV-M5PTRQEh%-Qb
z%s4l7e(8rQ&FrB;G_y8P78m#=7H0+F-|_|yMMVUE1je~Mc8SwM8d0JY&@*`!s&4Mx
z0ZAqEU>nK|?#^CFTKq_@<PErCr5>#O)KX_aGeeD6w9ggC35xbUJyO{7ECa)I*MkpV
zU}dM4a)BzVQB1nt3n2>7zwIJ>`J2U?4CbjVH=S6KOT>dS+YSWid2yE7m#Ei;VN{mv
z193EL#+Kg>N&V(QH&ux8Xj9GPU<Nj<?P*cO>|p8Hz{vhXRiZ!8x0O^V{(C1iiU_ZU
z?XH|SFq)quKNr2yZ4h$a@a37@bmZNa58}H``<kzP4+;Dgxtu_G%*s-p2P?s**A1(=
zCL8GA7SURqAK+vxd1k?X%ew0P$zHZwh0-G)4+6rK?^uF}#YSFS%xUskXiWWjSi5@W
zN#XNq_V8;p8+wnY_Ei^awwB`5dy|TTJIsGU<X~}7hq=#k^@9F)WudyouC>Qxy25Ql
z`ewlYY+BA*#M-5mA`@o$+G#omTHh_L;0}yLnvx^;&UBX+y?3Cp&cps)hop;Vo)(5?
zt>GP5uU#xh2^_NMzPNI#Qr(gQHw_32(p~Z?w&f$3^n`~y^I$;dC?P$7h4=Su`WwCS
z<YetE#LLf6-zyoPqIzQ+e%q2r&OHEbeU#SR+fTV?3H?}d%YnD|=kwMdPVcWk;vXLj
z88P%b{Gr7JxTtucm@~SDl{{q|I$Ej(S-q<00uc=yw=BAA57785G6gX~7j5qhL_>!Z
z++Wx>7<s%;)obwi4hfqCnQ`xG$0MrmN3sl;6QZKYAlW#?VKdahO{+*m_Jz=uam&eR
z_tV(hLVBU0$JMxHK}CK8NZv^JNgsB^jW!!C+f71OUn&}4TP}l~y^lTT=mRsY8U8Z_
z5)AVq>XHUjGY1VNCF{CAAq^LM#HG=^l#^E4Q7M5PY%4L3yIHE*Jns`JQf@ZH)ZA1<
zoFHQ_f)K$P`3?0>`+GbNgM09W$Twc?Nsq-3p<JKPJYwvZn@P3JzP-_vix|AW<~2c%
zu{S~Jf3dq}9KCl|s9jWjqu>PVE;DtPALrD=5LjYszL2CnI9A{#T22XRgG!ktJK#TU
zhph)6CIH57lk$$UlJHr26ysh$;ZfEDeCsk`EZI}+&MLrvlmNy@V)Kr$>a=bb0J*Ls
z`Od7)JNX>IxZPDqWsR%7bOCZZM1>A4PFp0{UVA|aDt!|X`SX5f_<q>HTeYz<ZhJxh
z!vNTqp<zPI0c5-Owb@ffZ<X~8hemJmWNB~_x7)dY+@i9&hQp&bu~Xb{fdc`XN-Q*Y
ziN=wmL`)O@G)yh)pGC5+C__KF+!4;NxPJ+sno2DeebwZ)^U2H6X0++7uj7wOWbeeF
zbw++yJ5sm%+=z>|Irj?U>aK?&Wq^l6<CE+}yTAC`sfaQDLec2(|5TrVlF+tblQ~)Q
ze#q@qlql%{Gw1=enlzO;PwO$McdPo>I~BV`$LXDwr0IsX5tA-(K|W7kkXKyeT?|aS
zv_BLx@0jB@(h`VIrnde$8=toI**(NsDR`|mGw?puw6DFbu}1J>e!MYD9XPqzeAVOC
zc#F{Yw@+OsSKRM^=AI~@&N5R_Cy5N5xy6MaZs!kGd%w_k!{#c_V`4?&oZ&#IuVm!;
z%`QdlHu{o`oDMb!V1w8sA1Qen@DT-bilcRyoM9D5**iw4HB*<nIQCskx6cECda98m
zG-W{DMrf^Fbuej8bF|R=MVj*g+Y7oW9c@)%O$O4qCB87lw*I@uxwS2v=a)irFtOSe
zHtEE64vhr4@ejTtRx&%!U~8_w<$rsd@+wB3J%Jo9NiG!N?q2V0jxm$GfBno->wo&2
zY|^QT`%u51WN6``Lt6QCI&Jn=S`#m>zdBY>cO$bBvHrH*u!Trc0_lLNPsf>EfATJQ
x=)|s>2sM-vpS5ne5{B8NL&E;2JN*at{_=(~FBfEDG2-)|(wX886gvbZ{2OcaAs+w$

literal 0
HcmV?d00001

diff --git a/06_StatisticalInference/02_01_CommonDistributions/assets/fig/unnamed-chunk-4.png b/06_StatisticalInference/02_01_CommonDistributions/assets/fig/unnamed-chunk-4.png
new file mode 100644
index 0000000000000000000000000000000000000000..09b7a5d293edf8c1f574972f4cb231b220db9980
GIT binary patch
literal 2868
zcmd5;Yc!Pm9)4XmGje%pa*bw2<QCB+;}FKH+{d_V*S%wE2$4a^rNXF}%H$H`+D1u*
zLL(GiOhuANJIxqrXre?zb}2K?)H>^YI{SP%U(SE6-}*hj%X)tQ^?Z7Ay*&3Q$Z5&}
z0HEOF40!{91oR^iQsT}5+|AG86zb*f>m(Ej#Sj4S06+oocmPia!kOYijPL*jkEi45
zY|76W1)xxvLOLFxi@QuZog-w1156Q<DH5{jcs7U57BSf(p^!-ta_B-4Qz&AK$>TR&
z-6y6;CwhDOto`=~goJ2)6z?MAoC6a8V4cd3kQm_}T?GI+PZ!9+H>L7p)u|+oB?x8T
z$S)s@tlZrc<YpmSGmCz|RpqWJEYWcx+|yHKKzD92-XUu<I%CndWtT_QT@?rhl(F_S
z1c;IRKZ6%&9pAqZxi;Zjm3g8E+RMSHIv>_>N~ppPkG^Ol>e^zaSzs=$;nUpSYLOm`
zmiUOpHJT_xD#s`3Lsd;yC`=N2?a1u2`Nq>;XDidFr?LVsv;G9DJ}mTPh0>A3+{;!0
z!SF4=gN<AiPowIV=%zt{54>>APH`>v`~(>jG@UN-?y21dnP@pdI-wKa^4SsBx8gdu
zd{jqkPQsYF4dv{OlNF@Pl1KLO6wH$|3}dfVKkE*sCM8M0hIusgloi#|TN$0`F)4!l
z5#B{-xYu77oI)X~U*BsRsR=!Pzy2s|O!q~$`cbzRv=bIeElQ7<kK!%I>Ksm|Va4m+
zrG=pG&-|@e26Q}hh2iD=5Tl4$KDHSe#_h+6FZg%UvRW0)k01E79V1r{)Bw<MwwpoY
zD@WfWp~xJHX6==$MqM^0H85X^v}<KjC9lr{di%*~qs%>(yhsV~q6FTwh9U3hyY~!8
z9>36Is@i-l4CzEsBR|yEB%Cg@nBSnkfWNPj7p)BXB;TPTA5c`ue>NQ>$XB%L5SHQf
zyp^>;;v&L)|Ks#+n=&jF+zc+}*q<IOysKASNP=JaK&KtYo5q*AmPfnh`dtfLh}UU_
z-X4n~$ydMkFe|6a?4|~Atk`nFU!8))Ddhwu4@Vo~&e)(_-SB%dTe9w}xVmlUcGPu5
zrn+z3er^m0;iYZfk&4)dTnj*<SkDbI9W?2(5Oik%oD0rW?lJv5Yo>l*Z*!yr*c}Fc
zRC6{}B7dhux}1=N{B<!T88zqp6ElN^gTLqIy6w7*X#*?F&bn_eMq8&7TIZ^&)}d1g
zHs!PlcUZINt`}|Q8Pf2E30w{Sqlk4D+)y76=Y#7osf0ueM?$d&;$KzqZg$=YT+Gb+
z5r#a$Bo+pdq$!UIR0R<(%mw`>ZXhK{FCNEZu0-{jvV;R_RkrGq2<73k&2}#vSWOA%
zkIhb4Aj0IajaBB{72%7{O<l>{lYj&5u;a5Zhv+WCcvF|Fyp5V4?YfL|V%A7`^CQ+9
zDN+W4V6&Rhc=xt7<S3oLP=7pSW%2xz_#5&qtBa(Vu4}9iWu8m845u$R01l2yeSY~L
zYb(i#S73c<Ic)4*WJl-Kov*Gy1mD!UJ9~D8mLqul*_fgu-DK_B(8jnVk?6w|@$0}!
z{!0tymLpjhRl7S+w{hjEyQ0hyEfv!%qHiG@*d+da94O@1vD@#>r_*kVytT3QHEnz5
zhCGNSmu4SUygo^Z(jdQ?Yu#8B+a*Z&LJZB>tcXpC=Of7@K@z+q_PwNEV5jFLZSF6F
z!^-L^Zh^FvufbHQTE1j|g3r>4nU_P>Y1?Rlu;HOI^EPkIhy5}Gu3H!n?cbL<O^JR3
zuIC#*%-vCX(J#v?l^In(D=84ZuoZr>{XE%uPqIJ9ezn7DA|q`bD)^MEbTxm$wqF!N
zftMuAZJu53v2WF66`a>Ah!!g~h$DV4krZsp+59Ef5WyQP`SrLu^QJbh5A%euaoL6V
zN?!`(lF>Rcqh&9Rt>9Ld=U#n9GedDOr+1Xajmnet^TX)7Dk}(t@2JJvUlZ;8;KG<>
zw@gNd0V&6TW>A4s$gvfO+~L$AUHjXwA6kRG3&$O8hKL7`*|k`+4j7t7RL&rjB}tZ%
znt5qtVHucU<92fFnhIg`$im*an7v!!nlB)^B;pk)8|<$@p7fwG-UV8)!g9dcr)l3u
zLOJgpHugkofKnB|BFWcLYEnO#3T<n=H?u;9yfOJriiF!4VbfGO<|BkTr_CL%dlcJH
z17P@RB?#)Ohs5YxWla7j6D9IJ+nzvzyN#Sl){jrm+U}dLoib_(zEq)D(EXd95`A}?
ze$H5v0r8~z&l8UYr&DaAR~P{}<FMNiRFG0sUt=>Q?5U8(#$`@J;L;YNMl-7wpG^U)
zru&unmyQQm{nEkOt_^*b?7!bXlk=mk$iEbT#$#CHZ*@A1RX<7gOZV!735D%Jxw*Pz
zDY(pSGVT#HC)tncwFIkrwCf_??Z;RiXWVROn?g?6<$vhfmUdh1g=Yx|CCon*5uXr7
zaRJX0Cg^QB2HOrw3f!s9V9wKV1o`2XX^otQ=<ChzI?N*ENc+bSyaFsnHI=`P6h5X>
zTY1`&aR@;wN;ZZU4NY|!ht`p}p&3I5G4Hh+7f2<wTj8z?90zIr>0k%x`4ooi;dH?n
zG?qR^ms7T`wI|Tz)zY`a9W7g**8Oon7W<d?hM5Ax@=Qd}#GX|2&2#Be@C+x}iw+IT
zum;|6^dZ)g++Ho-GU@;dJ1MBUCNBtA58FUaZP*8p&#gGd5%YM{;6hQ`I&&v#6x=;3
z@8}*{sapHt9YvE|%qs?E5lxQrl*X7o|I8VJhQ>+tdx&fXo@)ii$$)0j*m$kQ8JFrB
z$YP`nMK(x7LBhm+YJ04d;GGp`6LNv8&`YIFOZq$T&})v$m^sOu8-SgOkQT%yu&b*4
zl*Q;1$0YA8CLcTY1g*32t83$mLLt7sq*^umW2F}jfmogdr~FOuH9A^kawTK^`xcB*
z54Lx!KN@a?0`-1QHe&Tr7)gRM7X9z!9r?F51Av1cBx@!sMIG()_}Ejg#lF+=wL9#v
z@#91s=ddrHW%_oo^v0#{4fEVh1@sR+QO5hZTuLdSzscbF@WGcZjCqrf-(yOj1hKz-
z7&>;5Gh4j`Q}o+wJsw3zeM8GbgF2^<#;u;AT}XaCfg5bF{H@4yz;(Q7*8uXto%@sR
z7eDipl?Lp=9kUJXSA8^C%!HE}=h&@v5o?9+-$uRKTu~#PW4O0+T0Cc22G^A;t+I3P
zVfRt7R<kpTl?b?eSG`Bj*lM$qk)jV4^0R)tZ_gHcz1Yg4eC>+fx@i2;?kVUu>%5QF
zx&9{qgVkEf>PWg|sMd}%gD38+joQk^Ug>lgZ{R<}{rLo)<WoKu`8(*5#P4*#y(){4
q5qvGv`OE&PT&>^Vs{WrX-<p*FD&lDi>5rNp*4M?!6KW=eX8jYUukmI8

literal 0
HcmV?d00001

diff --git a/07_RegressionModels/03_04_bonus/assets/fig/unnamed-chunk-1.png b/07_RegressionModels/03_04_bonus/assets/fig/unnamed-chunk-1.png
new file mode 100644
index 0000000000000000000000000000000000000000..fab11c48af437d120b2a6687c6f1cb29094863a7
GIT binary patch
literal 4806
zcmd6Lc{CJYxc*=agFzTX7-J1($vR~j4Q8xkXQXVyh)_t8r5VduXY4|mCL|Hb9+I7u
zB~(MHB!j3(cCLQEKkvEc+<Wdn_dD-<zUMse`@QdX&iBvvyvbN=GYFR$7XSc&V9+Q#
z0DuMd&pFuu0Dz49#k!;I2G-KSWdC6Q2m%0l0017KM*;XY93ee`o*n?Nr*~u&y(5Og
z!2iE69)QRH3sCUBcznY?MGrvvmw~7F0w@g>$~1#Ay<h$QdxI~a;h>@6V4p$JV;nFT
z2mAXC`2A_h{z1e30pqCSAppP`V{r4Rtzwv+wf*6LYXJ@cY3CM>&VWPEuAu+`x4=JV
z8UGlw2LK%F#GsH4H;Px>Q}d=9kG(FnVzgc#pR%473TpiQWbp8?`*iY6BwP)^l5(M>
zWkJ?j1<ZQdcl8{n-K<pxyyI*Xt8<c|PbXO8Gw^r_kw+H^Du%IHQ&|)S;{NZ@n9)}w
zFRWCh00&#UGUcKA6a4idn)-(g*Lnbe`=L%E#t`Jl&lpOc1IhV%m$KPM!RK6oM1xz0
z%Z4J{k<Rnp-1^)d#}k!MJIe}No;zzvN^D$~*n$p7u=t5ya!K#2&qco)Nu0RmZSA(|
zLYUmRQFE*am6Sk@oGvn<uwUViuZsKXR{(C$Xuizw&b^|B6r4Fesz`KsEBQF^0l3g5
z8YBoD(v^A?*bOcWp>PCXn`M~Di%yw}boi`-@dqm(L0k)>GcNC{l#g*Ed-VPvgLU(u
zl-rgB8je7etTcw6{=4=zw((MPiPsEH7sh7?OwQJa7egjtv|k;k=M*8V@CE5a%`BQG
z2dhBpOL?I(t1ZL#86W}KF?Y>KT5;WA?XlmyC;ZLWz^&@EaA_GoN=yPU`L<+{aJoEM
z2r*hB<7YD=YZnoM(=34Tdd%Sqv%{=Le-VH3lC;QhOE07IzEYnPg|C0nIX?>g;U+sW
z_mwB^y3&mz;G&h&Uqj<Zj_f>v#u)7#kS4*r2RWtgk*WuycfDRudo=2n;`O$ApJIP`
z{GfpQrLy6fIvFc^MnX==31l%31Pk^+O#K!n`Z_jB-cingD^dsTPb=K_<w17N*8W=G
zvEf8&f74YJNAW8dwsi}Px!7#R3i8I8KBJzg;VFYhkn>lhnFp1i1@c!`JO5u@i1NW?
zC`_jlh_Sj(21B00pi{1JUyVw2c8&-=;me=%Xl#xIPNdS=WT462&*QXN_U3`P%n$v%
z85<-{JKhHVo=lh5F`IjOt!9r*y+)~7Mj`QB=`x&(o5^nH>^0t5P<v3?w2kGjTQVK@
z$(~}s9R2K-2fQ2BmlQ^A=|3x44Uo6=b58``tsjcmJPUZ7_RVO>?xaBnn5cI7wx#&G
zdmYPrdjWK@or$QQpyhtA7Qr|Z1Y=LJAWuWCIaKJ2TC^qupU&9URe+aVEO|+qWPuif
zQO<_Id7b0IZzF)3Qk8aP-pMSd+A`0fXUrRQ$v!{Afqzvy;pa8_a#eXt%qG_#aMG`2
zxD5lph-n(G$fGdA=%C*C*C>yEM2aYqDpcCTVS=ZbtSAu1Kb;MwfPH>>*Q7yUWG#8$
zla-fouHEjRN^GC;*-jZrUxltbs7c$HN#TDe3)L!0o%sFxr(L3$7J0?C%D&Ip;Cdbi
z8f4-E7FY(i^^b)Sn*4bBqZ)BdK((IK+opnFRSh3`IyFN*?`FPdmxY^yQ1}l|JgPLp
zI){i8Qg5v_M!IiREjY#Jz#J74j9TE>AG5ib?AG&^+>RfHo(Kye{lbNwHNgo)HB}$t
zKqcB@?yrt@Mj3YnMG=%R2o!VDeAD;k@u)=az_;_AOSVmZH%6ZJ1P?nKrFY@)#$)Vs
z&FyM1RE95(1Xmoab(7;1LOz3&(}YWxkKrb(#n^&OXpOm=NJr7RN%TjDjqsc$?DzvH
zZdVOdXRoEm4JSV%WVlz-dk!6elU1Zh1<eUdtzQsioqGNxtS!ho0norNNYpid_k`42
zFwB4E<Qx73*cD@mfWa<#=63(E-nB89!z)<dgSj&U%el+^(C@!=&ltjjxW9Qv!HwiB
zi5)RJ%?I1_9aA(#(}V`|ul1oUgMnJe6IF5D-mNkBt#@aoHQXIj7Y(5v@Ru2mrUD(Z
zp8$?rVR|2DmgD_6#SKbzknDAAZB=iHrKMQl$vc2G@EWq>Lx6d;E;}Q|o-x9J8wmzN
zx}LjgYmwX0Q3dkMa0}N&2PJPskhsTQc7BN{nfGs{szcKcv9lS>RIkY2S#Wa%N1T~+
zZEahWx{ijbe#NI-b+=w?J``>E5SA-p_D7(Hi-$!(&`TzhNJ{5feHYclnx}?0+F`?V
zuwS{&qvUJElqI*i4&p!84~lHj|F~~9F!8e8cOu=jf$#g3(&0w0dHAD&o^@SotW3t>
zg>C3%s?vrcFW)y$x7|~B2<TQxs1vZ^jLYbXmuOc|8{&=v-WY?#TT|-%Ek}dX&tvYT
zggH9>K@;f**P3*n-DD;q-|&2R`yeo~oEy{R9Wa=^>8Nt{Tpn!bc1mA*!esH~o3<>3
z-`h{;T{sG{W%Z?}lmjyN#ZVu=(yw}V#0OV>AY|nm%T*S9Pc?RwF+81Obpd~TmaKlK
z2H@!TcK%}GmdkjD&ZAft$@-xF;ylmk;Q5UykT}m5(_A?T8D5{U<?2kS988V<#GX&N
z@WO*>-}3NK0S963ptxUSqP~H<G7g;+^0^dgPU1kA9J1Nz`SHGe_sfw&(W1?fRqM4u
zL<gNdIA^_y1Ai&%mD2P$s+~rjTHa*7qZKU=6<t?;+1{!yE#Tm|rF=|j_<M%Y^eaTL
z2^Q+@Z^JwVk+?og_nT{PYVoQ&cy2@dy#qp=LNmJMYOHH)KF8unp&(p6%nI8KM+O=v
zBmkdaz3m5hdhEXmHER#r%g$F;x<H63y_RZ3n8ljIx7;X|Ay4hN)+~oC|HT_*%Dgi8
zW<+O9O3MIx^i`77aKtAzW?`cAO`mf{@6hRL;u8t{(3W))Te^*V!Zo4PgbhS<JGzdh
z3Yhh~N6a=!^J+B9X1f-gP8uwSdahV|4whbWpZ#nU{0;dYM+kdbQvxt3lp4Jx{9;TN
z9l&2m#r61#lh#&K#x~ZA!$MD$VC*+8dAJ(^^$(j}uq%RBuAbaV|1Lm<wSh`ARD{Jm
zX^fCW8nHGwU*pfmu-rE|S^v>{{U)KCqam!CXXs=wBS!?DUHr6<NYs$lE?J>dH_Os#
z(X^M!0uj8|5gAuB9@7ORMAVsPU(dt(2f_Rxj*s+c9;DU?wfurQPDd7$V`*O%khj*>
z)!n>X1o0&F*>!9Bk4jQOR~plT;~3;cu9Z0uGOMye<th3F&}1^}x!Wz86$Y#!qDTAa
zi5rRknVm{lbT!qt@e&Vi8BRbz=HsPhB@{N)VI>*C<=p9i;ZZgWXC|eJO?OW2Nzf+F
zSo~5&V}wT$?OUi(7bP|->YhC1P4-{tF%?%1aBp#n=IdO01L+Dcj`srIPZas8KffHi
z5vSXwouW7YXty-lB#-`S#BD(CrIm&(3#Jzl%Aq)veRF99BYyk9>8Wn%0~Z7TSrqj`
zNWPokIL^X<?KPCnCCKXNog9?9E(e^Ps%%$SDT}K(8$pbqjv(&a%Xi85;T=EnQbiWU
zyht!E!D|$%{+HEdufU#gsW0Z}#YDAEBFp_`*f7iBx$RKgT~;YWf5fwoAG4qEc?;f!
zvPz^iVC{?891QG_vlHc+tAl!Uy8`3{q}5{t6LoQQLb$IYD(8Zf_dcyaG8`=?5-tv?
z-|N)4%P8@IChr%9uD+<WJ#-ICxagSMyx7H_s2vS{s3ceh>jkmG*yd{goZ4_!eR#m3
zvLcP%Ex;uK8&PHsg+7pKpF$Het5q0rNMWT2%;jM9SO_hS^&zj`dn|FMq=smF;{D#Q
zfE!Y@-;!;gvj0|#p@MQRQ1FGN#dkjdlqe&!TLnE4wlV6pprxZ1(h>4r^SuVI=D+<+
zh{|2r!2TA|cq4a9)a{s>V-C^DZZ^8cbeb>aX|KXA+Rlo%@uzU@fV|(3`B*{puw8Pa
zdXk8_!pdZinA81MV-$7kBK$#ay#gr-X5$0+p13_!Y%$`s$47ZD#jQJ5gfJ5F?q4Zd
z?(E_;LrRkc7RyDigOKA{wk;a9kDnSiw#F4^)FH=@3rQ>aoWDO`fRsbpxEUJMQD95%
zztuq)qHf>MY#9EGe?Nxqvr|vGEqwH=3x^b*Q+9Pv<r`?e%-PE3)^d6^6_IZ+-kT^O
z`%)JZH}Dz(rW4)IWq6nNfM)Kbc#e$1E)yP|#p-epXI5<f1`gcmu^LnvGe8>t^sfb7
zvGHH%C)oR0GhL+NNGoMn1wk}Ks7ycZB)0d?s*nOds(o<_%@;Y7WbIJs1nbU<&E&*<
z;?)r!r=p6H)Dr+)Q;rmyS*~w)^`*sIx)qN@te2{O77#FSYZ){>CGv@dgFNo#ldG85
z<D^X=1Ac}OQ&U7{jHieH5PFwm_UuWe3ouC5noyPLp+2UREm)K3x5ZImu<a<iU!KPj
ziE1@xTiV~uQB!3k%Z;n>syW}27`9G1>5<PGsZF^R-hOCs57tYO9jlm%8}l<n=4jbF
zi+mfLGRCGR-!r8uoq5mwy*#z+&KRcrq<zWa@110T#ARfw|BJb|=gdAn1^;nlY2YZT
zdtiSlE%u_Z<nF}O_Y7SdlA>p3G`lpR34AqK3_Pw6U3J#>pYgX<!JZ{@W(7s_AuHF<
zxAp-WzLS;TyduTfh-6ue3hbcBYf01#h|KTUIp#vH*e%fA{8BBiL+>Dh5KS|aX9037
zUTT5MacMOgf0@{M%pG1>;CN<#;aJa3wkZEbQe?SF40q14#ST~HBN8>Ff~#($`+4}1
zB6G7WelP`!t@stq_}P}kZj7^)8?-&J2sw?6jKWZM_PCSsZg0e{9^VUunAdBjeMwT4
zUJ^B0okmO~3j-P5XpO&Bo@^<hPwc#N0woqTiDXHx?ku?snBpKZqOXR0kaX~qG;ZS<
z`bR!F^4c~1j{fc)sht;sm0ngpVFh5TuZ=mi-L}FGx0r|41R_e!^cV^^g71%+`w?@*
zC?cBGL`|`F5R!aFbk*unEfm^P@sZqatZVTi)rSzl8tE$}ljtCz-xVkHwvw-2=Osdi
zFKfnZ|9QZ~$&F9$`gOqeCU_Vus4|bNe)Eq$Qvdo*FGEg_F)>8>8|+#vFEZL$D+o4y
zZlHTrv%+RON`=7VqG-y#?Vn9+C*8H-H}t;hkn^s8a(AT;Zi|X#pyNT(AC{zZLGDmd
zTHrq+Rv#W0s+cI)!?yVfmyp`NH?i}r%=bsTyf@uY?V=G$IR18SpUZ`K+N0kcmHqb@
zVA~#PL!`d12q2`Dt}d1@&7@0SKMrZFG`*Ba^QP|s{=a;7mLAX=AeyOjzZ(`*MUBRF
zt#R_eI6sL=T92x$-aE4@@t-7iGnRhC>c7_Bk>JSf+Hfg;ubbo7zKFbHsz05sfyVH!
zhR^)C*|cDI=u|MdQ>k7pbQgFk;MUOo-t4utrEQz-x6U>R{xJv58#mmKZ=PKLnxD}6
zqiV{z+P{n`OVGR6u{tE&p%S`REcazwHTG49)1F-Od`IE1xIygU&vzfb`9d#gm4}n8
ziBm0k8O-@hdpoacZi+<3Y}T};=Bg0n<PDYS)dwz~3dmIPoQ|px)<28UNYcI7z2<N>
zVY=)sZuV_gX(WWhp3*?e=lhV{7E_19`p=jcH3p5Os5-e|J#i7bb|j~>17G~xQMpCT
zSF_we=<B~NG~|h1u^68EvnlN(X6ga(GPT2&&tB#1^L`BsXKur!@5nK<d5iTy!@H~N
zX1f+I3Ii69Q}uQ?<gfg%<`~ZM%+N1|)7>F>;>DPQ;6-Y`_Yo|A_@ivG|I0XVQYsX|
zn=j8?H?+>DSqT2wTaA5D9AqpaPtcpD>Ob64yHG$2_#a>3SM0Mg*9%3=Khgh&Q5X|z
K)DvS5;(q`b<et6&

literal 0
HcmV?d00001

diff --git a/07_RegressionModels/03_04_bonus/assets/fig/unnamed-chunk-2.png b/07_RegressionModels/03_04_bonus/assets/fig/unnamed-chunk-2.png
new file mode 100644
index 0000000000000000000000000000000000000000..1d2e71d3db18ecf478e4ca0e1b96d71770bb00d3
GIT binary patch
literal 4765
zcmd6LS5OlSly#605^4g76oC*RRHaB)N<yg8iwFqPf}sjhq?b^oC5Qn<gwUImND)xr
z13?f30!mkrCLL6Y(#-n(|KrZi?9RUIoqOk=xn<7tIS<TD^;wztm;e9(tDynL5&)os
z|65>s001E3==9=m3pF>k);;@k_7?&GY5)Khphf_AH2+0v05vrLR!!}164d@q2(#G#
zx5fgn*nbxUtOpj`d`3_M5dOWu5<CEeW&&YumN0i#JN>QM1JL}Zx%to8EJ1Dd&+P1<
zv$JOG*&N~QPxINI*}sf50011V8TOY}BFNIziuT_M01c3SZT0UD#NWU!5CCB2__yfB
zKS!Se0I*y`49Yq*f7_8Y_frci%Q({4@v5hHg|Csy)bEj58jU@|{vN>JR#YO(e*IKV
zR`#$lB<v%UCz3cGrJ`2-duI)jFJMZf6Ca4>bpHpU@D<4Gk7rRuf%4(>|98enl&ls_
zxg!#OytGSrJaR-uQ{Rv6pH97n(Zdo)?4E%y0X4c#H0&*zon|2Q7lX~VWEvpH-_Po4
z`IpulvkAld?|*ynctO|e3)hm@hlKK2B;-&o$I7pL{kiD18gs`~7JRS56a)8sLmjT5
zj7lM`G_LM$^gze<aB)AL8*KEPxOnF=q$4wQqN!hM&KZwvze2VEQpz=M%;<3{QjS@W
zDUSj)EoYKA70Z+apQ9Es$&6ukI>nE<jx=FXml02?q#6MhoZv4M(%peNWwy&~Yh=YD
zR}|+}1PQNXQfi$ZGNajb`fK&IHZ|!8mV!CNBQUD`)u@E;(H$8biYeM7IxL=|s4zAR
zG_4!SRc7*gekK#dAv)%$7*5WA@vZ^(gK5iCpB~aKPu|Q(&yV_9gCX*)b$X8B@MJ1o
zOlH1D<-1b9)h3)A>f%3dhZM!v^T-Pf^8z4mD8kr7TgO9aEr~m1K}Cm(*>WJR1_UG-
zTs_}mg5O6-p9mFwtUiZSE|TGoqUTe@F2aAwJ3ml^gT{m(Iv?s4PX~F^mLBoVnl<ow
z=;vVsR4m^_0|OKkwZ#(HY-&?~?L3jrM5LGqw&f?}$pf*beVt;G2To4PDR9$h%#(wR
z{Tz2s01xXbv~6H}5$gbMpP%@8(IUZ4inWuH>3PqUVFrdTMb7mlB;6!3Z8k*q@{?+U
zh6`U^+zZXMT?=;`<(`G&twVZ%V=FzvZSxG!zHi-^AwJcws;O}NBb~mg@~7sF^VecB
zcPy&wKdp5qPet;+g<<kfdUZ2Z#%{A#PAk#2z0@C6aLM1VRY~%MR&A-(`7Kx7KMp(h
z>{i+(Nq41rPsrlg$JUVt+^OMXtAOVUL?KdHMR2Gzu&lC-o7bJeY3)EPuD1%OU8&++
z<g#mwV?h~~O6GMcPDnoCe3@;_=w_%wqRYxrH!<%Yek5lQPaMGhId3^KZZ#Q*Ff}YJ
zbA$AKF^CdLT0xZ_nd?eXSbXmR59@1urTnJL$NM@qjx2yKPu!gE;K9F|)r1~Ko+5xQ
zLkZ5-C)?>6a04bwBet@3<t;`BH`Xf;lfKF2Jl}Y+J2DNxx1!6qCfd9>Ce^`t29-o9
zo|rhM?Gmchd<i(fC@d~6f{I3|P&}T2x&_r3ihUvvDJ6=PKP7rd@D{-_w;=uIaG!Kn
zg%s6#sm&`wS1Vm^gmEpXi%^&mGWR^R<%_=LFjlc>1h5xmg*;T9u>g{UbO#{gVMf|@
z1Lyn8jrrE;KAH^PP$n-&)HuH6)gT~nc-M?@2R@Ybf}6B>|2o|Ry6#L%h3={oC*((g
zKIfn6o>op3X$ccYgBf%TEfT!9R?y;N202H1V$(1*N9qIzCJ)Zbi)4~T)~TrPl%>!S
z5dK-=ag3F6Nv{mogBnHP6NZNDv&k>j!cvey&q3$u@aT5N$x*V@ARO6*zCLyp0zG2B
zk^?KXI%sUaX&FCVy2^&rBZ{VF{OWeie{Y@|f*6JdF!{q#qgvb}S!tjEvg;D;0Ibs8
zx}u3mEb>bsOwlk2LEz~sS0%{t@%qxisO+z1Q1Q(dfzNs+SBpQf+k+RKb!BKrXK4a)
zMW3Z6%k7P6Roa}ut9|wYouXf$FFZSOwZU&2|47B4WzR{{1V+s(7$`EEm*m7afraoo
zDgH^mDx1OJ%V}*d4jWg@SmJ6?>z+Bftgf={T;Om=OaBz7=W@2ESw68pMzKeO9EZ&_
zL1_Z|`?~Uz&O3pza6@KDVwqR?%^RYfd`5KUS2F6bfy$rV`(Yix0F6?xB}i_;$Be3g
zT}{uYOC&El#t09+ywT!R<pR<cN4>lD)7N=0I`XT@`pH>FUM?yrn4?ZpmKnX}mZ1l$
z#DXAEKn5f@%<)#APhF%KccUHhmO#M{c-+>efkjlvs{!HltUKNB!u2nKOA|BK9-Ntz
z^1tm9O)jMC7#1KZ-=zu~nj1YGW4k0%AO)!;!7p!Ju1abXaJVk$V%xsb^2QC~dQ{8%
zayig`sD|kumD?8`GJ{1qy&mPf#$rFacY(?xD*5lfe(Y6V&Vzn$M&YnA&i47LoPOFW
zp-gGv(UOlXYPp6R2ikzRg_c6Da~`k{#k=NY=ei6Dtvo7MnuaG#{gP3wr7l}NgICUp
zD6FgMMr<!esy_9j_$5e`I1aEvx6~kRL$^_MAM&i(;FaAck`2Z$TN1}RW<R6%@5>rA
zR%;qp3i4|_e@f=kvIiHhxeo&a&bj3Ja;z<^B^J6kcIkJ45+iSijrobSs=O@E7AjTf
z_$_Z(ZkU|f!`>!BJ$x~u4|6@%pUi`6-J)1rlr-VJfxX;nH4Y=Yk4_#i1ldEwtAgt%
zXWwN&y#3KEHTLEO#)U+9Rf#tVge0L0&ZkriR4L93av8Sq_4c#iW%}Mz&4`!6q<#)6
zM`^qV1szL%6v^BOZ6J`OACT+%kH=oWGoTJ73%xh{65mkaVj!3<ek_~`nexkP<*!BD
z5BuJ9u2(#B(<1%m2U`q97Bhe03*HKo>RR62LnkbK(Kn}7Vq!<;F8A4ZVm5(4466Bh
zq^~m?ag2*b(Heepn&6v27U101a0eeZ_^uz1W5=kZG}F)%#ZyX8I{>IbQ*|)k<oEqh
zTUv<wf<{Pe(^a{3lk{%x<GJxvKz5ODpx=C56392qQSm-ItGIy&DE0Tv@5QfUjaA*!
z7#QS*Piq^xx;Muozq<6Qtta(9ix(IiEN;JJ@gS;EF9x9r49@Ygh_&>Ge|a0pg}Ss$
z)T^ts+{G>dP*CYt8L6!B(xNh1(JLTQ(ipu+W|vG$`dwmER%@wkM&Fi`sEvi4D=Atq
z#Sc8_!POu!HMFgts<$66v-xCvbzIQGK>q<Z<lJ1s<-L2AAE;s*V%eStN_eyWA&>0X
zv54_bRLrs_$E8TuAJMg9O#vM4^|1(pyT$9fumr8Mnh8;8P(jn(6z7>J(L%#H{`+do
z6_LcT@<a7GmZ~VPBmEq~=j?Ymo>&#Mo6V}YOK$AFPMF4tQh1DBroK=1gLth&s;K?%
z)N>eUMkoc=h>;HQZCjWq|IWrtw~UdbNlwW@EiwVDy%Dj&J_t6lqO5)j8+T$#X$ce$
z#pj!0zae{&Z#&Xj&c|NJ(#(i7gZ2Om!#;JbNWGW}X<`=Fu=cjU@(;eq^t{Rw+<Q8)
zA=i2<twciMb9Ktp=WIWAH_j2JtS_Ib=nQ4XA4|)u4}vh}z<0kC@QA&t4`YgJ>6gT}
zk3uSfU06Ps_{66l(91jawWX7fsR?tV1%L^)tlthNUp^?h+m?JzAnvcb$}h8Jp&cd_
znOKE+QK|bDOujK3f~1&T3~_d18bdsk4;FeT{@G7VN#fHbl#II9y{j;5Ezhnzcq@!a
zp`$6E>iF}G%;CUkG^rHb`z;r@8f^YkSuZ|4`_Nm-;FD1YPm<@udpXkpKEmkyV`A@p
zi)d4^Df9V=@n~Inq>$-MP&qWNk*f|^Is8hlC6pBHlfbyB?OEtCz7~DM?XxVGTiR4b
zghh^Ug6}m|p_yK){n+EEhdeiY)W48-OFQzWQ(v{3aJNZ^d>Hmp9D3R<4-nT&q2=q=
zXAKKP|42D&w&q@Me~Pu=u26m|#{NEiApRH)6*jze-j)rXqLUk~!9l4hGWQOqQ+meF
zzx;_vK9fvy;<UAggxeplh|GcUbdm`7GAkaZK*m^uC~de1#n_-Zx@LBO-Z~zFPChF(
zV(ENELI^KO;rCx9eW#azzYVO!@f?Ej_$~C_c&b>fjfK+Xh)0#g-;SNgA2ilCf<-7C
zt}2;DmC@47(FYFZj<=Q?Ld8c%jpA7C3&!8pQ$G23_Po2e@?hsUH!Q&U(Jcex9HDkQ
z6pap8q>}LvEeXX2pC(DX<t2?M&$tJlo5{mmL=i6nILcz}CR7L+NB-t_s&${0*g)cH
z4SQXH-S3*{7#2A~OhO7Wn3X=rS{w4>4xN2#XoAbGagFO~NCPKW!_hi6bMcxgn2Dcj
zO)iV=CT`u2f$g+rV$~z4v^dg0ip-2qnAqw{P6!(_^~?w;c%>V)U;6l*z@+5W=$5xJ
zLT1Fp<h`Eh?hJkQ$qO!g19@ffF$;V;pS%+v2<kx}+6hEVb-LpMf-I%DZpRc7A=EnV
z(x->~ox_3Y@~b_w4Rv<6_yl}kK9XnFm{IoIi|zM>a&UJH&ZVaNm{#vE8reJwk4g%@
z$+dJ!+?Tq~S*os;Zxv5&R$DyZzk=$mU|!&8P1J-fVzM|*oB1~Nwdy{8y|Na0-Cm@n
z>l>)V-$6&}R7J=9I2=kDxLYo6(c2wSnv6OIK3&twgx3jQp-0D5-m(Agu$XReD@^IE
zABIUecs?;G9S-tPrq(Qbbmv^|9s_3G1Im-@;>0zaci!-~1N%8jb1#H{T)pjy<Go1>
z9{Q^9ZC+mH!lLy$vC<9j>HfAkqdnA<J>K1?Etx@L1opx5(XFfFF2Fd!1ebRl`p`!!
zWd0>v4DCAYC2GB*S}i;qqoFoK*!|J)C-=|YgzB4Dcm+Jr*{!ufZTDZ0H?GrE(43-p
z`BXSgBUfN9qw%DS#$UAdwa1wUWv67EM?P>1?%IzLL3^O>F3r%M_B~-UOi~sn>+8wO
zl|Ed9fl43Wh$7cQCMjXWWz7wmV~J_oFTaf}>{=985q*F~Gba6A$u4ArGDLrZ@`TnF
zxoxnB(fXkuU)BWB+kHa`hE$-U2It*SZp2;9^Z`6KWLACp2XG;)F^&YPww_3syLRKR
zzB=_3hVdo%R3%&UO`qo>`?N4boizo;21+Dx_R{|vvX4*eIBhx{zFtEKHhYVSalRG@
z8V1u#XHZljs1Jjy)q=?d@yqe@QtW(bdr(E3zMG<{4%JX&OOY?=MusLU>I8E{_x}a)
z2%6|kWFWY5k311CNFmcDt_bpILpzkN<&&c>3trg~_)m&i)uK4m^uLzU;gIm7hW(4?
zJ*VX>gLh@#c)RA-+e8b0+HCFH^Bax%Q>#$3Y2#+ErVh#5{ZX~QN&A*<I~pTZ*co1J
zytmh1Hnlm}YL=LG+hZfOvE8Y;oK%ucJ_<bww#oU9Em&GbKt^MZ9DdjzsB{mHPH<^{
zKRSu&8Yx$-37vR6$*K-%A88K3)JOi<l<mrK+&cQ)HF)_(BUxI0#V)Sp&@J&9aM;iM
z#D&C3Hrtiv+dp0EFJo-r@aj>qGB2<};QG2hMqOH4(Fs7*&p(G*^WWztmi0F-_JNqI
zjW^jMyr>gwMxpI~79`~H&tFU^o5rX*98{ljzKf;lYHEk9zPvZ0S&r7W=vvM|x)a=7
zuXMVV$EYh(wW7Y_UB8q=IGl?1u6xF4_hE41Nz?zzoydPe9wlkKOkQ{o>^ME0pA{zb
ze|--$G3%>c?_c-`Y!(WfWv@W4?P;;)lC3!RPj_OvF8ZOxkvPpc^J^8q<?<hs1OLay
b$oH5!i0zK#cd3KFz74=o*A!EScE<k)1+2Fd

literal 0
HcmV?d00001

diff --git a/07_RegressionModels/03_04_bonus/assets/fig/unnamed-chunk-4.png b/07_RegressionModels/03_04_bonus/assets/fig/unnamed-chunk-4.png
new file mode 100644
index 0000000000000000000000000000000000000000..49b1494adbc53b9749a2264f19e28d74297c5abe
GIT binary patch
literal 3232
zcmd5<dpMNa8lSdPiA~BNguRnngoEsc=wc?xZJ69mnrg;WM#YTFxa~qQqnRj)aqDw(
z%e@)ZNOlx4N*^%{!!E^SLNbWVbiVfKoIlR<oaZ_FuXDa<t#7UG_pbMSf9w0!_pIMa
zM|(IcDQGFcU@#?@Lr8BJYz^^Sm6wAMcl*pqsJV=GJA#tRq)-<IL%?8o7y<!9KzAmL
z02K}dLC**n9)W-g69FMi0sfD1co-i4-N3{X@OX}tiGVS`4Z<@yOy;nFIV|N6U>pL1
z!@+Z89F9!d-Q6u<A_OvyKqi%P@X}$XRK}6Y1Q3C*FxWY7q&mc6C)wKr^Yy>KU|+R6
zHGhB{H=H{Z5D9}RZvIx+^a>MKq0S{2<o+Wu`O^gnNvwnFsiyZ>cJ5gF=@~(1`)O8r
zquFO!(OKL+Ws9ZOZu~^dzRBgb^YQofCvaPSezGyqSUyE>l)Bb@Ep6R?@F!!fzo3$f
zi7IfVi@<)gjr{)_tVc>-B%d97RPDgpA#OlRc(Wn&oF?Inu+N{}(Oy0fF+Fr7;Ice$
zhW~W#-pf)Q%?-Q|$=pPR<`B-^-fHuWCQ;KJiz4x+1nWF|V=m7dM4hJ&Vl{g9GS=Ck
zmi)~H0=B+B4qgzuPF)ylE!h)6KDj;20BB=Ho!p)QSoaufUH7svPEI&>YHYcEeJ@;y
zpG$Le7!l+_cC%>kDX+sB)5pk2!CU+*(m}8|1K6*LO17e{!^4%j{t=>ti2lDapaJG=
zwl>0>%)AYFZd{rfo1B~9551u`an~Au5lvuB3I5_Va|?ILa#Yjr2(B4VL?W0AM%c+f
zkTKO(j^60VX|?6wc$e~?L{~m5z-`Tq0_Vn%CU$ScUgTrKr?f@|CqDis>JY{>L&t(w
z(MqBnU3{g`Bs!~ML<KRX#w%`xkv6EyHrT<*z&phGkw<GlbsRpZ3~o56YVJqQ_F{+j
ztwlu_i-yA10@ab#KJ3`=v0sVwx=$Pr^Nbdw;2L5M$x|{Xotg4l1>#)#;KJML*d!2J
z1Qv^aZ&20+v>$&F5B}4&=*1g`h}Pz*2hbbkP3<YiaS{id9euZR%g6)kTkBs7uB>&p
zP!SSXs-zU42`vc|x~coI&z%zXmVQrO)OnmXI$M(<P&gwnuKLjLl3Kr%l54i&<!srB
zY$0f?76{YKZFg{G#aRSKsmM<YOj@64C^;?I%@0JeCKn%=y?IsdSDP8|l3X_ab8FWH
z;w{Thg_b!_^Glq1B0k%YKEyN;StNJ15^d&<(Tb!lZiyL%%Bns^n*qPAIo-2`2bg;<
zBEKlyrP=mO-wk++;BMAgh$q*M<67+kR=CS%vNXphTfuflP6_w?YZ{6lDGAqD$u-Cn
z9c|nN8X9w5Z2@UY0E$(Xzic*JapL8i3a;6VQsAt<{Jd^ObN>0u!8z}8ZM7PIa^x|M
z`HwHmsaHv^WDos6nk<Ass=a%yKjglZX(ldVcy&lql^WO-$AB4t71C;VltyW5RilrF
z@N-O46HzRr#CSMMG=Z&aw(Qn}<}_b`i`%vmqdHyQ_B~9I89<aW&a{`NGQKEi<4wd5
z8)5*Xnfrt=0mP(28(!l}KEHaq(4H|XH>QM1Q*Tg84-fC!6jQ$jwG?}8oH!0Yrba4^
zc-WAEqU$WF8lHSVwc79yRg|RkKBi(|LD6I-1IxbY#a2g4wp58u;e5dflMaiZ0-_%7
z_>IaJ);vG9RqKS^Q4e{snm3tVKi+&l2b&^Val=R-d+pwM0K{%fiwa#}w8Z{G%KxDX
zc#dI&UQ(TYfmy$Yb3pw0p{0Q<#xI6o3`YBfI3}sJsG;+God?MsJQti0TJcdi+k!QE
zWS-TQQSpZ-@M+4VJiy>3K(Y$88ou7AuLnY=m-dg41WA>rBhbt$+=7FXoYaKNMbRCT
zrP(6wTF-TWQ&A{U14|6ZdSBi%Ojk}^VM(vt89w|hGnM2inqLHxi$ZU{MVloGf4!%n
zV+Zub)0$x5tsZNesCZcl=Iy+ZoRx~sAR9}r)f~gzf(tjFJA9Y#_8TH}xX|+08Q}Gp
zVz{qlq%(?UTbwo{9lJZ;Hm%>E?R^m3DFePtXHcENgbe+@9fF5OKMv&+vHnT*Pbm7v
zcJ9J7PI{p*`yGSX^@JOdk8Kdi^d6!%YH2MofTk_ZrO*%SxuxC#%&U9seM;PpCTDT~
zYN|S2Z|bU}m(xjkXW4WTOm6v1({0=?VE`>Bw&p@##{t*94#jJ|q-apBS}cN7eh_b-
z=9n_=&99qK@OvSTw!N`5UCz!02GH|8hsq#8bQvV(UZ-q^7ZiIO_W>ND-{CrLTUFP5
zAmo@)*%?Km^TWqyjk%9^TU7(k<1RiiL@`sZXt?+r9RTOV$bs#GIKNWSzILF4*Bu=^
z;&>VxfM$E$^e>f!qeF-HZ5xI=zzxkZYdkIiCH&5+L*(CT+(29gQjymk6+G%l#kzpD
zxQN_=rlSQUxz4a7<V`4cg~tWp1m6Tr{$Q87kfxkx-4Y#a!YVg42@E87-1IJ8tieE`
z6@t{TNEK3LU$N*JMGLO;z~jU&KyI=-vV+r5!Tr>WqVu}t`?@5f%>zTWSKA3F4LXW7
z^){@M0k~5lY<--;Qac2zlIKSLm_I}g-pQ&mwFqKA>}FeX!hmQJM8|{_9zd=~vnv?D
zehOTvGN_r@mjC{AMr#!%mcIC4LlySsVx?+xP~C+H^=S&v&9#G$0!S1DeUZDt3>Ar7
znu731RsX(x7jTq}Is@^+3>QubFDjjkZSJQR?r`<dDB=&CNH3)Bd1gRQ#Hw|#SEuB5
zS`!)(eZe`etXCV`<ub|)BfBD2PL^NGtm{Ut->dsK&x5U28ak^nR~?}pJJ`mVe6Z+8
zqi2WwX8@zT#o|C7ClrIn_NFfmYl(Z}7e@k&sgD1?gNjw$wf>V_*(X^Ja-QosT&`ZI
z8+EVG=P_w!cA@+HVEWkG)HNyzgYId*2RI);zZSdsoMY7j9Io^geK`w~7s8pTdhdC$
z-nd$ILsEazjn*BJ<IbIxwoeVQtgpUD>mDhHj-HDA8nP?WB6>x#8*~lnO|NnOFyB<x
zS7y<w`=DiK;hoWRT((Y)A|g^h&?A`D?|Zd3hsmVAlL@b7?ZSR8d-UV6xnd6^?ocPa
zt=e*--*5aClqc|T0X?<G2XUU{o9yYK*!-MI7^I7P$*({2PSnRAF@h(|zgmT_Oi=4u
zG@PP!I{Qn4{ryh6EKsvI8VLEbp%IIdC5`6p8hI<Xo$MCU9Phj8hOZB>2cFh7FS?mm
z1^Hw}A$g=xp*TC+36B*NG+>FErzVN_O5ecFOc0mPi5r_`ZY;a&a`jP+8@=4h!ZmOC
zO#^`>?ngh4RauXw-YCaeNASANe(Gv#B(_{sIWy_mrRY2Elh8a>?iANd@KJ7xx?m6{
zzJ?18>A5nURuh#aFK3}Syr}^3XT;?30!Ww$cLmpusSsANuX8!Hn%Wm7qPJW3u2O^|
ziXSrZ>)e28>0MtiWa;@k#PfdJ>9Y%*%m)pDpvBjUg#rGB=J@!kq%*Zwy0iOf=F0aL
z)-q?PK}OsMwx6o`Zun-vvq;9*1~r)zc?+~~Wd~{```p<_VgB`^Hy=;Lz4FS}9r1E*
kx9&KMs#W<j>US<FZ+Cd8S63$a+cCoh<$<g@aO~pW0h{qR!vFvP

literal 0
HcmV?d00001

diff --git a/07_RegressionModels/03_04_bonus/assets/fig/unnamed-chunk-5.png b/07_RegressionModels/03_04_bonus/assets/fig/unnamed-chunk-5.png
new file mode 100644
index 0000000000000000000000000000000000000000..216bf5b9b42659dc9705d68cab91907d4d4a0844
GIT binary patch
literal 2987
zcmd58do)z*e)l*%^cot89uyTtLzE^m9FLNBNQfylgA`84#27^<!(g9M=waNB>v1cu
zG?ZcVn7I{22V+h%X^uU4r|dKt%$_-W+|F68bzAFp&$@ryz1H{b-{bo|zTe~fzI0Fb
zU5nIo)Bpfj<h<KqF96Jtp(AYGER>S@llEftch=L@#}QE=C<p*}03ZQ)Jb*`M5FoQq
z97XT|36BTyC<+Qm(<?{-iKL=}Br=IaW|3G3hzCH`A`(ajKo$s!grEpvkpUK&#8R+W
z3PcFvg(6U>U<nmMp#nizBt!%vA|aw+AqsRxa*p}Ape`84?sfN8e)|VJ?wX&8%FU17
z?H>aG3p7+?Mte6+4ghMGoE_|ZDAz^`79|UxsHb^www;vJ<gmL8M(o-?9`$)KuB16?
z96VyMMcD0caixEv7rORfOc$p7vS8C-soH@L9px)di%wHY^<Ep%<JF*ol>a-BOUE5-
zHp~EJ{x9ah?sg5{nD<z&)pyfi149sYV)24(S$e1IV(56MYxW9wR`(HX6eQiAA`9R3
zV=AS?t4Hs3tj~73<toj^klSaHAziB#ezFi^oBm1q%Buf4sT!&y5^s*gcu^Bp1nw}W
zzrSEh9pP+D*8T&TkacCte<(Ijm2Lh7Dtu2<27|K4jPZn}3o>N1*(>7Njz18O(>TjV
zw=KiMNR=;Pq%0Z}wPWM8Fu2z~W{*Xb)G}Rd!#;T=+)nL2@a~B?#4gRe)R-1f>61DD
zv`+Y)3fIKoepD|kPd}9&l`U`&T?JB%%tbeLHDI}+5h3RwKirIBU)z6Sk&vjIJymnT
zvY~YqRQxQ0OPnCt%gbE3X|ZP8hL%NTj|ox1<=jmu+FT~<{#o|1Kd<-KcAbSyDfZwS
zETJCn2Jzl6^XQd`EVB9f!LBLY_sI3V7B&U;4f#I$wC8lC*YkVnl>*ose|;t#(r}Eg
zuQ=Q%O;gux=iOaq%)k+dt&dFC+9c&kii|S|uJ;G8rleBBFFL}BV~M?)vNFRQC_-AO
zNR{Oq7D2-~8x#5h)&{R6?W1~zFT&vFz%Q@ZHms&=rOJ-E=>;$0GVG|e>oJvcA)cO1
z;8MC^794^pET7LEK0`61w{^{iq_*gOLL+9v33|Z`p_;8{C_6DYr?nia;k(>MfoY~u
z`3#6Rk1G(EzA|BAbYGsu!{wv=osi^;=>|nKzg<e4ENMTN*9E{K2E($EF>i#_ZFy;1
z!<{*Ftw;NkYS)u-igSW{_6^Ig%b1%AxVfs84v=5JR)wo?z$`A~d=$TQv&x7mYW<L>
z^{@=<mXEFUoaUvAE!d&@eo}g#lbf%+BnXYIq*FgwXR8-161xwNCxiGf1|_`Hfw$?B
zO7Rg$U_YMAFjVQIbEBG!Eywu@Z(6OPVy_NOrIdx_+*UcJuhBGB`${?3m>)z@h0Uop
zTWlqM-%MC%qLQrgMMD$=)hV|lxG7lOEq`g-dA5byuS?siCk@>8V=KK>&Z#16oS|D^
zdeC)R$4MY`fSF=eycLb;;2M!4QLT1E7r$<US>lu#cl?A6l=#kwVx39!?Zq8-i8xI$
zgW{;~|7OF{{>Zcj(LKcSmeeG1rjW#)kZ#uN5G>pn%T-p!OCpt#(Zu5k>%;ZXefy$i
zzjK0IcW{oo&(c1wAkWTU95pF`d#24kEsYsjExLbx5)nPPPqpT{6qOj$2CBN@%w}eh
zl`4q-@)uOLWY*hOM+bjw8{GqgYJ6mwNlU&MM|Jo!jA)6ZYiAIp?}pX{>-;F&kHM`E
zrn2MWPX@0N+*`4N<W1$#!L0A8#-DRMU0?<ng2lKF+-`Ukn%f_YCW+)N|Ls)->cp`O
z-D`<iXcfD`sWFx6xU4N3ZK_mxP*v$OSNZ61LzH;iP|^IKfGtKgcmELl>*f6|U4rGt
z6tJtk%++zms*?C`y60Qef3*oi$WTjK-<$N7DXbpa(_ZqPE(6W++$=g88p_hOkxp23
zl9#o<jU9R%@IPISqaM5H3_qC8yy`3?LoW*$;B7-@7JIhWGG2{Uo?i3M6entmAp_;O
zU`TtZ(c#}!9Ec8wps3M+pycK7nxM?AEt_ak4bOlxJzCKN>REYIYS%NK)<|8(qgjsq
zBHmQTRhKt$%mde$o$?xr^33Grk>s>Z!vz&p@t*=XgbzI;ErLiM&Wy>p;f^0^TRnxh
z?jJ?Q2fX=X*W4F`iYw}m7uKI5_Cb<|P0Aq6f|SrUtHh)>CbheD?(EOUEuyvE_@j2V
zc7pBo>IWADS6ZY)f5#Ht`pZ|pL9gi=;f=X?di<W5FxwFxY{Ruw7x$EK8DbM=^W(bk
zl{e>_%|F@C;k@H{NILMCoTJ>zL?>(4%VDr|2gh)8BT>G3-X5MUa#4D?cBm-jAIYLg
zdVBzZe4FGmN+~P6O?%dPv+Ot6lR!f9pXPc!kX)xVPi9g|rH9uCrX13U<fpFt;sX8x
z+?y`8Sx|EHY*i$vvwCO)Xhdk*r<<|idDzfR6MN+8pv!(`I#;mkqhOpsdrc9>;1^4C
z9v?fprW<lLzcP8Wr3$%ytGUS}b<)Ftqj*~}(d+*Fo#?|Y+E6~fyXh0Zp65-zBjx8F
z@}3H6oGmTfO-1iYxnf=E1bv`)KOxB#(THP|J}(=-x%rW!<l!W0OILV<E^f-<>-Tx0
ze3Ozu>*G#ijN-cs**x$4N^f0w(M_!meU4qIc5R!7FG?Xkwxk}&T4x+|qe5Z@X%6Kr
zk&-1Q0$6I5-MlXe`6p{ikx*7>Q$kCx=XH=*`mNj8@*-i$u=pWO-n}<em%Uy<YiQnb
z>*_r(T-_^hZp2@CR6+jKc#RKm3eDYCuFhp2!f~kbe%L|Mq!2#yR!p!0j0*HkjT#uq
zVIDh0?ALFTX9V<$DwE}-4;%a7&5E(XJ4HxfQc|-&(iR8D4!`cSlfy1aCj*mg#)4w1
z&jgN_EQZ>4$$M7Oq~k9uA$2h`V3Lz9u7q12D`{7epHSA>my&%*P>l0sU1EWF2b0JC
iw|CbUY5xj1K`1&gXU)jPv*oH6x3i<WL&f(8Q+@|PasnU#

literal 0
HcmV?d00001

diff --git a/09_DevelopingDataProducts/rCharts/index.html b/09_DevelopingDataProducts/rCharts/index.html
index c1a90cb40..e69de29bb 100644
--- a/09_DevelopingDataProducts/rCharts/index.html
+++ b/09_DevelopingDataProducts/rCharts/index.html
@@ -1,603 +0,0 @@
-<!DOCTYPE html>
-<html>
-<head>
-  <title>rCharts</title>
-  <meta charset="utf-8">
-  <meta name="description" content="rCharts">
-  <meta name="author" content="Brian Caffo, Jeff Leek, Roger Peng">
-  <meta name="generator" content="slidify" />
-  <meta name="apple-mobile-web-app-capable" content="yes">
-  <meta http-equiv="X-UA-Compatible" content="chrome=1">
-  <link rel="stylesheet" href="../../librariesNew/frameworks/io2012/css/default.css" media="all" >
-  <link rel="stylesheet" href="../../librariesNew/frameworks/io2012/css/phone.css" 
-    media="only screen and (max-device-width: 480px)" >
-  <link rel="stylesheet" href="../../librariesNew/frameworks/io2012/css/slidify.css" >
-  <link rel="stylesheet" href="../../librariesNew/highlighters/highlight.js/css/tomorrow.css" />
-  <base target="_blank"> <!-- This amazingness opens all links in a new tab. -->  <link rel=stylesheet href="../../librariesNew/widgets/quiz/css/demo.css"></link>
-<link rel=stylesheet href="../../librariesNew/widgets/bootstrap/css/bootstrap.css"></link>
-<link rel=stylesheet href="../../librariesNew/widgets/nvd3/css/nv.d3.css"></link>
-<link rel=stylesheet href="../../librariesNew/widgets/nvd3/css/rNVD3.css"></link>
-<link rel=stylesheet href="../../librariesNew/widgets/morris/css/morris.css"></link>
-<link rel=stylesheet href="../../librariesNew/widgets/leaflet/external/leaflet.css"></link>
-<link rel=stylesheet href="../../librariesNew/widgets/leaflet/external/leaflet-rCharts.css"></link>
-<link rel=stylesheet href="../../librariesNew/widgets/leaflet/external/legend.css"></link>
-<link rel=stylesheet href="../../librariesNew/widgets/rickshaw/css/rickshaw.min.css"></link>
-<link rel=stylesheet href="../../librariesNew/widgets/rickshaw/css/jquery-ui.css"></link>
-
-  
-  <!-- Grab CDN jQuery, fall back to local if offline -->
-  <script src="http://ajax.aspnetcdn.com/ajax/jQuery/jquery-1.7.min.js"></script>
-  <script>window.jQuery || document.write('<script src="../../librariesNew/widgets/quiz/js/jquery.js"><\/script>')</script> 
-  <script data-main="../../librariesNew/frameworks/io2012/js/slides" 
-    src="../../librariesNew/frameworks/io2012/js/require-1.0.8.min.js">
-  </script>
-  
-  <script src="../../librariesNew/widgets/highcharts/js/jquery-1.9.1.min.js"></script>
-<script src="../../librariesNew/widgets/highcharts/js/highcharts.js"></script>
-<script src="../../librariesNew/widgets/highcharts/js/highcharts-more.js"></script>
-<script src="../../librariesNew/widgets/highcharts/js/exporting.js"></script>
-<script src="../../librariesNew/widgets/nvd3/js/jquery-1.8.2.min.js"></script>
-<script src="../../librariesNew/widgets/nvd3/js/d3.v3.min.js"></script>
-<script src="../../librariesNew/widgets/nvd3/js/nv.d3.min-new.js"></script>
-<script src="../../librariesNew/widgets/nvd3/js/fisheye.js"></script>
-<script src="../../librariesNew/widgets/morris/js/raphael-2.1.0.min.js"></script>
-<script src="../../librariesNew/widgets/morris/js/morris.min.js"></script>
-<script src="../../librariesNew/widgets/leaflet/external/leaflet.js"></script>
-<script src="../../librariesNew/widgets/leaflet/external/leaflet-providers.js"></script>
-<script src="../../librariesNew/widgets/leaflet/external/Control.FullScreen.js"></script>
-<script src="../../librariesNew/widgets/rickshaw/js/d3.v2.min.js"></script>
-<script src="../../librariesNew/widgets/rickshaw/js/rickshaw.min.js"></script>
-<script src="../../librariesNew/widgets/rickshaw/js/jquery.min.js"></script>
-<script src="../../librariesNew/widgets/rickshaw/js/jquery-ui.min.js"></script>
-
-
-</head>
-<body style="opacity: 0">
-  <slides class="layout-widescreen">
-    
-    <!-- LOGO SLIDE -->
-        <slide class="title-slide segue nobackground">
-  <aside class="gdbar">
-    <img src="../../assets/img/bloomberg_shield.png">
-  </aside>
-  <hgroup class="auto-fadein">
-    <h1>rCharts</h1>
-    <h2>Building Data Products</h2>
-    <p>Brian Caffo, Jeff Leek, Roger Peng<br/>Johns Hopkins Bloomberg School of Public Health</p>
-  </hgroup>
-  <article></article>  
-</slide>
-    
-
-    <!-- SLIDES -->
-    <slide class="" id="slide-1" style="background:;">
-  <hgroup>
-    <h2>rCharts</h2>
-  </hgroup>
-  <article data-timings="">
-    <p><img src="fig/rCharts.png" alt="rCharts"></p>
-
-<ul>
-<li>rCharts is a way to create interactive javascript visualizations using R</li>
-<li>So
-
-<ul>
-<li>You don&#39;t have to learn complex tools, like D3</li>
-<li>You simply work in R learning a minimal amount of new syntaxt</li>
-</ul></li>
-<li>rCharts was written by Ramnath Vaidyanathan (friend of the Data Science Series), who also wrote slidify, the framework we use for all of the lectures in the class</li>
-<li>This lecture is basically going through
-(<a href="http://ramnathv.github.io/rCharts/">http://ramnathv.github.io/rCharts/</a>)</li>
-</ul>
-
-  </article>
-  <!-- Presenter Notes -->
-</slide>
-
-<slide class="" id="slide-2" style="background:;">
-  <hgroup>
-    <h2>Example</h2>
-  </hgroup>
-  <article data-timings="">
-    <pre><code>require(rCharts)
-haireye = as.data.frame(HairEyeColor)
-n1 &lt;- nPlot(Freq ~ Hair, group = &#39;Eye&#39;, type = &#39;multiBarChart&#39;,
-  data = subset(haireye, Sex == &#39;Male&#39;)
-)
-n1$save(&#39;fig/n1.html&#39;, cdn = TRUE)
-cat(&#39;&lt;iframe src=&quot;fig/n1.html&quot; width=100%, height=600&gt;&lt;/iframe&gt;&#39;)
-</code></pre>
-
-  </article>
-  <!-- Presenter Notes -->
-</slide>
-
-<slide class="" id="slide-3" style="background:;">
-  <hgroup>
-    <h2>nvD3 run</h2>
-  </hgroup>
-  <article data-timings="">
-    <iframe src="fig/n1.html" width=100%, height=600></iframe>
-
-  </article>
-  <!-- Presenter Notes -->
-</slide>
-
-<slide class="" id="slide-4" style="background:;">
-  <hgroup>
-    <h2>Slidify interactive</h2>
-  </hgroup>
-  <article data-timings="">
-    <ul>
-<li>The above was an example of embedding an rChart in a slidify document
-
-<ul>
-<li>In the YAML 
-<code>yaml ext_widgets : {rCharts: [&quot;libraries/nvd3&quot;]}</code></li>
-</ul></li>
-<li>Or, if you use more than one library</li>
-<li>YAML example
-<code>yaml ext_widgets : {rCharts: [&quot;libraries/highcharts&quot;, &quot;libraries/nvd3&quot;, &quot;libraries/morris&quot;]}</code> </li>
-</ul>
-
-  </article>
-  <!-- Presenter Notes -->
-</slide>
-
-<slide class="" id="slide-5" style="background:;">
-  <hgroup>
-    <h2>Viewing the plot</h2>
-  </hgroup>
-  <article data-timings="">
-    <ul>
-<li>The object <code>n1</code> contains the plot
-
-<ul>
-<li>In RStudio, typing <code>n1</code> brings up the plot in the RStudio viewer (or you can just not assign it to an object)</li>
-</ul></li>
-<li>Do <code>n1$</code> then hit TAB to see the various functions contained in the object
-
-<ul>
-<li><code>n1$html()</code> prints out the html for the plot</li>
-</ul></li>
-<li>I do <code>n1$save(filename)</code> then bring the code back into slidify document
-
-<ul>
-<li>This is recommended for slidify, but if you&#39;re just looking at the plot,
-it&#39;s unnecessary</li>
-</ul></li>
-</ul>
-
-  </article>
-  <!-- Presenter Notes -->
-</slide>
-
-<slide class="" id="slide-6" style="background:;">
-  <hgroup>
-    <h2>Deconstructing another example</h2>
-  </hgroup>
-  <article data-timings="">
-    <pre><code>## Example 1 Facetted Scatterplot
-names(iris) = gsub(&quot;\\.&quot;, &quot;&quot;, names(iris))
-r1 &lt;- rPlot(SepalLength ~ SepalWidth | Species, data = iris, color = &#39;Species&#39;, type = &#39;point&#39;)
-r1$save(&#39;fig/r1.html&#39;, cdn = TRUE)
-cat(&#39;&lt;iframe src=&quot;fig/r1.html&quot; width=100%, height=600&gt;&lt;/iframe&gt;&#39;)
-</code></pre>
-
-  </article>
-  <!-- Presenter Notes -->
-</slide>
-
-<slide class="" id="slide-7" style="background:;">
-  <hgroup>
-    <h2>When run</h2>
-  </hgroup>
-  <article data-timings="">
-    <iframe src="fig/r1.html" width=100%, height=600></iframe>
-
-  </article>
-  <!-- Presenter Notes -->
-</slide>
-
-<slide class="" id="slide-8" style="background:;">
-  <hgroup>
-    <h2>Example 2 Facetted Barplot</h2>
-  </hgroup>
-  <article data-timings="">
-    <pre><code>hair_eye = as.data.frame(HairEyeColor)
-r2 &lt;- rPlot(Freq ~ Hair | Eye, color = &#39;Eye&#39;, data = hair_eye, type = &#39;bar&#39;)
-r2$save(&#39;fig/r2.html&#39;, cdn = TRUE)
-cat(&#39;&lt;iframe src=&quot;fig/r2.html&quot; width=100%, height=600&gt;&lt;/iframe&gt;&#39;)
-</code></pre>
-
-  </article>
-  <!-- Presenter Notes -->
-</slide>
-
-<slide class="" id="slide-9" style="background:;">
-  <hgroup>
-    <h2>Example 2 Facetted Barplot, when run</h2>
-  </hgroup>
-  <article data-timings="">
-    <iframe src="fig/r2.html" width=100%, height=600></iframe>
-
-  </article>
-  <!-- Presenter Notes -->
-</slide>
-
-<slide class="" id="slide-10" style="background:;">
-  <hgroup>
-    <h2>How to get the js/html or publish an rChart</h2>
-  </hgroup>
-  <article data-timings="">
-    <p>Now you can add whatever you&#39;d like</p>
-
-<pre><code class="r">r1 &lt;- rPlot(mpg ~ wt | am + vs, data = mtcars, type = &quot;point&quot;, color = &quot;gear&quot;)
-r1$print(&quot;chart1&quot;) # print out the js 
-r1$save(&#39;myPlot.html&#39;) #save as html file
-r1$publish(&#39;myPlot&#39;, host = &#39;gist&#39;) # save to gist, rjson required
-r1$publish(&#39;myPlot&#39;, host = &#39;rpubs&#39;) # save to rpubs
-</code></pre>
-
-  </article>
-  <!-- Presenter Notes -->
-</slide>
-
-<slide class="" id="slide-11" style="background:;">
-  <hgroup>
-    <h2>rCharts has links to several libraries</h2>
-  </hgroup>
-  <article data-timings="">
-    <ul>
-<li>We&#39;ll do some examples</li>
-<li>Note Ramnath mentions that io2012 and polychart have conflicting js
-
-<ul>
-<li>They seem to work for me with that theme, but I get errors if I load the polychart library</li>
-<li>If debugging with io and polychart, factor that in</li>
-</ul></li>
-</ul>
-
-  </article>
-  <!-- Presenter Notes -->
-</slide>
-
-<slide class="" id="slide-12" style="background:;">
-  <hgroup>
-    <h2>morris</h2>
-  </hgroup>
-  <article data-timings="">
-    <pre><code>data(economics, package = &quot;ggplot2&quot;)
-econ &lt;- transform(economics, date = as.character(date))
-m1 &lt;- mPlot(x = &quot;date&quot;, y = c(&quot;psavert&quot;, &quot;uempmed&quot;), type = &quot;Line&quot;, data = econ)
-m1$set(pointSize = 0, lineWidth = 1)
-m1$save(&#39;fig/m1.html&#39;, cdn = TRUE)
-cat(&#39;&lt;iframe src=&quot;fig/m1.html&quot; width=100%, height=600&gt;&lt;/iframe&gt;&#39;)
-</code></pre>
-
-  </article>
-  <!-- Presenter Notes -->
-</slide>
-
-<slide class="" id="slide-13" style="background:;">
-  <hgroup>
-    <h2>morris example run</h2>
-  </hgroup>
-  <article data-timings="">
-    <iframe src="fig/m1.html" width=100%, height=600></iframe>
-
-  </article>
-  <!-- Presenter Notes -->
-</slide>
-
-<slide class="" id="slide-14" style="background:;">
-  <hgroup>
-    <h2>xCharts</h2>
-  </hgroup>
-  <article data-timings="">
-    <pre><code>require(reshape2)
-uspexp &lt;- melt(USPersonalExpenditure)
-names(uspexp)[1:2] = c(&quot;category&quot;, &quot;year&quot;)
-x1 &lt;- xPlot(value ~ year, group = &quot;category&quot;, data = uspexp, type = &quot;line-dotted&quot;)
-x1$save(&#39;fig/x1.html&#39;, cdn = TRUE)
-cat(&#39;&lt;iframe src=&quot;fig/x1.html&quot; width=100%, height=600&gt;&lt;/iframe&gt;&#39;)
-</code></pre>
-
-  </article>
-  <!-- Presenter Notes -->
-</slide>
-
-<slide class="" id="slide-15" style="background:;">
-  <hgroup>
-    <h2>xCharts run</h2>
-  </hgroup>
-  <article data-timings="">
-    <iframe src="fig/x1.html" width=100%, height=600></iframe>
-
-  </article>
-  <!-- Presenter Notes -->
-</slide>
-
-<slide class="" id="slide-16" style="background:;">
-  <hgroup>
-    <h2>Leaflet</h2>
-  </hgroup>
-  <article data-timings="">
-    <pre><code>map3 &lt;- Leaflet$new()
-map3$setView(c(51.505, -0.09), zoom = 13)
-map3$marker(c(51.5, -0.09), bindPopup = &quot;&lt;p&gt; Hi. I am a popup &lt;/p&gt;&quot;)
-map3$marker(c(51.495, -0.083), bindPopup = &quot;&lt;p&gt; Hi. I am another popup &lt;/p&gt;&quot;)
-map3$save(&#39;fig/map3.html&#39;, cdn = TRUE)
-cat(&#39;&lt;iframe src=&quot;fig/map3.html&quot; width=100%, height=600&gt;&lt;/iframe&gt;&#39;)
-</code></pre>
-
-  </article>
-  <!-- Presenter Notes -->
-</slide>
-
-<slide class="" id="slide-17" style="background:;">
-  <hgroup>
-    <h2>Leaflet run</h2>
-  </hgroup>
-  <article data-timings="">
-    <iframe src="fig/map3.html" width=100%, height=600></iframe>
-
-  </article>
-  <!-- Presenter Notes -->
-</slide>
-
-<slide class="" id="slide-18" style="background:;">
-  <hgroup>
-    <h2>Rickshaw</h2>
-  </hgroup>
-  <article data-timings="">
-    <pre><code>usp = reshape2::melt(USPersonalExpenditure)
-# get the decades into a date Rickshaw likes
-usp$Var2 &lt;- as.numeric(as.POSIXct(paste0(usp$Var2, &quot;-01-01&quot;)))
-p4 &lt;- Rickshaw$new()
-p4$layer(value ~ Var2, group = &quot;Var1&quot;, data = usp, type = &quot;area&quot;, width = 560)
-# add a helpful slider this easily; other features TRUE as a default
-p4$set(slider = TRUE)
-p4$save(&#39;fig/p4.html&#39;, cdn = TRUE)
-cat(&#39;&lt;iframe src=&quot;fig/p4.html&quot; width=100%, height=600&gt;&lt;/iframe&gt;&#39;)
-</code></pre>
-
-  </article>
-  <!-- Presenter Notes -->
-</slide>
-
-<slide class="" id="slide-19" style="background:;">
-  <hgroup>
-    <h2>Rickshaw run</h2>
-  </hgroup>
-  <article data-timings="">
-    <iframe src="fig/p4.html" width=100%, height=600></iframe>
-
-  </article>
-  <!-- Presenter Notes -->
-</slide>
-
-<slide class="" id="slide-20" style="background:;">
-  <hgroup>
-    <h2>highchart</h2>
-  </hgroup>
-  <article data-timings="">
-    <pre><code>h1 &lt;- hPlot(x = &quot;Wr.Hnd&quot;, y = &quot;NW.Hnd&quot;, data = MASS::survey, type = c(&quot;line&quot;, 
-    &quot;bubble&quot;, &quot;scatter&quot;), group = &quot;Clap&quot;, size = &quot;Age&quot;)
-h1$save(&#39;fig/h1.html&#39;, cdn = TRUE)
-cat(&#39;&lt;iframe src=&quot;fig/h1.html&quot; width=100%, height=600&gt;&lt;/iframe&gt;&#39;)
-</code></pre>
-
-  </article>
-  <!-- Presenter Notes -->
-</slide>
-
-<slide class="" id="slide-21" style="background:;">
-  <hgroup>
-    <h2>highchart run</h2>
-  </hgroup>
-  <article data-timings="">
-    <iframe src="fig/h1.html" width=100%, height=600></iframe>
-
-  </article>
-  <!-- Presenter Notes -->
-</slide>
-
-<slide class="" id="slide-22" style="background:;">
-  <hgroup>
-    <h2>rCharts summarized</h2>
-  </hgroup>
-  <article data-timings="">
-    <ul>
-<li>rCharts makes creating interactive javascript visualizations in R ridiculously easy</li>
-<li>However, non-trivial customization is going to require knowledge of javascript</li>
-<li>If what you want is not too big of a deviation from the rCharts examples, then it&#39;s awesome
-
-<ul>
-<li>Otherwise, it&#39;s challenging to extend without fairly deep knowledge of the JS
-libraries that it&#39;s calling.</li>
-</ul></li>
-<li>rCharts is under fairly rapid development</li>
-</ul>
-
-  </article>
-  <!-- Presenter Notes -->
-</slide>
-
-    <slide class="backdrop"></slide>
-  </slides>
-  <div class="pagination pagination-small" id='io2012-ptoc' style="display:none;">
-    <ul>
-      <li>
-      <a href="#" target="_self" rel='tooltip' 
-        data-slide=1 title='rCharts'>
-         1
-      </a>
-    </li>
-    <li>
-      <a href="#" target="_self" rel='tooltip' 
-        data-slide=2 title='Example'>
-         2
-      </a>
-    </li>
-    <li>
-      <a href="#" target="_self" rel='tooltip' 
-        data-slide=3 title='nvD3 run'>
-         3
-      </a>
-    </li>
-    <li>
-      <a href="#" target="_self" rel='tooltip' 
-        data-slide=4 title='Slidify interactive'>
-         4
-      </a>
-    </li>
-    <li>
-      <a href="#" target="_self" rel='tooltip' 
-        data-slide=5 title='Viewing the plot'>
-         5
-      </a>
-    </li>
-    <li>
-      <a href="#" target="_self" rel='tooltip' 
-        data-slide=6 title='Deconstructing another example'>
-         6
-      </a>
-    </li>
-    <li>
-      <a href="#" target="_self" rel='tooltip' 
-        data-slide=7 title='When run'>
-         7
-      </a>
-    </li>
-    <li>
-      <a href="#" target="_self" rel='tooltip' 
-        data-slide=8 title='Example 2 Facetted Barplot'>
-         8
-      </a>
-    </li>
-    <li>
-      <a href="#" target="_self" rel='tooltip' 
-        data-slide=9 title='Example 2 Facetted Barplot, when run'>
-         9
-      </a>
-    </li>
-    <li>
-      <a href="#" target="_self" rel='tooltip' 
-        data-slide=10 title='How to get the js/html or publish an rChart'>
-         10
-      </a>
-    </li>
-    <li>
-      <a href="#" target="_self" rel='tooltip' 
-        data-slide=11 title='rCharts has links to several libraries'>
-         11
-      </a>
-    </li>
-    <li>
-      <a href="#" target="_self" rel='tooltip' 
-        data-slide=12 title='morris'>
-         12
-      </a>
-    </li>
-    <li>
-      <a href="#" target="_self" rel='tooltip' 
-        data-slide=13 title='morris example run'>
-         13
-      </a>
-    </li>
-    <li>
-      <a href="#" target="_self" rel='tooltip' 
-        data-slide=14 title='xCharts'>
-         14
-      </a>
-    </li>
-    <li>
-      <a href="#" target="_self" rel='tooltip' 
-        data-slide=15 title='xCharts run'>
-         15
-      </a>
-    </li>
-    <li>
-      <a href="#" target="_self" rel='tooltip' 
-        data-slide=16 title='Leaflet'>
-         16
-      </a>
-    </li>
-    <li>
-      <a href="#" target="_self" rel='tooltip' 
-        data-slide=17 title='Leaflet run'>
-         17
-      </a>
-    </li>
-    <li>
-      <a href="#" target="_self" rel='tooltip' 
-        data-slide=18 title='Rickshaw'>
-         18
-      </a>
-    </li>
-    <li>
-      <a href="#" target="_self" rel='tooltip' 
-        data-slide=19 title='Rickshaw run'>
-         19
-      </a>
-    </li>
-    <li>
-      <a href="#" target="_self" rel='tooltip' 
-        data-slide=20 title='highchart'>
-         20
-      </a>
-    </li>
-    <li>
-      <a href="#" target="_self" rel='tooltip' 
-        data-slide=21 title='highchart run'>
-         21
-      </a>
-    </li>
-    <li>
-      <a href="#" target="_self" rel='tooltip' 
-        data-slide=22 title='rCharts summarized'>
-         22
-      </a>
-    </li>
-  </ul>
-  </div>  <!--[if IE]>
-    <script 
-      src="http://ajax.googleapis.com/ajax/libs/chrome-frame/1/CFInstall.min.js">  
-    </script>
-    <script>CFInstall.check({mode: 'overlay'});</script>
-  <![endif]-->
-</body>
-  <!-- Load Javascripts for Widgets -->
-  <script src="../../librariesNew/widgets/quiz/js/jquery.quiz.js"></script>
-<script src="../../librariesNew/widgets/quiz/js/mustache.min.js"></script>
-<script src="../../librariesNew/widgets/quiz/js/quiz-app.js"></script>
-<script src="../../librariesNew/widgets/bootstrap/js/bootstrap.min.js"></script>
-<script src="../../librariesNew/widgets/bootstrap/js/bootbox.min.js"></script>
-
-  <!-- MathJax: Fall back to local if CDN offline but local image fonts are not supported (saves >100MB) -->
-  <script type="text/x-mathjax-config">
-    MathJax.Hub.Config({
-      tex2jax: {
-        inlineMath: [['$','$'], ['\\(','\\)']],
-        processEscapes: true
-      }
-    });
-  </script>
-  <script type="text/javascript" src="http://cdn.mathjax.org/mathjax/2.0-latest/MathJax.js?config=TeX-AMS-MML_HTMLorMML"></script>
-  <!-- <script src="https://c328740.ssl.cf1.rackcdn.com/mathjax/2.0-latest/MathJax.js?config=TeX-AMS-MML_HTMLorMML">
-  </script> -->
-  <script>window.MathJax || document.write('<script type="text/x-mathjax-config">MathJax.Hub.Config({"HTML-CSS":{imageFont:null}});<\/script><script src="../../librariesNew/widgets/mathjax/MathJax.js?config=TeX-AMS-MML_HTMLorMML"><\/script>')
-</script>
-<script>  
-  $(function (){ 
-    $("#example").popover(); 
-    $("[rel='tooltip']").tooltip(); 
-  });  
-  </script>  
-  <!-- LOAD HIGHLIGHTER JS FILES -->
-  <script src="../../librariesNew/highlighters/highlight.js/highlight.pack.js"></script>
-  <script>hljs.initHighlightingOnLoad();</script>
-  <!-- DONE LOADING HIGHLIGHTER JS FILES -->
-   
-  </html>
\ No newline at end of file
diff --git a/09_DevelopingDataProducts/rCharts/test.html b/09_DevelopingDataProducts/rCharts/test.html
new file mode 100644
index 000000000..297010f19
--- /dev/null
+++ b/09_DevelopingDataProducts/rCharts/test.html
@@ -0,0 +1,184 @@
+<!doctype HTML>
+<meta charset = 'utf-8'>
+<html>
+  <head>
+    <link rel='stylesheet' href='http://nvd3.org/assets/css/nv.d3.css'>
+    
+    <script src='http://ajax.googleapis.com/ajax/libs/jquery/1.8.2/jquery.min.js' type='text/javascript'></script>
+    <script src='http://d3js.org/d3.v3.min.js' type='text/javascript'></script>
+    <script src='http://timelyportfolio.github.io/rCharts_nvd3_tests/libraries/widgets/nvd3/js/nv.d3.min-new.js' type='text/javascript'></script>
+    <script src='http://nvd3.org/assets/lib/fisheye.js' type='text/javascript'></script>
+    
+    <style>
+    .rChart {
+      display: block;
+      margin-left: auto; 
+      margin-right: auto;
+      width: 800px;
+      height: 400px;
+    }  
+    </style>
+    
+  </head>
+  <body>
+    <div id='chart20141bf12c55' class='rChart nvd3'></div>  
+    
+    <script type='text/javascript'>
+ $(document).ready(function(){
+      drawchart20141bf12c55()
+    });
+    function drawchart20141bf12c55(){  
+      var opts = {
+ "dom": "chart20141bf12c55",
+"width":    800,
+"height":    400,
+"x": "Hair",
+"y": "Freq",
+"group": "Eye",
+"type": "multiBarChart",
+"id": "chart20141bf12c55" 
+},
+        data = [
+ {
+ "Hair": "Black",
+"Eye": "Brown",
+"Sex": "Male",
+"Freq":             32 
+},
+{
+ "Hair": "Brown",
+"Eye": "Brown",
+"Sex": "Male",
+"Freq":             53 
+},
+{
+ "Hair": "Red",
+"Eye": "Brown",
+"Sex": "Male",
+"Freq":             10 
+},
+{
+ "Hair": "Blond",
+"Eye": "Brown",
+"Sex": "Male",
+"Freq":              3 
+},
+{
+ "Hair": "Black",
+"Eye": "Blue",
+"Sex": "Male",
+"Freq":             11 
+},
+{
+ "Hair": "Brown",
+"Eye": "Blue",
+"Sex": "Male",
+"Freq":             50 
+},
+{
+ "Hair": "Red",
+"Eye": "Blue",
+"Sex": "Male",
+"Freq":             10 
+},
+{
+ "Hair": "Blond",
+"Eye": "Blue",
+"Sex": "Male",
+"Freq":             30 
+},
+{
+ "Hair": "Black",
+"Eye": "Hazel",
+"Sex": "Male",
+"Freq":             10 
+},
+{
+ "Hair": "Brown",
+"Eye": "Hazel",
+"Sex": "Male",
+"Freq":             25 
+},
+{
+ "Hair": "Red",
+"Eye": "Hazel",
+"Sex": "Male",
+"Freq":              7 
+},
+{
+ "Hair": "Blond",
+"Eye": "Hazel",
+"Sex": "Male",
+"Freq":              5 
+},
+{
+ "Hair": "Black",
+"Eye": "Green",
+"Sex": "Male",
+"Freq":              3 
+},
+{
+ "Hair": "Brown",
+"Eye": "Green",
+"Sex": "Male",
+"Freq":             15 
+},
+{
+ "Hair": "Red",
+"Eye": "Green",
+"Sex": "Male",
+"Freq":              7 
+},
+{
+ "Hair": "Blond",
+"Eye": "Green",
+"Sex": "Male",
+"Freq":              8 
+} 
+]
+  
+      if(!(opts.type==="pieChart" || opts.type==="sparklinePlus")) {
+        var data = d3.nest()
+          .key(function(d){
+            //return opts.group === undefined ? 'main' : d[opts.group]
+            //instead of main would think a better default is opts.x
+            return opts.group === undefined ? opts.y : d[opts.group];
+          })
+          .entries(data);
+      }
+      
+      if (opts.disabled != undefined){
+        data.map(function(d, i){
+          d.disabled = opts.disabled[i]
+        })
+      }
+      
+      nv.addGraph(function() {
+        var chart = nv.models[opts.type]()
+          .x(function(d) { return d[opts.x] })
+          .y(function(d) { return d[opts.y] })
+          .width(opts.width)
+          .height(opts.height)
+         
+        
+          
+        
+
+        
+        
+        
+      
+       d3.select("#" + opts.id)
+        .append('svg')
+        .datum(data)
+        .transition().duration(500)
+        .call(chart);
+
+       nv.utils.windowResize(chart.update);
+       return chart;
+      });
+    };
+</script>
+    
+  </body>
+</html>
diff --git a/dependencyGraph.R b/dependencyGraph.R
new file mode 100644
index 000000000..e69de29bb