Commit 8b5bd89a authored by Lie-Piang, Anouk's avatar Lie-Piang, Anouk
Browse files

Update ComponentModel_DryMatter.Rmd

parent 9e6b02de
......@@ -7,8 +7,8 @@ output:
#Import data
```{r}
library(readxl)
Component_Data <- read_excel("Component_Data.xlsx",
sheet = "Sheet1") #Fill in the category to be analysed: Isolates, Mildly refined, Mixtures, Alldata
Component_Data <- read_excel("fill in the name of your excel sheet.xlsx",
sheet = "Fill in the sheet number")
attach(Component_Data)
#detach(Component_Data)
```
......@@ -31,16 +31,15 @@ library(cowplot)
library(car)
library(R2HTML)
library(readxl)
```
# Create all possible formulas
#Run the model
```{r}
model= lm(viscosity~ dm, data=Component_Data)
summary(model)
plot(model)
HTML2clip(model)
```
......
Markdown is supported
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