top of page

Uygulama Kodları

​

library(datasets)

​

names(infert)

​

library(neuralnet)

​

nn< -neuralnet(case age + parity+induced +spontaneous,data = in f ert, hidden =2,err. f... ...ct=”ce”,linear.out put = FALSE)

​

names(nn)

​

nn$result.matrix

​

out < −cbind(nn$covariate,nn$net.result[[1]])

​

dimnames(out) < −list(NU LL,c(”age”,”parity”,”induced”,”spontaneous”,”nn−out put”))

​

head(out)

​

head(nn$generalized.weights[[1]])

​

plot(nn)

​

​

​

​

Uygulama Adı

​

Yapay Sinir Ağı ile "Dataset" paketindeki "infert" verisini sınıflandırma

​

Uygulama Amacı

​

"Dataset" paketinde bulunan "infert" verisinin sahip olduÄŸu "case" deÄŸiÅŸkenine göre sınıflandırma

​

Uygulama Ä°çeriÄŸi

​

"Dataset" paketinde bulunan 248 gözlem ve 8 deÄŸiÅŸkene sahip "infert" verisinin 2 gizli age","parity","induced","spontaneous" deÄŸiÅŸkenlerinin giriÅŸ olarak kullanarak "case durumlarını sınıfladırma

​

​

Uygulama Aşamaları

1. Veriyi elde etmek için "Dataset" kütüphanesinin çaÄŸrılması

2.Ağı eÄŸitmek için "neuralnet" kütüphanesinin çaÄŸrılması

3.Elde edilen veri ile "neuralnet" kütüphanesinin fonksiyonları ile ağı eÄŸitme

4. Elde edilen ağı çizme

bottom of page