Unverified Commit 33d8f084 authored by Maximilian von der Linde's avatar Maximilian von der Linde Committed by GitHub
Browse files

Merge branch 'InfiniteWhite-patch-3' into InfiniteWhite-patch-3.1

parents 065efcd1 a80f8ce1
......@@ -87,7 +87,7 @@ if(MultiFlyDataVerification(xml_list)==TRUE) # make sure all flies in a group ha
#create/empty plot lists
poshistos <- list()
trqhistos <- list()
flyhistos <- list()
flyhistos <- list() #still needed?
flyhistosR <- list()
flyhistosL <- list()
#vectors for pooled platform periods
......@@ -95,6 +95,7 @@ if(MultiFlyDataVerification(xml_list)==TRUE) # make sure all flies in a group ha
optomotoR_flydata <- c()
flyhistosL.rawdata <- list()
flyhistosR.rawdata <- list()
#### call RMarkdown for single fly evaluations ################################################
single_fly_path <- paste(start.wd, "single_fly.Rmd", sep = "/")
rmarkdown::render(single_fly_path,
......@@ -224,6 +225,7 @@ flyhistos <- list() #empty list of p_position histograms
# grouped.flyhistosR[[x]] = flyhistosR #add platform histograms to list of grouped p_position histograms for right turning arena
# flyhistosR <- list()
#Position Histograms
grouped.poshistos[[x]] = poshistos #add torque histograms to list of grouped position histograms
poshistos <- list() #empty list of position histograms
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment