Внимание! Вы не авторизовались на сайте. Ваш IP-адрес будет публично видимым, если вы будете вносить любые правки. Если вы войдёте или создадите учётную запись, правки вместо этого будут связаны с вашим именем пользователя, а также у вас появятся другие преимущества.
Правка может быть отменена. Пожалуйста, просмотрите сравнение версий, чтобы убедиться, что это именно те изменения, которые вас интересуют, и нажмите «Записать страницу», чтобы изменения вступили в силу.
Текущая версия |
Ваш текст |
Строка 260: |
Строка 260: |
| } | | } |
| System.out.format("USPS error rate = %.2f%%\n", 100.0 * error / test.x().length); | | System.out.format("USPS error rate = %.2f%%\n", 100.0 * error / test.x().length); |
− |
| |
− | === Пример на языке R ===
| |
− | {{Main|Примеры кода на R}}
| |
− |
| |
− | <font color="gray"># importing package and its' dependencies</font>
| |
− | library(caret)
| |
− |
| |
− | <font color="gray">#reading data</font>
| |
− | data <- read.csv(<font color="green">"input.csv"</font>, <font color="#660099">sep</font> = <font color="green">','</font>, <font color="#660099">header</font> = FALSE)
| |
− |
| |
− | <font color="gray"># splitting data into train and test sets</font>
| |
− | index <- createDataPartition(<font color="#660099">y</font> = data$<strong><font color="#660E7A">target</font></strong>, <font color="#660099">p</font> = <font color="blue">0.8</font>, <font color="#660099">list</font> = FALSE)
| |
− | training <- data[index,]
| |
− | testing <- data[-index,]
| |
− |
| |
− | <font color="gray"># evaluating model</font>
| |
− | fit <- train(target ~ x + y + z,
| |
− | <font color="#660099">data</font> = train_flats,
| |
− | <font color="#660099">method</font> = <font color="green">"svmRadial"</font>,
| |
− | <font color="#660099">trControl</font> = trainControl(<font color="#660099">method</font> = <font color="green">"repeatedcv"</font>, <font color="#660099">number</font> = <font color="blue">10</font>, <font color="#660099">repeats</font> = <font color="blue">3</font>))
| |
− |
| |
− | <font color="gray"># printing parameters</font>
| |
− | print(fit)
| |
| | | |
| == См. также == | | == См. также == |