Publications by Emily Runnion
Public Synergism
Disease dynamics #### Data for qpCR Disease Dynamics all_bees <- read_csv("qpcr_3.4_bees_all2.csv", col_types = cols(treatment = col_factor(levels = c("1", "2", "3", "4")), replicate = col_factor(levels = c("1", ...
41424 sym R (79914 sym/266 pcs) 19 img
Chapter 2: Pollen Consumption
Load libraries Input data df <- read_csv("pollen.dates.csv", col_types = cols(treatment = col_factor(levels = c("1","2", "3", "4")), pollen.start = col_date(format = "%m/%d/%Y"),start.time = col_time(format = "%H:%M:%S"),pollen.end = col_date(format = "%m/%d/%Y"),end.time = col_time(format = "%H:%M:%S"),colony.start = col_date(format = "%m/%d/%Y")...
8419 sym Python (22726 sym/41 pcs) 8 img
Chapter 2: Microcolony Health Analysis
Input Data brood <- read_csv("brood.csv") brood$colony <- as.factor(brood$colony) brood$treatment <- as.factor(brood$treatment) brood$block <- as.factor(brood$replicate) pollen <- read_csv("pollen.csv") pollen$colony <- as.factor(pollen$colony) pollen$treatment <- as.factor(pollen$treatment) pollen$block <- as.factor(pollen$block) workers...
84548 sym R (253496 sym/810 pcs) 91 img
Counts qPCR Data
Input Data q1 <- read_csv("Q1_data_set_6-11-24.csv", col_types = cols(treatment = col_factor(levels = c("3", "4")), block = col_factor(levels = c("1", "4", "6", "7", "8", "9", "10", "11", "12")), round = col_factor(levels = c("1", "2", "3")), inoc_binary = col_factor(levels = c("1", "0")))) q...
11580 sym 11 img
Pollen Consumption
input data custom_labels <- c("Control", "Fungicide", "Fungicide + Crithidia", "Crithidia") p <- read_csv("pollen.dates.csv", col_types = cols(treatment = col_factor(levels = c("1", "2", "3", "4")), pollen.start = col_date(format = "%m/%d/%Y"), pollen.end = col_date(format = "%m/%d/%Y"), colony.start = col_dat...
7876 sym Python (15065 sym/63 pcs) 13 img
Microcolony Effects 1
Input Data brood <- read_csv("brood.csv") brood$colony <- as.factor(brood$colony) brood$treatment <- as.factor(brood$treatment) brood$block <- as.factor(brood$replicate) pollen <- read_csv("pollen.csv") pollen$colony <- as.factor(pollen$colony) pollen$treatment <- as.factor(pollen$treatment) pollen$block <- as.factor(pollen$block) workers...
82328 sym R (250605 sym/793 pcs) 88 img
Microcolony Effects
Input Data brood <- read_csv("brood.csv") brood$colony <- as.factor(brood$colony) brood$treatment <- as.factor(brood$treatment) brood$block <- as.factor(brood$replicate) pollen <- read_csv("pollen.csv") pollen$colony <- as.factor(pollen$colony) pollen$treatment <- as.factor(pollen$treatment) pollen$block <- as.factor(pollen$block) workers...
95242 sym R (251197 sym/745 pcs) 96 img
qPCR Results
qpcr <- read_csv("qPCR results final.csv", col_types = cols(treatment = col_factor(levels = c("3", "4")), replicate = col_factor(levels = c("1", "4", "6", "7", "8", "9", "10", "11", "12")), start = col_date(format = "%m/%d/%Y"), Innoculation_date = col_date(format = "%m/%d/%Y"), date = col_dat...
16307 sym R (10959 sym/30 pcs) 17 img
disease dynamic draft 1
Input Data brood <- read_csv("brood.csv") brood$colony <- as.factor(brood$colony) brood$treatment <- as.factor(brood$treatment) brood$block <- as.factor(brood$replicate) pollen <- read_csv("pollen.csv") pollen$colony <- as.factor(pollen$colony) pollen$treatment <- as.factor(pollen$treatment) pollen$block <- as.factor(pollen$block) workers...
55861 sym R (165442 sym/544 pcs) 69 img