Report for linear PLA added; Roxygen RMD file added which serves also as testing file
bug fixes in the code; Code made flexible regarding EXCEL upload and metadata evaluation. Functions now in "Global.R" file
This commit is contained in:
@@ -202,3 +202,19 @@ x <- 1; Div <- 3;N <- 0; res <- c(); noDil <- 7
|
||||
|
||||
divFUN(x,Div,N,res,noDil)
|
||||
# [1] 0.3333333333 0.1111111111 0.0370370370 0.0123456790 0.0041152263 0.0013717421 0.0004572474
|
||||
|
||||
|
||||
circle <- read.csv("~/plateflow/circle.csv")
|
||||
all_l2 <- read.csv("~/plateflow/all_l2.csv")
|
||||
sigmoid <- c(10.0, 10.0, 110.0, 110.0, 1.0, 1.0, -3.5, 0.0)
|
||||
indS <- 3
|
||||
indT <- 3
|
||||
pl_df <- data.frame(lnC=c(-1.203973,-1.897120 ,-2.590267,-3.283414,-3.976562,-4.669176,-5.362323,-6.053340),
|
||||
plotS = c(113.772511,97.668371,81.564231,65.460091,49.355952,33.264200,17.160060,1.105405),
|
||||
plotT = c(114.213375,97.588663,80.963951,64.339239,47.714527,31.102604,14.477892,-2.095735))
|
||||
|
||||
|
||||
PLOT <- PlotLinPLA_FUNC(circle, sigmoid, all_l2, pl_df, indS,indT)
|
||||
PlotLinTest.png
|
||||
|
||||
|
||||
|
||||
Reference in New Issue
Block a user