directory <- "D:/Stack/Genetics/171024 PALB2-Halo tracking/"
directory <- "F:/181012 BRCA2-Halo PCNA-iRFP IR tracking"

framerate <- 1/32 #1/200 #ms
pixelsize <- 100 #nm

condition_list <- list.dirs(directory,full.names = F,recursive = F)

sos_to_spoton_csv(condition_list,directory,framerate,pixelsize)