diff --git a/.gitignore b/.gitignore new file mode 100644 index 0000000..5b6a065 --- /dev/null +++ b/.gitignore @@ -0,0 +1,4 @@ +.Rproj.user +.Rhistory +.RData +.Ruserdata diff --git a/book_group.Rproj b/book_group.Rproj new file mode 100644 index 0000000..8e3c2eb --- /dev/null +++ b/book_group.Rproj @@ -0,0 +1,13 @@ +Version: 1.0 + +RestoreWorkspace: Default +SaveWorkspace: Default +AlwaysSaveHistory: Default + +EnableCodeIndexing: Yes +UseSpacesForTab: Yes +NumSpacesForTab: 2 +Encoding: UTF-8 + +RnwWeave: Sweave +LaTeX: pdfLaTeX diff --git a/invisible_women/ch3-4/book-club.Rmd b/invisible_women/ch3-4/book-club.Rmd new file mode 100644 index 0000000..57c0f4a --- /dev/null +++ b/invisible_women/ch3-4/book-club.Rmd @@ -0,0 +1,278 @@ +--- +title: "NHS-R Community Book club" +subtitle: "Invisible Women, chapters 3 & 4" +author: "Zoë Turner" +date: "July 2021" +output: + xaringan::moon_reader: + css: xaringan-themer.css + lib_dir: libs + seal: false + self_contained: true + nature: + highlightStyle: googlecode + highlightLines: true + highlightLanguage: ["r"] + countIncrementalSlides: false + ratio: "16:9" +--- + +```{r setup, include = FALSE} +library(knitr) +library(tidyverse) + +### Packages not on CRAN ### +library(xaringanthemer) + +# install.packages("remotes") +# remotes::install_github("mitchelloharawild/icon") +library(icon) # icons need to be loaded to view so run following code if not already done +# icon::download_fontawesome() + +# install.packages("devtools") +#devtools::install_github("gadenbuie/xaringanExtra") +library(xaringanExtra) +xaringanExtra::use_share_again() # need to get the slide button on html view + +# set default options +opts_chunk$set(echo = FALSE, + fig.width = 7.252, + fig.height = 4, + dpi = 300, + dev.args = list(type = "cairo"), + eval = TRUE, + warning = FALSE, + message = FALSE, + error = FALSE) + +``` + +```{r echo=FALSE} +style_mono_accent( + base_color = "#1c5253", + header_font_google = google_font("Josefin Sans"), + text_font_google = google_font("Montserrat", "300", "300i"), + code_font_google = google_font("Fira Mono") +) + +``` + +class: inverse, middle, center + +# `r rmarkdown::metadata$title` +---- +## **`r rmarkdown::metadata$subtitle`** +### `r rmarkdown::metadata$author` | `r rmarkdown::metadata$date` +
+ +--- + +# Note following meeting + +I wrote these notes for the group but didn't show them as we discussed the book generally and a few of the stories that are featured. + +These slides are built using {xaringan}, {xaringanExtra} and {xaringanthemer} - there appears to be an issue with the `--` for some slides where this is printing and text isn't sliding into view as intended. + +--- + +# Chapter 3 - money + +Opens with a story about the women of Iceland going on strike on 24 October 1975 + +-- + +* 90% (20k+) of women went on strike + +-- + +* A year later Iceland passed the first Gender Equality Act + +-- + +* By 2017 Iceland topped the World Economic Forum's Global Gender Gap Index for the 8th year running + +-- + +## That's a huge impact + +--- + +# But things are changing... + +A common retort that men are doing more of their share of the household work burden + +-- + +* Individually, yes + +* At a population level, no + +-- + +Women take on a greater share of housework, caring responsibilities and also, often, work + +-- + +Leisure pursuits are imbalanced with women's being shorter, more fragmented and often +combine tasks + +-- + +When ill or recovering from surgery women return to the housework sooner + +-- + +To the extent that single female recover better from heart attacks than married women + +--- + +# Unpaid work + +The hidden data for women isn't always 'direct' + +-- + +Indirectly women are not being counted in unpaid work they do when "science" says you shouldn't "work" more than 40 (paid of course) hours a week + +-- + +To accommodate unpaid work responsibilities women work part-time (75% are women) + +-- + +Part-time work is often lower graded so women get paid less + +-- + +That gets hidden in pay gap statistics when part-time and full-time is combined + +--- + +# Money + +Lower pension pots and savings due to working patterns + +-- + +Leads to greater poverty in older years + +-- + +Remember women live longer then men (on average) + +-- + +And as for maternity it pays poorly to have children + +* UK was 22nd out of 24 European countries on length of "decently paid maternity leave" + +-- + +For some it doesn't pay at all, like MPs and councillors + +-- + +Paternity schemes where time is shared often work better when rules where its not taken up by the other partner then it's lost + +-- + +Huge effects on women working in universities as the system of tenure doesn't allow for gaps to have children + +-- + +Some processes put in place that are meant to be fair by including the father, further disadvantaged the mother - they were able to use the time to publish whereas the mothers didn't + +--- + +# Childcare + +It's not just about babies! + +-- + +Taxes disadvantage women who need childcare as it's a personal expense + +-- + +But booking a hotel for a night is a valid expense + +--- + +# Chapter 4 - meritocracy + +Blind auditions for the orchestra equalised numbers of man to women + +-- + +Desire for meritocracy to exist, to work very strong + +-- + +Criticism in performance reviews is more personal for women - tone & character + +-- + +Believing in meritocracy can introduce bias (justification of decisions?) + +-- + +Differences in publishing and citations (men self cite 70% more than women) + +-- + +Male default thinking so when using initials, assumed male + +--- + +# Time + +Differences in time requested to do papers (requesting extensions, re-grading and so on) + +-- + +Admin burden falls to women - extra teaching hours, paperwork + +-- + +Emotional support expected from staff but then also penalised + +-- + +Least effective males are still ranked higher than more effective females + + +--- + +# Teaching + +We still use teaching evaluations and they are useless (resonates) + +-- + +Personal comments appear more frequently in female lecturers feedback + +-- + +Girls are learning that brilliance and genius is female at school + +-- + +Females were the original computers and coders. Great book recommendation is [Coders](https://www.panmacmillan.com/authors/clive-thompson/coders/9781529018981) by Clive Thompson + +--- + +# Thoughts + +Highlights poor logical thinking - so much of what is highlighted in this book is that assumptions are made so often on what we see and record, forgetting the missing + +-- + +Lots of facts + +-- + +Stories are more memorable + +-- + +After a week, what do you remember? \ No newline at end of file diff --git a/invisible_women/ch3-4/book-club.html b/invisible_women/ch3-4/book-club.html new file mode 100644 index 0000000..3133984 --- /dev/null +++ b/invisible_women/ch3-4/book-club.html @@ -0,0 +1,383 @@ + + + + NHS-R Community Book club + + + + + + + + + + + + + + + + + + + + + + diff --git a/invisible_women/ch3-4/xaringan-themer.css b/invisible_women/ch3-4/xaringan-themer.css new file mode 100644 index 0000000..89535f0 --- /dev/null +++ b/invisible_women/ch3-4/xaringan-themer.css @@ -0,0 +1,262 @@ +/* ------------------------------------------------------- + * + * !! This file was generated by xaringanthemer !! + * + * Changes made to this file directly will be overwritten + * if you used xaringanthemer in your xaringan slides Rmd + * + * Issues or likes? + * - https://github.com/gadenbuie/xaringanthemer + * - https://www.garrickadenbuie.com + * + * Need help? Try: + * - vignette(package = "xaringanthemer") + * - ?xaringanthemer::style_xaringan + * - xaringan wiki: https://github.com/yihui/xaringan/wiki + * - remarkjs wiki: https://github.com/gnab/remark/wiki + * + * Version: 0.4.0 + * + * ------------------------------------------------------- */ +@import url(https://fonts.googleapis.com/css?family=Montserrat:300,300i&display=swap); +@import url(https://fonts.googleapis.com/css?family=Josefin+Sans&display=swap); +@import url(https://fonts.googleapis.com/css?family=Fira+Mono&display=swap); + + +:root { + /* Fonts */ + --text-font-family: Montserrat; + --text-font-is-google: 1; + --text-font-family-fallback: -apple-system, BlinkMacSystemFont, avenir next, avenir, helvetica neue, helvetica, Ubuntu, roboto, noto, segoe ui, arial; + --text-font-base: sans-serif; + --header-font-family: 'Josefin Sans'; + --header-font-is-google: 1; + --header-font-family-fallback: Georgia, serif; + --code-font-family: 'Fira Mono'; + --code-font-is-google: 1; + --base-font-size: 20px; + --text-font-size: 1rem; + --code-font-size: 0.9rem; + --code-inline-font-size: 1em; + --header-h1-font-size: 2.75rem; + --header-h2-font-size: 2.25rem; + --header-h3-font-size: 1.75rem; + + /* Colors */ + --text-color: #272822; + --header-color: #1c5253; + --background-color: #FFFFFF; + --link-color: #1c5253; + --text-bold-color: #1c5253; + --code-highlight-color: rgba(255,255,0,0.5); + --inverse-text-color: #FFFFFF; + --inverse-background-color: #1c5253; + --inverse-header-color: #FFFFFF; + --inverse-link-color: #1c5253; + --title-slide-background-color: #1c5253; + --title-slide-text-color: #FFFFFF; + --header-background-color: #1c5253; + --header-background-text-color: #FFFFFF; + --base: #1c5253; + --white: #FFFFFF; + --black: #272822; +} + +html { + font-size: var(--base-font-size); +} + +body { + font-family: var(--text-font-family), var(--text-font-family-fallback), var(--text-font-base); + font-weight: 300; + color: var(--text-color); +} +h1, h2, h3 { + font-family: var(--header-font-family), var(--header-font-family-fallback); + font-weight: 600; + color: var(--header-color); +} +.remark-slide-content { + background-color: var(--background-color); + font-size: 1rem; + padding: 16px 64px 16px 64px; + width: 100%; + height: 100%; +} +.remark-slide-content h1 { + font-size: var(--header-h1-font-size); +} +.remark-slide-content h2 { + font-size: var(--header-h2-font-size); +} +.remark-slide-content h3 { + font-size: var(--header-h3-font-size); +} +.remark-code, .remark-inline-code { + font-family: var(--code-font-family), Menlo, Consolas, Monaco, Liberation Mono, Lucida Console, monospace; +} +.remark-code { + font-size: var(--code-font-size); +} +.remark-inline-code { + font-size: var(--code-inline-font-size); + color: #1c5253; +} +.remark-slide-number { + color: #1c5253; + opacity: 1; + font-size: 0.9rem; +} +strong { + font-weight: bold; + color: var(--text-bold-color); +} +a, a > code { + color: var(--link-color); + text-decoration: none; +} +.footnote { + position: absolute; + bottom: 60px; + padding-right: 4em; + font-size: 0.9em; +} +.remark-code-line-highlighted { + background-color: var(--code-highlight-color); +} +.inverse { + background-color: var(--inverse-background-color); + color: var(--inverse-text-color); + +} +.inverse h1, .inverse h2, .inverse h3 { + color: var(--inverse-header-color); +} +.inverse a, .inverse a > code { + color: var(--inverse-link-color); +} +.title-slide, .title-slide h1, .title-slide h2, .title-slide h3 { + color: var(--title-slide-text-color); +} +.title-slide { + background-color: var(--title-slide-background-color); +} +.title-slide .remark-slide-number { + display: none; +} +/* Two-column layout */ +.left-column { + width: 20%; + height: 92%; + float: left; +} +.left-column h2, .left-column h3 { + color: #1c525399; +} +.left-column h2:last-of-type, .left-column h3:last-child { + color: #1c5253; +} +.right-column { + width: 75%; + float: right; + padding-top: 1em; +} +.pull-left { + float: left; + width: 47%; +} +.pull-right { + float: right; + width: 47%; +} +.pull-right + * { + clear: both; +} +img, video, iframe { + max-width: 100%; +} +blockquote { + border-left: solid 5px #1c525380; + padding-left: 1em; +} +.remark-slide table { + margin: auto; + border-top: 1px solid #666; + border-bottom: 1px solid #666; +} +.remark-slide table thead th { + border-bottom: 1px solid #ddd; +} +th, td { + padding: 5px; +} +.remark-slide thead, .remark-slide tfoot, .remark-slide tr:nth-child(even) { + background: #D1DCDC; +} +table.dataTable tbody { + background-color: var(--background-color); + color: var(--text-color); +} +table.dataTable.display tbody tr.odd { + background-color: var(--background-color); +} +table.dataTable.display tbody tr.even { + background-color: #D1DCDC; +} +table.dataTable.hover tbody tr:hover, table.dataTable.display tbody tr:hover { + background-color: rgba(255, 255, 255, 0.5); +} +.dataTables_wrapper .dataTables_length, .dataTables_wrapper .dataTables_filter, .dataTables_wrapper .dataTables_info, .dataTables_wrapper .dataTables_processing, .dataTables_wrapper .dataTables_paginate { + color: var(--text-color); +} +.dataTables_wrapper .dataTables_paginate .paginate_button { + color: var(--text-color) !important; +} + +/* Slide Header Background for h1 elements */ +.remark-slide-content.header_background > h1 { + display: block; + position: absolute; + top: 0; + left: 0; + width: 100%; + background: var(--header-background-color); + color: var(--header-background-text-color); + padding: 2rem 64px 1.5rem 64px; + margin-top: 0; + box-sizing: border-box; +} +.remark-slide-content.header_background { + padding-top: 7rem; +} + +@page { margin: 0; } +@media print { + .remark-slide-scaler { + width: 100% !important; + height: 100% !important; + transform: scale(1) !important; + top: 0 !important; + left: 0 !important; + } +} + +.base { + color: var(--base); +} +.bg-base { + background-color: var(--base); +} +.white { + color: var(--white); +} +.bg-white { + background-color: var(--white); +} +.black { + color: var(--black); +} +.bg-black { + background-color: var(--black); +} +