slides draft

Author: libjohn

slides/images/r_logo.png

@@ -0,0 +1,251 @@
+---
+title: "<br>Text Mining"
+subtitle: "R case study"
+author: "John Little"
+institute: "Cntr for Data & Viz"
+date: "April 13, 2021"
+output:
+  xaringan::moon_reader:
+    lib_dir: libs    
+    css:
+      - mystyles/xaringan-themer.css          #  fonts I do want https://pkg.garrickadenbuie.com/xaringanthemer/articles/xaringanthemer.html
+      - mystyles/adirondack/story.css         # https://story.xaprb.com/slides/adirondack/
+      - mystyles/adirondack/apron.css         # layout 
+      #- mystyles/adirondack/adirondack.css   # fonts I don't want
+      - mystyles/adirondack/descartes.css     # image positon 
+      - mystyles/adirondack/tachyons.min.css  # color, font weights, boxes
+      # - mystyles/adirondack/monoblock.css   # part of story/adirondack
+      - mystyles/my-theme.css
+    nature:
+      ratio: '16:9'
+      highlightStyle: github
+      highlightLines: true
+      countIncrementalSlides: true
+---
+
+```{r setup, include=FALSE}
+options(htmltools.dir.version = FALSE)
+library(tidyverse)
+library(htmltools)
+tagList(rmarkdown::html_dependency_font_awesome())
+# library(xaringanthemer)  # run once; or use the pre-run css found in mystyles (xaringan-themer.css)
+# style_duo_accent(
+# primary_color = "#012169",
+# secondary_color = "#005587",
+# header_font_google = google_font("Josefin Sans"),
+# text_font_google = google_font("Montserrat", "300", "300i"),
+# code_font_google = google_font("Fira Mono")
+# )
+```
+
+## Duke University: Land Acknowledgement
+
+.f4[I would like to take a moment to honor the land in Durham, NC.  Duke University sits on the ancestral lands of the Shakori, Eno and Catawba people. This institution of higher education is built on land stolen from those peoples.  These tribes were here before the colonizers arrived.  Additionally this land has borne witness to over 400 years of the enslavement, torture, and systematic mistreatment of African people and their descendants.  Recognizing this history is an honest attempt to breakout beyond persistent patterns of colonization and to rewrite the erasure of Indigenous and Black peoples.  There is value in acknowledging the history of our occupied spaces and places.  I hope we can glimpse an understanding of these histories by recognizing the origins of collective journeys.]
+
+
+---
+
+layout: true
+
+.footercc[
+<i class="fab fa-creative-commons"></i>&nbsp; <i class="fab fa-creative-commons-by"></i><i class="fab fa-creative-commons-nc"></i>  <a href = "https://JohnLittle.info"><span class = "opacity30">https://</span>JohnLittle<span class = "opacity30">.info</span></a> 
+<span class = "opacity30"> | <a href="https://github.com/libjohn/workshop_textmining">https://github.com/libjohn/workshop_textmining</a> | `r Sys.Date()` </span>
+]
+
+---
+
+## Demonstration Goals
+
+- Gather some tweets  
+
+- Define APIs and the Twitter Developer portal (Academic Use)  
+
+- Rudimentary text analysis and visualization  
+
+- Point out useful documentation / resources  
+
+
+***
+
+.f6.i.moon-gray.center[This is not a text analysis workshop.  The foundations of text analysis require considerably more time that we have.  
+This is a demonstration on leveraging the following tidy packages (tidyverse, and  tidytext) and sharing resources.  ]
+
+
+---
+
+class: img-right-full
+
+![](images/attendance.png)
+
+# Three tenets
+
+
+- Just numbers
+- Benefits of review
+- Dashboard fatigue is a real thing 
+
+
+???
+
+- The implications of dashboard fatigue might be the most interesting thing to discuss in the QA
+
+---
+layout: false
+class: img-left-full
+
+![](images/by_dept_compare.png)
+
+## Drivers
+
+- Goal: create a dashboard of workshop attendance 
+- CDVS motivated by the possibility of exploring data 
+- Dashboard can be the basis of another  workshop 
+
+.footercc[
+<i class="fab fa-creative-commons"></i>&nbsp; <i class="fab fa-creative-commons-by"></i><i class="fab fa-creative-commons-nc"></i>  <a href = "https://JohnLittle.info"><span class = "opacity30">https://</span>JohnLittle<span class = "opacity30">.info</span></a> 
+<span class = "opacity30"> | <a href="https://github.com/libjohn/workshop_textmining">https://github.com/libjohn/workshop_textmining</a> | `r Sys.Date()` </span>
+]
+
+???
+
+- These are not exactly the best drivers for creating a dashboard.  They’re not bad either.
+
+
+---
+layout: false
+class:  middle, center
+
+<br>
+
+.bg-washed-blue.b--navy.ba.bw2.br3.shadow-5.ph4.mt5[
+
+![Rfun](images/rfun.png# fl l-4 w-2-12th)
+
+## John R Little
+
+.prussian[
+.f5[Data Science Librarian  
+Center for Data & Visualization Sciences  
+Duke University Libraries  
+]
+]
+
+.f7[https://johnlittle.info  
+https://Rfun.library.duke.edu  
+https://library.duke.edu/data  
+]
+]
+
+
+
+<i class="fab fa-creative-commons fa-2x"></i> &nbsp; <i class="fab fa-creative-commons-by fa-2x"></i><i class="fab fa-creative-commons-nc fa-2x"></i>  
+.f6.moon-gray[Creative Commons:  Attribution-NonCommercial 4.0]  
+.f7.moon-gray[https://creativecommons.org/licenses/by-nc/4.0]
+
+---
+class: inverse
+
+# Appendix
+
+## screen shots
+
+---
+layout: true
+
+.footercc[
+<i class="fab fa-creative-commons"></i>&nbsp; <i class="fab fa-creative-commons-by"></i><i class="fab fa-creative-commons-nc"></i>  <a href = "https://JohnLittle.info"><span class = "opacity30">https://</span>JohnLittle<span class = "opacity30">.info</span></a> 
+<span class = "opacity30"> | <a href="https://github.com/libjohn/workshop_textmining">https://github.com/libjohn/workshop_textmining</a> | `r Sys.Date()` </span>
+]
+
+---
+
+![Tidyverse](images/tidyverse.png# w-10pct t-1 db fr mr-4)
+
+## Technology stack 
+
+
+
+- R   
+    - R is a data-first coding language   
+    - R can be a universal interface for analysis and workflow   
+- Tidyverse is a well developed approach to workflow & the data lifecycle  
+- Bias towards enabling reproducibility   
+    - scripting   
+    - reporting   
+    
+
+![flexdashboards](images/flexdashboard.png#  w-10pct fr fm mr-4)  
+
+![r logo](images/r_logo.png# fm fr w-10pct mr-4)  
+
+![rmarkdown](images/rmarkdown.png#  w-10pct fr mr-4)  
+
+    
+???
+
+- Reuse analysis code to produce reports, email alerts, interactive dashboards, etc.  
+
+---
+
+## Lesson
+
+.fl-10.w-60.bg.b.ba.bw1.br3.shadow-5.ph4.mt4.center.prussian[The last thing you should do is  
+build the dashboard  
+]  
+
+- Identify target audience and scope  
+- Create summary reports   
+- Build a static analysis   
+- Generate push-reports based on dynamic thresholds  
+- Advanced: Build a reporting application
+
+???
+Or, in this case, build a workshop attendance application
+
+---
+## Other important question(s) 
+
+- If developing the dashboard in R...  
+    - Flexdashboard (dashboards)
+    - Shiny (Web applications)
+
+Not mutually exclusive but Flexdashboards has a significantly lower barrier to entry  
+
+.center[![people](images/happy_people2.jpg# h-10pct w-33pct)] 
+
+---
+## Actual Goals  
+
+- Host **cleaned and disaggregated data** 
+
+- Provide a **summary of attendance** 
+
+![survey](images/survey_1.png# absolute ofv r-3 w-75pct h-7-12th)
+
+
+    
+???
+
+- Host **cleaned and disaggregated data** 
+    - A data archive for clean data 
+        - exported from the SpringShare registration system 
+        - accounts for attendance
+- Provide a **summary of attendance** so that staff can 
+    - Assess their workshop’s impact over time (as measured by attendance and registration)
+    - See current semester attendance totals within the context of multi-year totals
+
+---
+class: center
+
+![](images/full_attendance.png# l-0 t-0 w-two-thirds h-80pct ofv absolute)
+![](images/full_demographics.png# w-third h-40pct t-0 r-0 ofv absolute)
+![](images/full_survey.png# w-third h-40pct t-40pct r-0 ofv absolute)
+![](images/slice_tables.jpg# l-0 t-80pct w-100pct ofv absolute)
+
+.prussian[
+.absolute.w-5-12th.pa-3.l-4-12th.t-8-12th.b.ba.bw-4.br-4.shadow-5.bg-white-80[
+Collage of dashboard screens
+]
+]
+
+