Fungsi Dasar dalam R

#Menyimpan Data dalam Variabel (Fungsi C) dan Mengeksekusinya

simpan = c(10, 20, 40, 15, 40)
simpan

## [1] 10 20 40 15 40

simpan[3]

## [1] 40

simpan[4]

## [1] 15

#menampilkan nilai dalam variabel simpan pada posisi ke-4,

#Menampilkan/Memunculkan data dalam variabel simpan pada posisi ke-x,y,z (berurutan)
simpan = c(10, 20, 40, 15, 40)
simpan[4]

## [1] 15

simpan[c(1,3,4)]

## [1] 10 40 15

simpan[2:4]

## [1] 20 40 15

#Mengubah Nilai Data dalam Variabel

simpan[3] = 100
simpan[4] = 10000
simpan

## [1]    10    20   100 10000    40

#Menghapus Data dalam Variabel

NILAI=c(10, 40, 45, 30, 80)
NILAI

## [1] 10 40 45 30 80

NILAI=NILAI[-3] 
NILAI

## [1] 10 40 30 80

NILAI=NILAI[-4]
NILAI

## [1] 10 40 30

NILAI=NILAI[c(-1,-3)] 
NILAI

## [1] 40

#Penggunaan Operator > (Lebih Besar Dari)

NILAI=c(100, 95, 70, 80, 25, 60, 80, 60, 55, 90)
NILAI

##  [1] 100  95  70  80  25  60  80  60  55  90

NILAI[NILAI>80] 

## [1] 100  95  90

#Penggunaan Operator < (Lebih Kecil Dari)

NILAI=c(100, 95, 70, 80, 25, 60, 80, 60, 55, 90)
NILAI

##  [1] 100  95  70  80  25  60  80  60  55  90

NILAI[NILAI<75] 

## [1] 70 25 60 60 55

#Penggunaan Operator & (Dan)

NILAI=c(100, 95, 70, 80, 25, 60, 80, 60, 55, 90)
NILAI

##  [1] 100  95  70  80  25  60  80  60  55  90

NILAI[NILAI>60&NILAI<80] 

## [1] 70

#Penggunaan Operator | (Atau)

NILAI=c(100, 95, 70, 80, 25, 60, 80, 60, 55, 90)
NILAI

##  [1] 100  95  70  80  25  60  80  60  55  90

NILAI[NILAI>80 | NILAI<30] 

## [1] 100  95  25  90

#Lebih Lanjut Penggunaan Operator < (Lebih Kecil Dari)

NILAI=c(100, 95, 70, 80, 25, 60, 80, 60, 55, 90)
NILAI

##  [1] 100  95  70  80  25  60  80  60  55  90

NILAI=NILAI[NILAI<75] 
NILAI

## [1] 70 25 60 60 55

#Lebih Lanjut Penggunaan Operator > (Lebih Besar Dari)

NILAI=c(100, 95, 70, 80, 25, 60, 80, 60, 55, 90)
NILAI

##  [1] 100  95  70  80  25  60  80  60  55  90

NILAI=NILAI[NILAI>90] 
NILAI

## [1] 100  95

#Contoh Sederhana Penggunaan dari Bahasa Pemrograman R

 fungsi=function(x)
   {  
   for(i in 1 : length(x))   
     {  
     if(x[i]<65)      
       {   
       x[i]=x[i]+10;   
       }    
     print(x[i])   
     }
   }
A=c(100, 95, 70, 80, 25, 60, 80, 60, 55, 90)
fungsi(A) 

## [1] 100
## [1] 95
## [1] 70
## [1] 80
## [1] 35
## [1] 70
## [1] 80
## [1] 70
## [1] 65
## [1] 90