This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
--- | |
title: "Untitled" | |
format: | |
html: | |
embed-resources: true | |
--- | |
<script src="https://code.jquery.com/jquery-3.7.0.min.js" | |
integrity="sha256-2Pmvv0kuTBOenSvLm6bvfBSSHrUJ+3A7x6P5Ebd07/g=" | |
crossorigin="anonymous"></script> |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
/opt/homebrew/bin/pandoc +RTS -K512m -RTS index.knit.md --to html4 --from markdown+autolink_bare_uris+tex_math_single_backslash --output index.html --lua-filter /Users/saprm3/Library/Caches/org.R-project.R/R/renv/library/flexTeaching3.api-91d1a6f0/R-4.2/aarch64-apple-darwin20/rmarkdown/rmarkdown/lua/pagebreak.lua --lua-filter /Users/saprm3/Library/Caches/org.R-project.R/R/renv/library/flexTeaching3.api-91d1a6f0/R-4.2/aarch64-apple-darwin20/rmarkdown/rmarkdown/lua/latex-div.lua --embed-resources --standalone --verbose --variable bs3=TRUE --section-divs --template /Users/saprm3/Library/Caches/org.R-project.R/R/renv/library/flexTeaching3.api-91d1a6f0/R-4.2/aarch64-apple-darwin20/rmarkdown/rmd/h/default.html --no-highlight --variable highlightjs=1 --variable theme=bootstrap --mathjax --variable 'mathjax-url=https://mathjax.rstudio.com/latest/MathJax.js?config=TeX-AMS-MML_HTMLorMML' --include-in-header /var/folders/59/r7wjy0gn6yv59w19694x5gy80000gp/T//RtmpNWnHRc/rmarkdown-str16c6234aa443c.html | |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
"score" "condition" | |
13 "control" | |
26 "control" | |
30 "control" | |
23 "control" | |
34 "control" | |
37 "control" | |
33 "control" | |
34 "control" | |
35 "control" |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
library(dplyr) | |
library(memoise) | |
# Rolls | |
k = 3 | |
# Sides | |
n = 5 | |
sumDist = function(n,k,maxn = n){ | |
do.call( |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
#' Create cover images for talks from a folder of PDFs | |
#' | |
#' Requires imagemagick to be installed and in the path for the convert command | |
#' @param pdf_dir Directory containing PDF files of papers | |
#' @param img_dir Directory to output all the image files | |
#' @param crop_height How big to make the cropped images, relative to full page | |
#' @param fade_height How much of the image to fade to transparent at the bottom | |
#' @param density resolution for PNG images | |
#' | |
create_covers = function(pdf_dir, img_dir, crop_height = .5, fade_height = .25, density = 300){ |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
--- | |
title: "Testing ricv" | |
author: "Richard D. Morey" | |
date: "3/25/2022" | |
output: html_document | |
--- | |
```{r setup, include=FALSE} | |
knitr::opts_chunk$set(echo = FALSE) | |
``` |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
library(dplyr) | |
library(ggplot2) | |
# Create data | |
tibble( | |
g = rep(c('A','B'), each = 50), | |
z = rnorm(length(g)) | |
) |> | |
group_by(g) |> | |
mutate( |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
Cause | Rate_outof_205000000 | MVA_geom_mean | MVA_resid | Elec_geom_mean | Elec_resid | |
---|---|---|---|---|---|---|
Smallpox | 0.00 | 88.00 | 37.00 | |||
Poisoning by vitamins | 1.00 | 237.00 | 1.27 | 44.00 | 1.16 | |
Botulism | 2.00 | 379.00 | 1.97 | 88.00 | 1.96 | |
Measles | 5.00 | 331.00 | 1.39 | 85.00 | 1.47 | |
Fireworks | 6.00 | 331.00 | 1.54 | 77.00 | 1.26 | |
Smallpox vaccination | 8.00 | 38.00 | 0.17 | 14.00 | 0.22 | |
Whooping cough | 15.00 | 171.00 | 0.69 | 51.00 | 0.62 | |
Polio | 17.00 | 202.00 | 0.80 | 47.00 | 0.55 | |
Venomous bite or sting | 48.00 | 535.00 | 1.67 | 233.00 | 1.85 |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
library(dplyr) | |
library(ggplot2) | |
library(ggdist) | |
url = 'https://osf.io/846cb/download' | |
httr::GET(url, httr::write_disk(tf <- tempfile(fileext = ".xlsx"))) | |
readxl::read_xlsx(tf) %>% | |
mutate( | |
DIRECTION = factor(DIRECTION, levels = c("WEST","EAST"), |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
--- | |
title: "Test SurveyJS and Rmarkdown" | |
output: | |
html_document: | |
css: "https://unpkg.com/survey-jquery/survey.min.css" | |
editor_options: | |
chunk_output_type: console | |
--- | |
A test javascript survey by building a JSON object for [SurveyJS](https://surveyjs.io/). |
NewerOlder