Update page 'Solutions to the questions concerning R language'

xuanyi.wang
2023-05-22 20:44:17 +02:00
parent 04d77e3270
commit 324b9d87b3
@@ -0,0 +1,10 @@
***Applied Question***
**i.**
```
library(ISLR)
set.seed(9004)
train = sample(dim(OJ)[1], 800)
OJ.train = OJ[train, ]
OJ.test = OJ[-train, ]
```