Nothing
LoadBeat <- function(fileType, HRVData, Recordname, RecordPath = ".", annotator = "qrs", scale = 1, datetime = "1/1/1900 0:0:0", annotationType = "QRS", verbose = NULL) {
#-------------------------------
# Loads beats from a specific file
#-------------------------------
# fileType -> type of the file
# RecordName -> record containing values
# RecordPath -> path
#-------------------------------
toret=""
if(fileType == "WFDB")
{
toret = LoadBeatWFDB(HRVData,Recordname,RecordPath,annotator,verbose)
}
else
{
if(fileType == "Ascii")
{
toret = LoadBeatAscii(HRVData, Recordname, RecordPath, scale, datetime, verbose)
}
else
{
if(fileType == "RR")
{
toret = LoadBeatRR(HRVData, Recordname, RecordPath, scale, datetime, verbose)
}
else
{
if(fileType == "Polar")
{
toret = LoadBeatPolar(HRVData, Recordname, RecordPath, verbose)
}
else
{
if(fileType == "Suunto")
{
toret = LoadBeatSuunto(HRVData, Recordname, RecordPath, verbose)
}
else
{
if(fileType == "EDFPlus")
{
toret = LoadBeatEDFPlus(HRVData, Recordname, RecordPath, annotationType, verbose)
}
else
{
if(fileType == "Ambit")
{
toret = LoadBeatAmbit(HRVData, Recordname, RecordPath, verbose)
}
else
{
stop("unknown file type")
}
}
}
}
}
}
}
return(toret)
}
Any scripts or data that you put into this service are public.
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.