Skip to content
GitLab
Menu
Projects
Groups
Snippets
Help
Help
Support
Community forum
Keyboard shortcuts
?
Submit feedback
Contribute to GitLab
Sign in
Toggle navigation
Menu
Open sidebar
Lie-Piang, Anouk
Functionality-oriented selection of ingredients
Commits
d31c14c4
Commit
d31c14c4
authored
Jun 21, 2021
by
Lie-Piang, Anouk
Browse files
Update FractionModel.Rmd
parent
daa02877
Changes
1
Hide whitespace changes
Inline
Side-by-side
FractionModel.Rmd
View file @
d31c14c4
...
...
@@ -6,16 +6,15 @@ output: html_notebook
#Import data
```{r}
library(readxl)
FractionData <- read_excel("F
ractiondata
.xlsx",
sheet = "
Alldata_average
")
FractionData <- read_excel("F
ill in the name of your excel file
.xlsx",
sheet = "
fill in the name of your sheet
")
attach(FractionData)
#rename data
viscosity = log(`Final viscosity (mPa.s)`)
dehulledcoarse = `Coarse fraction (%)`
dehulledfine = `Fine fraction (%)`
flour = `Flour (%)` #also dehulled
hull = `Hull (%)`
coarse = `Coarse fraction (%)`
fine = `Fine fraction (%)`
flour = `Flour (%)`
protisol = `Protein isolate (%)`
starchisol = `Starch isolate (%)`
fibreisol = `Fibre isolate (%)`
...
...
@@ -35,7 +34,7 @@ library(readxl)
```
#Create model
```{r}
model= lm(viscosity~
dehulled
coarse +
dehulled
fine + flour +
hull+
protisol + starchisol + fibreisol, data=FractionData)
model= lm(viscosity~ coarse + fine + flour + protisol + starchisol + fibreisol, data=FractionData)
```
```{r}
...
...
Write
Preview
Supports
Markdown
0%
Try again
or
attach a new file
.
Attach a file
Cancel
You are about to add
0
people
to the discussion. Proceed with caution.
Finish editing this message first!
Cancel
Please
register
or
sign in
to comment