ALS-Binary is a Shiny application designed to
convert microsatellite allele size data into standardized outputs for
genetic analysis.
It supports multiple file formats (.csv, .txt,
.xlsx), handles both headered and headerless data, and
produces Excel outputs with each marker on a separate sheet.
The tool provides a reproducible and user-friendly workflow for
researchers working with SSR/microsatellite data.
đź“§ Contact: prasanth.stat@gmail.com
đź”— Google
Scholar – Prasanth VP
đź”— Google
Scholar – Subhash Chandra
.csv,
.txt, and .xlsx formats with or without
headershelp.md
for detailed rationale and usage notesMicrosatellite markers (SSRs) are represented by allele sizes in base
pairs.
Raw sizes are not directly comparable across datasets, so ALS‑Binary
standardizes them into two complementary outputs:
0
are converted to ? in binary output and -9 in
STRUCTURE output.By generating both outputs simultaneously, ALS‑Binary ensures compatibility with diverse downstream analyses while maintaining reproducibility.
# Install devtools if you haven't already
if (!requireNamespace("devtools", quietly = TRUE)) {
install.packages("devtools")
}
# Install ALS-Binary
devtools::install_github("vpprasanth/ALS_Binary")library(ALSBinary)
# Text file
# 1. Load raw allele size data (tab-delimited, no header)
my_data <- read.delim(system.file("extdata", "data.txt", package = "ALSBinary"), header = FALSE)
# Assign expected column names
colnames(my_data) <- c("Marker", "Genotype", "Allele_1", "Allele_2")
# 2. Load repeat length file (tab-delimited, no header)
repeat_info <- read.delim(system.file("extdata", "repeat_length.txt", package = "ALSBinary"), header = FALSE)
# Assign expected column names
colnames(repeat_info) <- c("RepeatLength")
# 3. Run the binary conversion
results <- allele_to_binary(my_data, repeat_info)
# Excel input
# 1. Load your raw allele size data
my_data <- readxl::read_excel(system.file("extdata", "data.xlsx", package = "ALSBinary"))
# 2. Load the corresponding repeat length file
repeat_info <- readxl::read_excel(system.file("extdata", "repeat_length.xlsx", package = "ALSBinary"))
# 3. Run the binary conversion
results <- allele_to_binary(my_data, repeat_info)Full usage notes, rationale, and examples are available in help.md.