### R代码从小插图来源的游泳。Rnw ' ################################################### ### 代码块1号:例子 ################################################### 库(SwimR) inputPath < -系统。文件(“extdata”、“trackerFiles”、包=“SwimR”)outputPath < - getwd () freMat < - createFrequencyMatrix (inputPath、outputPath方法=“极值”,阈值= 0.6,DeltaPeakDt = 1.6, MinFrameBtwnMax = 4, MinDelta = 2.5, longPeriod = 5, AvWindowSize = 10, fps = 15, ZP_Length = 100, WindowSize = 30, MaxCompWin = 2, minTime = 0, maxTime = 600 ) ################################################### ### 代码块2号:例子 ################################################### expfile < -系统。file("extdata"， "SwimExample"， "SwimR_Matrix.txt"， package="SwimR")file("extdata"， "SwimExample"， " swimr_noo .txt"， package="SwimR") projectname <- "SwimR" outputPath <- getwd() result <- SwimR(expfile, annfile, projectname, outputPath, color =" red/green"， data.collection.interval = 0.067, window. txt)Size = 150, mads = 4.4478，分位数= 0.95,interval = 20, degree = 0.2, paralysis.interval = 20, paralysis.degree = 0.2, rev.degree = 0.5)