Exploration behavior

Drosophila Synthetic Population Resource

1,2

Bulk-segregant analysis population

“Exploring” flies are those found in the B chamber after 6 hours. “Non-exploring” flies are those found in the A chamber after 6 hours.

Allelic frequency differences

Simulated allelic frequency differences between flies that exhibit exploration behavior and flies that don’t.

Code
# lib.loc = "C:/Users/zekef/AppData/Local/R/win-library/4.2"
library(ggplot2)
library(tidyverse)
set.seed(172452)

expl_freqs <- readRDS('expl-freqs.Rds')
arm <- expl_freqs %>% 
  filter(chrom=='2L') %>% 
  slice(1:800)

D <- (sample(400:600,800,replace = TRUE))/1000
N <- (sample(300:600,800, replace = TRUE))/1000

sampledata <- tibble(
  "pos" = arm$pos,
  "N" = N,
  "D" = D
)

plt <- ggplot(data=sampledata, aes(pos/16)) + 
  geom_line(aes(y = N, colour = "non-explorers")) +
  geom_line(aes(y = D, colour = "explorers"))
plt + labs(x = "Position (Mb)")

Figure 1: Allele differences between exploring and non-exploring flies.