# NOT RUN {
# Example FSA file provided
fsa <- read.fsa(system.file("extdata/fsa/A5918.fsa", package="MLPA"))
# Plot whole profile
plot(fsa)
# Plot subset of the profile (time index)
plot(fsa, units="index", xlim=c(4000,5000))
# Plot subset of the profile (base pairs)
fsa <- align.fsa(fsa)
plot(fsa, units="bp", xlim=c(80,130))
# }
Run the code above in your browser using DataLab