read.abif
function.plotabif(abifdata,
chanel = 1,
tmin = 1/tscale,
tmax = abifdata$Data[["SCAN.1"]]/tscale,
tscale = 1000,
yscale = 1000, type = "l", las = 1,
xlab = paste("Time", tscale, sep = "/"),
ylab = paste("RFU", yscale, sep = "/"),
irange = (tmin*tscale):(tmax*tscale),
x = irange/tscale,
xlim = c(tmin, tmax),
chanel.names = c(1:4,105),
DATA = paste("DATA", chanel.names[chanel], sep = "."),
y = abifdata$Data[[DATA]][irange]/yscale,
ylim = c(min(y), max(y)),
dyn = abifdata$Data[[paste("DyeN", chanel, sep = ".")]],
main = paste(deparse(substitute(abifdata)), chanel, dyn, sep = " ; "),
calibr = NULL,
ladder.bp = NULL,
allele.names = "identifiler",
ladder.lab = TRUE,
...)
read.abif
plot
plot
plot
plot
plot
plot
plot
plot
citation("seqinr")
read.abif
to import files in ABIF format,
data gs500liz
for internal size standards,
data identifiler
for allele names in the allelic ladder,
data JLO
for an example of an individual sample file,
data ECH
for an example of an allelic lader.data(ECH)
plotabif(ECH,chanel = 1, tmin = 3.2, tmax = 6.1)
Run the code above in your browser using DataLab