İlk hafta ders girişinde R programının ne amaçla kullanıldığını, avantajlarını, dezavantajlarını öğrendik. Daha sonra R, R studio, java, Rtolls program ve peketlerini yükleyerek basit işlemlerle R kullanmaya başladık.
Atama operatörünü ve nesne yazımını öğrenerek nesneler tanımladık.
en <- 4 # en nesnesi tanimlama
boy <- 10 # boy nesnesi tanimlama
alan <- en*boy # alan nesnesi tanimlama
alan # alan nesnesini yazdirma## [1] 40kosegen <- sqrt(en^2+boy^2) # kosegen nesnesi tanimlama
kosegen # kosegen nesnesini yazdirma## [1] 10.77033Random veri seti oluşturmak için rnorm fonksiyonunu kullandık. Hepimizde aynı veri setinin oluşabilmesi için set.seed fonksiyonunu kullandık. Bu veri setinde ortalama ve standart sapma hesapladık.
rnorm(5)## [1] -0.4015533 1.5448354 -1.9295006 -0.7257616 -1.1484797rnorm(5, mean=0, sd=1)## [1] 0.30446127 1.42489507 0.13444052 -0.39495842 0.09009671set.seed(12042016)
rnorm(n=5, mean=0, sd=1)## [1] -0.2896163 -0.6428964 0.5829221 -0.3286728 -0.5110101rnorm(n = 5, mean = 10, sd = 2)## [1] 13.320853 9.377956 10.235461 9.811793 13.019102kare_al <- function(sayi){return(sayi*sayi)}
kare_al(4)## [1] 16üs_al<- function(x,us){x^us}
üs_al(3,4)## [1] 81üs_al <- function(x,us=2){x^2}
üs_al(3)## [1] 9myfunc <- function(x,y){a <- x+y;b <- x* y;(a*b)}
myfunc(3,4)## [1] 84Çaışma alanında kkayıtlı nesneleri konsolda göstermek için ls() fonksiyonunun kullnılabileceğini öğrendik. ls() fonksiyonu ile nesneleri çağırma özelliğini özelleştirmmeye ile ilgili soru ödev oolarak verilmişti. Bunu şu şekilde yaptım;
x1 <- 10
x2 <- 20
y1 <- 30
y2 <- 40
z1 <- 50
ls()## [1] "alan" "boy" "en" "kare_al" "kosegen" "myfunc" "üs_al"
## [8] "x1" "x2" "y1" "y2" "z1"nesneler <- ls()
belirli_harf <- "x"
sil_nesneler <- nesneler[grep(belirli_harf, nesneler)]
rm(list = sil_nesneler)
ls()## [1] "alan" "belirli_harf" "boy" "en" "kare_al"
## [6] "kosegen" "myfunc" "nesneler" "sil_nesneler" "üs_al"
## [11] "y1" "y2" "z1"