Skip to content

Instantly share code, notes, and snippets.

View kyleGrealis's full-sized avatar
:atom:

Kyle Grealis kyleGrealis

:atom:
View GitHub Profile
@kyleGrealis
kyleGrealis / frogger_quarto.qmd
Last active November 6, 2024 15:36
froggeR quarto template
---
title: "Title"
author:
name: "{{< var author >}}"
url: "{{< var url >}}"
email: "{{< var email >}}"
orcid: "{{< var orcid >}}"
roles: "{{< var roles >}}"
affiliations: "{{< var affiliations >}}"
abstract: ""
@kyleGrealis
kyleGrealis / quarto_header.qmd
Last active October 25, 2024 14:04
Quarto header template
---
title: Your Title Here
author:
name: "First Last"
url: https://github.com/ # add your GitHub username
email: me@mail.com
orcid: "0000-0000-0000-0000" # add your ORCID
roles: "aut"
affiliations: "your company"
abstract: ""
@kyleGrealis
kyleGrealis / table1-tweaks.R
Last active December 19, 2024 17:05
table1 tweaks
# set up including p-values and strata %
pvalue <- function(x, ...) {
# Construct vectors of data y, and groups (strata) g
y <- unlist(x)
g <- factor(rep(1:length(x), times=sapply(x, length)))
if (is.numeric(y)) {
# For numeric variables, perform ANOVA
### YOU MUST CHANGE THE DATASET NAMED BELOW!! ###