Skip to content
Snippets Groups Projects
Commit f5e90b6d authored by Isabelle Sanchez's avatar Isabelle Sanchez
Browse files

MaJ vignette issue #11

parent 37e79a02
No related branches found
No related tags found
No related merge requests found
Pipeline #60065 passed
Stage: build
    Expand all Hide whitespace changes
    Inline Side-by-side
    doc/HowTo.R
    + 4
    − 4
    View file @ f5e90b6d
    ......@@ -18,7 +18,7 @@ dim(spring1)
    head(spring1)
    ## ----error=TRUE---------------------------------------------------------------
    # --- Without Optimisation on initial parameters
    # --- Without Optimisation on parameters
    param2<-list(m0=41,
    mm=45,
    pp=0.5,
    ......@@ -45,7 +45,7 @@ kfino_plot(resuin=resu2,typeG="quanti",
    Tvar="Day",Yvar="Poids",Ident="IDE")
    ## ----error=TRUE---------------------------------------------------------------
    # --- With Optimisation on initial parameters
    # --- With Optimisation on parameters
    param1<-list(m0=NULL,
    mm=NULL,
    pp=NULL,
    ......@@ -84,7 +84,7 @@ dim(merinos1)
    head(merinos1)
    ## ----error=TRUE---------------------------------------------------------------
    # --- With Optimisation on initial parameters
    # --- With Optimisation on parameters
    param3<-list(m0=NULL,
    mm=NULL,
    pp=NULL,
    ......@@ -97,7 +97,7 @@ param3<-list(m0=NULL,
    K=2,
    seqp=seq(0.5,0.7,0.1))
    resu3<-kfino_fit(datain=merinos2,
    resu3<-kfino_fit(datain=merinos1,
    Tvar="dateNum",Yvar="Poids",
    doOptim=TRUE,param=param3)
    ......
    doc/HowTo.Rmd
    + 7
    − 7
    View file @ f5e90b6d
    ......@@ -45,10 +45,10 @@ head(spring1)
    ```
    # Kfino algorithm on the `spring1` dataset
    ## Initial parameters not optimized
    ## Parameters (m0, mm and pp) not optimized
    ```{r,error=TRUE}
    # --- Without Optimisation on initial parameters
    # --- Without Optimisation on parameters
    param2<-list(m0=41,
    mm=45,
    pp=0.5,
    ......@@ -75,9 +75,9 @@ kfino_plot(resuin=resu2,typeG="quanti",
    Tvar="Day",Yvar="Poids",Ident="IDE")
    ```
    ## Initial parameters optimized
    ## Parameters (m0, mm and pp) optimized
    ```{r,error=TRUE}
    # --- With Optimisation on initial parameters
    # --- With Optimisation on parameters
    param1<-list(m0=NULL,
    mm=NULL,
    pp=NULL,
    ......@@ -125,9 +125,9 @@ head(merinos1)
    ```
    # Kfino algorithm on the `merinos1` dataset
    ## Initial parameters optimized
    ## Parameters (m0, mm and pp) optimized
    ```{r,error=TRUE}
    # --- With Optimisation on initial parameters
    # --- With Optimisation on parameters
    param3<-list(m0=NULL,
    mm=NULL,
    pp=NULL,
    ......@@ -140,7 +140,7 @@ param3<-list(m0=NULL,
    K=2,
    seqp=seq(0.5,0.7,0.1))
    resu3<-kfino_fit(datain=merinos2,
    resu3<-kfino_fit(datain=merinos1,
    Tvar="dateNum",Yvar="Poids",
    doOptim=TRUE,param=param3)
    ......
    doc/HowTo.html
    + 41
    − 46
    View file @ f5e90b6d
    This diff is collapsed.
    vignettes/HowTo.Rmd
    + 7
    − 7
    View file @ f5e90b6d
    ......@@ -45,10 +45,10 @@ head(spring1)
    ```
    # Kfino algorithm on the `spring1` dataset
    ## Initial parameters not optimized
    ## Parameters (m0, mm and pp) not optimized
    ```{r,error=TRUE}
    # --- Without Optimisation on initial parameters
    # --- Without Optimisation on parameters
    param2<-list(m0=41,
    mm=45,
    pp=0.5,
    ......@@ -75,9 +75,9 @@ kfino_plot(resuin=resu2,typeG="quanti",
    Tvar="Day",Yvar="Poids",Ident="IDE")
    ```
    ## Initial parameters optimized
    ## Parameters (m0, mm and pp) optimized
    ```{r,error=TRUE}
    # --- With Optimisation on initial parameters
    # --- With Optimisation on parameters
    param1<-list(m0=NULL,
    mm=NULL,
    pp=NULL,
    ......@@ -125,9 +125,9 @@ head(merinos1)
    ```
    # Kfino algorithm on the `merinos1` dataset
    ## Initial parameters optimized
    ## Parameters (m0, mm and pp) optimized
    ```{r,error=TRUE}
    # --- With Optimisation on initial parameters
    # --- With Optimisation on parameters
    param3<-list(m0=NULL,
    mm=NULL,
    pp=NULL,
    ......@@ -140,7 +140,7 @@ param3<-list(m0=NULL,
    K=2,
    seqp=seq(0.5,0.7,0.1))
    resu3<-kfino_fit(datain=merinos2,
    resu3<-kfino_fit(datain=merinos1,
    Tvar="dateNum",Yvar="Poids",
    doOptim=TRUE,param=param3)
    ......
    0% or .
    You are about to add 0 people to the discussion. Proceed with caution.
    Finish editing this message first!
    Please register or to comment