ÖRNEK KODLAR | yapayzeka

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ıﬂadı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